Sorgulama sonuçlarındaki alan isimleri ve değerlerin yazdırılması. (Microsoft Access - mdb)

← LİSTEYE DÖN

Açıklama

Access veritabanından sorgu ile alınan verisetlerindeki alan isimlerinin bulunmasını sağlayan bir örnek.
ASP SOURCE CODE
<%
Dim VT,VeriSeti,SQL

Set VT = Server.CreateObject("ADODB.Connection") 

VT.Open=("Provider=Microsoft.Jet.OLEDB.4.0 ; Data Source=" & Server.MapPath("vt.mdb"))


SQL="SELECT  * From tablo1
	
Set rs=VT.Execute(SQL)
	
	for each x in rs.fields
	   response.write(x.name)
	   response.write(" = ")
	   response.write(x.value)
	next
%> 

Detaylı İnceleme

Veritabanı olarak Oracle kullanıldığı durumlarda verisetindeki alan sayılarını bulmak için kullanılan " recordset.fields.count" ifadesi Microsoft access veritabanı için geçerli olmamaktadır. Access veritabanından sorgulama yapılarak oluşturulan verisetlerinde alan isimlerinin alınması için; for each x in rs.fields response.write(x.name) next ifadesi kullanılmaktadır. Yukarıdaki kodda access veritabanından alınan verisetinin alanlarının ve değerlerinin listelenmesi sağlanmıştır. Bütün verilerin listelenmesi için ayrıca "while" döngüsünün kullanılması gerekmektedir.
Görüntülenme: 1789
Ekleyen: Administrator