M
mike
Ok, I'll admit I'm VERY new to ASP but I simply cannot seem to get
this to work. The problem is probably obvious but I just can't seem
to find it. I'm trying to query an Oracle DB on another server but
none of my queries seem to work. What happens is that ASP/IIS times
out. In an effort to see what's really happening, I put the following
code in to see how many records were being returned by the query. In
EVERY CASE, the number of records is -1. I've even tried using
something bulletproof for my query like "SELECT SYSDATE FROM DUAL" I
know that the query shown here contains the correct table and field
names. Any help would be greatly appreciated.
In the following, the ASP/IIS times out if the "While Not..." is left
UNCOMMENTED. The line to print the recordcount was just added to
further define the problem.
<%
Dim adoConn
set adoConn = Server.CreateObject("ADODB.Connection")
adoConn.ConnectionString = "Driver={Oracle ODBC Driver};"_
& "Dbq=EMSNTSRVR.WORLD;"_
& "Uid=username;"_
& "Pwd=password"
adoConn.open
Dim result
Set result = Server.CreateObject("ADODB.Recordset")
result.ActiveConnection = adoConn
result.Open "SELECT * FROM TALONSA.OPEN_PROBLEMS", adoConn,
adOpenStatic
'While NOT result.EOF
' Response.Write result("PROBLEM_SID")
'Wend
response.write result.RecordCount
result.Close
adoConn.Close
%>
this to work. The problem is probably obvious but I just can't seem
to find it. I'm trying to query an Oracle DB on another server but
none of my queries seem to work. What happens is that ASP/IIS times
out. In an effort to see what's really happening, I put the following
code in to see how many records were being returned by the query. In
EVERY CASE, the number of records is -1. I've even tried using
something bulletproof for my query like "SELECT SYSDATE FROM DUAL" I
know that the query shown here contains the correct table and field
names. Any help would be greatly appreciated.
In the following, the ASP/IIS times out if the "While Not..." is left
UNCOMMENTED. The line to print the recordcount was just added to
further define the problem.
<%
Dim adoConn
set adoConn = Server.CreateObject("ADODB.Connection")
adoConn.ConnectionString = "Driver={Oracle ODBC Driver};"_
& "Dbq=EMSNTSRVR.WORLD;"_
& "Uid=username;"_
& "Pwd=password"
adoConn.open
Dim result
Set result = Server.CreateObject("ADODB.Recordset")
result.ActiveConnection = adoConn
result.Open "SELECT * FROM TALONSA.OPEN_PROBLEMS", adoConn,
adOpenStatic
'While NOT result.EOF
' Response.Write result("PROBLEM_SID")
'Wend
response.write result.RecordCount
result.Close
adoConn.Close
%>