Still not working

[Randhart]

hey there!

Well I tried somethig else but Is till get errors .. here's my revised code:

*********

aConnect = "Provider=SQLOLEDB.1;Persist Security Info=False;Data Source=DEV-SVR;Initial Catalog=Alchemy;User ID=Guest;Password=;ConnectionTimeout=10;"

Set conn = Server.CreateObject("ADODB.Connection")
conn.Mode = abModeReadWrite
conn.ConnectionString = aConnect
conn.Open "SELECT * from Users"

'Set objRec = Server.CreateObject("ADODB.Connection")


While not conn.EOF
Response.Write conn("Users_UID") & " "
Response.Write conn("Users_PWD") & " "
conn.MoveNext
Wend

conn.Close

*********

An here's the new Erroe

*********

Microsoft OLE DB Provider for SQL Server (0x80004005)
[DBNMPNTW]ConnectionOpen (CreateFile()).

thanks for your help

Try this:


aConnect = "Provider=SQLOLEDB.1;Persist Security Info=False;Data Source=DEV-SVR;Initial Catalog=Alchemy;User ID=Guest;Password=;ConnectionTimeout=10;"

Set conn = Server.CreateObject("ADODB.Connection")
Set rsResults = Server.CreateObject ("ADODB.Recordset")
conn.Mode = abModeReadWrite
conn.ConnectionString = aConnect
Set rsResults = conn.Execute( "SELECT * from Users")


While not rsResults.EOF
Response.Write rsResults("Users_UID") & " "
Response.Write rsResults("Users_PWD") & " "
rsResults.MoveNext
Wend

conn.Close
rsResults.Close

[Randhart]

Hey bubba

Thanks for the help ... it worked like a dream .. is see my fault!!!

Cheers!