Asp den Mysql Veri Cekme

ediptufekciler
03-12-2012, 14:00   |  #1  
ediptufekciler avatarı
OP Yeni Üye
Teşekkür Sayısı: 6
30 mesaj
Kayıt Tarihi:Kayıt: Tem 2012

 

<%
DB = "DRIVER={MySQL ODBC 3.51 Driver}; Server=localhost; Port=3306; UID=KULLANICI_ADI; pwd=ŞİFRE; db=VERİTABANI_ADI;"
%>

<%
Set Baglanti = Server.CreateObject("ADODB.Connection")
Baglanti.Open DB

strSQL = "Select * from tablo_adi"
Set rs = Baglanti.Execute(strSQL)

If rs.Eof Then
Response.Write "Veri Bulunmamaktadır."
Else

Do While Not rs.Eof
Response.Write rs("icerik")&"<br>"
rs.MoveNext
Loop
End If
%>

ediptufekciler bu faydalı başlığı için aşağıdaki 1 kişiden teşekkür aldı... [ Göster ]
Pierrs
04-04-2014, 19:42   |  #2  
Taze Üye
Teşekkür Sayısı: 1
1 mesaj
Kayıt Tarihi:Kayıt: Şub 2013

Allah razı olsun kardeş. Çalıştı ve çok işime yarayacak gibi

Turhost