TrevorMoore
Programmer
I'm trying to use the IBM Informix UniVerse ODBC Driver to connect to the Informix server via ASP, and I cannot figure out the connection string. Can anyone give me a hand?
Here's what I have. Please note that the MySQL Connection works perfectly.
Here’s the error I get:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E4D)
[Ardent][UVODBC][0301892]Error ID: 108 Severity: SEVERE Facility: LINKERR - Connection refused
Here’s the ASP code I’m using:
<%
'---------------------------------------------
'- Database Library Functions - Include File -
'---------------------------------------------
' Global Variables and Constants
dim DSN_admin, DSN_informix
DSN_admin = "driver={MySQL};server=localhost;uid=admin;password=XXXXXXXX;database=tlg"
DSN_informix = "driver={Informix UniVerse ODBC Driver};server=xxx.xxx.xxx.xxx;uid=xxxxxxxx;pwd=XXXXXXXX;database=mb"
Sub G_OpenRecordset(objRS, objDSN, strSQL)
set objRS = Server.CreateObject("ADODB.Recordset"
objRS.ActiveConnection = objDSN
objRS.Source = strSQL
objRS.Open()
End Sub
sub G_ExecRecordset(objDSN, strSQL)
Dim objCon
set objCon = Server.CreateObject("ADODB.Connection"
objCon.open objDSN
objCon.execute strSQL
objCon.close
End Sub
%>
Here's what I have. Please note that the MySQL Connection works perfectly.
Here’s the error I get:
Microsoft OLE DB Provider for ODBC Drivers (0x80040E4D)
[Ardent][UVODBC][0301892]Error ID: 108 Severity: SEVERE Facility: LINKERR - Connection refused
Here’s the ASP code I’m using:
<%
'---------------------------------------------
'- Database Library Functions - Include File -
'---------------------------------------------
' Global Variables and Constants
dim DSN_admin, DSN_informix
DSN_admin = "driver={MySQL};server=localhost;uid=admin;password=XXXXXXXX;database=tlg"
DSN_informix = "driver={Informix UniVerse ODBC Driver};server=xxx.xxx.xxx.xxx;uid=xxxxxxxx;pwd=XXXXXXXX;database=mb"
Sub G_OpenRecordset(objRS, objDSN, strSQL)
set objRS = Server.CreateObject("ADODB.Recordset"
objRS.ActiveConnection = objDSN
objRS.Source = strSQL
objRS.Open()
End Sub
sub G_ExecRecordset(objDSN, strSQL)
Dim objCon
set objCon = Server.CreateObject("ADODB.Connection"
objCon.open objDSN
objCon.execute strSQL
objCon.close
End Sub
%>