|
|
|
Gæstebog <% ConnString2= "driver= {MySQL ODBC 3.51 Driver};server=127.0.0.1;uid=erslev;pwd=madsen;database= erslev_dk_-_erslev;" 'ConnString2 = "driver={MySQL};UID=erslevdk;PWD=45644;Database=erslevdkdb" Set Conn2 = Server.CreateObject("ADODB.Connection") Conn2.Open ConnString2 SQL3 = "SELECT DATO, NAVN, OVERSKRIFT, TEKST, IP FROM DEBAT ORDER BY ID DESC" Set objRS2 = Conn2.Execute (sql3) While Not objRS2.EOF Response.write Day(objRS2("DATO")) Response.write "/" Response.write Month(objRS2("DATO")) Response.write ". skrev " Response.write objRS2("NAVN") Response.write " (" Response.write "IP-adr: " Response.write Mid(objRS2("IP"),1,6)&"xxx) " Response.write objRS2("OVERSKRIFT") Response.write " " Response.write objRS2("TEKST") Response.write " " objRS2.MoveNext Wend objRS2 Close Set Conn2 = Nothing %> |
Tilbage til forsiden - klik her Skriv din kommentar herunder:  |
|