What's wrong with this? I get a message saying that the data source name not found and not default driver not specified.
Dim x As New rdoConnection
Dim y As rdoQuery
x.Connect = "PROVIDER=SQLOLEDB;" & _
"DSN=LocalServer;DATABASE=viewer;" & _
"UID=sa;PWD=;"
x.EstablishConnection
Set y = x.CreateQuery("Query1", "SELECT * FROM GraphBenefitVsCost"
y.CursorType = rdOpenKeyset
y.LockType = rdConcurRowver
x.Query1
Set MSRDC1.Resultset = x.LastQueryResults
Ladyhawk.
** ASP/VB/Java Programmer **
Dim x As New rdoConnection
Dim y As rdoQuery
x.Connect = "PROVIDER=SQLOLEDB;" & _
"DSN=LocalServer;DATABASE=viewer;" & _
"UID=sa;PWD=;"
x.EstablishConnection
Set y = x.CreateQuery("Query1", "SELECT * FROM GraphBenefitVsCost"
y.CursorType = rdOpenKeyset
y.LockType = rdConcurRowver
x.Query1
Set MSRDC1.Resultset = x.LastQueryResults
Ladyhawk.
** ASP/VB/Java Programmer **