Lid |
|
Hallo mensen,
Hoewel dit geen ASP is komt de code bij vb 6 bijna overeen met asp.
Ik wil een verbinding maken met een database in VB6 maar dat wilt niet erg lukken.
Op internet heb ik al gezocht maar ik kom niet echt ver.
Dit is de code van asp
<%
'hier ze je de variabel
DIM objConn
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _
Server.MapPath ("database.mdb") & ";"
objConn.Open
DIM mySQL
mySQL = "SELECT * FROM Table1"
DIM objRS
Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.Open mySQL, objConn
%>
<% 'hier ze je de variabel DIM objConn Set objConn = Server.CreateObject("ADODB.Connection") objConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & _ Server.MapPath ("database.mdb") & ";" objConn.Open DIM mySQL mySQL = "SELECT * FROM Table1" DIM objRS Set objRS = Server.CreateObject("ADODB.Recordset") objRS.Open mySQL, objConn %>
|