Nedenstående kode giver denne fejl:
Microsoft OLE DB Provider for ODBC Drivers error '80004005'
[Microsoft][ODBC Driver Manager] Data source name not found and no default
driver specified
Jeg prøver at trække data ud af en database, som ikke ligger samme sted som
min asp fil. Forudsat at alle "X'erne" bliver erstattet med de korrekte
ting, er der så andre fejl?
<% @LANGUAGE = VBScript %>
<%
Option Explicit
Response.Expires = 0
Dim objConn, objRS, strQuery
Dim strConnection
Set objConn = Server.CreateObject("ADODB.Connection")
strConnection = "DSN=XXX;Database=XXX;"
strConnection = strConnection & "UID=XXX;PWD=XXX;Server=IPXXX;"
objConn.Open strConnection
strQuery = "SELECT Header, Text FROM qry_ProductDataValues WHERE
ProductTypeID = 2"
Set objRS = objConn.Execute(strQuery)
%>
<HTML>
<BODY>
Her er indholdet: <br><br>
<%
While Not objRS.EOF
Response.Write objRS("Header") & " ("
Response.Write objRS("Text") & ")<br>"
objRS.MoveNext
Wend
objRS.close
objConn.close
Set objRS = Nothing
Set objConn = Nothing
%>
</BODY>
</HTML>
--
MVH
Thomas
http://home8.inet.tele.dk/bcp/tj/ - følg med på vores webcam...
http://users.cybercity.dk/~bkb3175/ - en dansk Flash4 tutorial