Tuesday, June 9, 2009

ASP - Create dsn less connection to ms access | ms access database dsn less connection

<% Set MyConn = Server.CreateObject("ADODB.Connection")
ConnectionString = "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" & server.mappath("your.mdb") & ";"
'ConnectionString = ConnectionString & "Password=YourPassword;"
MyConn.Open ConnectionString
SQL_query = "SELECT * FROM user"
Set RS = MyConn.Execute(SQL_query)
IF (RS.EOF) then response.write("nothing")
WHILE NOT RS.EOF %>
<li><%=RS("Name")%>
<% RS.MoveNext
WEND
%>
</li>

No comments: