J
JW
Hello. I am getting the error listed below on a page in my site, only there
is no line 149. (it stops at 125).
Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[Microsoft][ODBC Driver Manager] Data source name not found and no default
driver specified
/muskyfestcontestants.asp, line 149
The link to the page is:
http://www.willsnorthwoodsinn.com/muskyfestcontestants.asp
As you will see in the code listed below, I placed a response.write before
opening the connection to see the value. My dsn on my site (hosted with
godaddy) is ws-dmwnicom.data1 which works fine on other pages (ex:
http://www.willsnorthwoodsinn.com/willsupcomingevents.asp) that were
programmed with frontpage, so I know the dsn connection works. Thanks
Dim conn
Set conn = Server.CreateObject("ADODB.Connection")
conn.ConnectionString = "Dsn=ws-dmwnicom.data1"
Response.Write conn
conn.Open
Dim strSQL, rs, hlink, curpict, curgbd
strSQL = "Select contestant, contestantid, imagename, guestbartendingdate
from muskyasc"
set rs = Server.CreateObject("ADODB.Recordset")
rs.Open strSQL, conn
do while not rs.EOF
is no line 149. (it stops at 125).
Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[Microsoft][ODBC Driver Manager] Data source name not found and no default
driver specified
/muskyfestcontestants.asp, line 149
The link to the page is:
http://www.willsnorthwoodsinn.com/muskyfestcontestants.asp
As you will see in the code listed below, I placed a response.write before
opening the connection to see the value. My dsn on my site (hosted with
godaddy) is ws-dmwnicom.data1 which works fine on other pages (ex:
http://www.willsnorthwoodsinn.com/willsupcomingevents.asp) that were
programmed with frontpage, so I know the dsn connection works. Thanks
Dim conn
Set conn = Server.CreateObject("ADODB.Connection")
conn.ConnectionString = "Dsn=ws-dmwnicom.data1"
Response.Write conn
conn.Open
Dim strSQL, rs, hlink, curpict, curgbd
strSQL = "Select contestant, contestantid, imagename, guestbartendingdate
from muskyasc"
set rs = Server.CreateObject("ADODB.Recordset")
rs.Open strSQL, conn
do while not rs.EOF