nicht angemeldet
Hi!
Mich würde mal interessieren, wie andere ASPler Ihre Datenbankzugriffe proggen.
Vielleicht weiß einer von Euch auch einen Link zu einer empfehlenswerten Webseite, die sich gründlich mit Datenbankprogrammierung beschäftigt?
Postet doch mal Beispiele von Euren, möglichst kleinen, Scripts. Ich mache den Anfang und habe hier das Script eines DSN-freien Datenzugriffs, welches den Dateninhalt einer Spalte mittels einer Schleife ausgibt. Das Teil stammt ursprünglich von Christoph Wille, einige von Euch kennen ihn vielleicht. Damals, vor über 2 Jahren, war dieses Datenbankzugriffsscript meine erste ASP-Erfahrung. Das Script war so umfangreich, dass mir das Auseinandernehmen und studieren desselben etwa 60 % dessen beibrachte, was ich heute weiß. Hier also das Script, verkürzt und abgeändert. Ich hoffe, Ihr könnt es lesen.
Beste Grüße
Raphael
<%
strConnection = "Driver={Microsoft Access Driver (*.mdb)};DBQ="
strConnection = strConnection & Server.MapPath("datenbank.mdb")
strConnection = strConnection & ";DriverId=25;FIL=MS Access;MaxBufferSize=512;PageTimeout=5;"
strSQL = "SELECT * FROM table ORDER BY ID ASC"
Set conn = CreateObject("ADODB.Connection")
conn.Open strConnection
Set rs = CreateObject ("ADODB.Recordset")
rs.Open strSQL, conn
If Not rs.EOF and Not rs.BOF Then
avarRecords = rs.GetRows()
Else
bNoRecords = True
End If
rs.Close
conn.Close
Set rs = Nothing
Set conn = Nothing
If Not bNoRecords Then
nRecords = UBound(avarRecords,2)
For intRecord = 0 To nRecords
%><p><%=avarRecords(1,intRecord)%></p><%
Next
End If
%>