conn.open "DSN=Test1;uid=System\user2;password="";" //code is <% Dim conn Dim rs strConn = "Driver={SQL Server};Server=127.0.0.1;Database=Test1;Trusted_Conection=Yes; Set cnt =Server.CreateObject(ADODB.Connection) cnt.ConnectionString=DNS.Test1 conn.open DSN=Test1;uid=SYSTEM\user2;password=""; strSQL = "select * from Test2" set rs = cnt.execute(strSQL) Do while not rs.eof response.Write "Name:" & rs(0) rs.movenext Loop %>
conn.open "DSN=Test1;uid=System\user2;password=;"
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)