Jag vill ansluta till en mySQL-databas som ligger på en annan server via asp. Jag använder följande kod:
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Driver={mySQL};Server=server.ngt.com;Port=3306;Option=131072;Stmt=;Database=1979;Uid=användare;Pwd=losen;"
Set RecSet = Server.CreateObject("ADODB.Connection")
SQL = "SELECT * FROM ibf_members ORDER BY ID DESC"
RecSet.Open SQL, Connect, AdOpenDynamic
Do Until RecSet.EOF
Response.Write RecSet("name") & "<br>"
RecSet.MoveNext
Loop
%>
Då får jag följande fel:
---------------------------------
ADODB.Connection.1 error '80004005'
SQLState: IM002
Native Error Code: 0
[INTERSOLV][ODBC lib] Data source name not found and no default driver specified
/temp/genomsnitt.asp, line 7
---------------------------------
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Driver={mySQL};Server=server.ngt. com;Port=3306;Option=131072;Stmt=;Database=1979;Uid=användar
e;Pwd=losen;"
Set RecSet = Server.CreateObject("ADODB.[b]Recordset[/b]")
SQL = "SELECT * FROM ibf_members ORDER BY ID DESC"
RecSet.Open SQL, Connect, AdOpenDynamic
Do Until RecSet.EOF
Response.Write RecSet("name") & "<br>"
RecSet.MoveNext
Loop
%>
Eller så kan du köra med ett aningen lättare sätt, om du bara ska lista posterna, och inte göra något "speciellt" med dem:
<%
Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open "Driver={mySQL};Server=server.ngt. com;Port=3306;Option=131072;Stmt=;Database=1979;Uid=användar
e;Pwd=losen;"
SQL = "SELECT * FROM ibf_members ORDER BY ID DESC"
Set RecSet = Connect.Execute(SQL)
Do Until RecSet.EOF
Response.Write RecSet("name") & "<br>"
RecSet.MoveNext
Loop
%>
