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.CreateOb ject("ADODB.Con nection")
adoConn.Connect ionString = "Driver={Or acle ODBC Driver};"_
& "Dbq=EMSNTSRVR. WORLD;"_
& "Uid=username;" _
& "Pwd=passwo rd"
adoConn.open
Dim result
Set result = Server.CreateOb ject("ADODB.Rec ordset")
result.ActiveCo nnection = adoConn
result.Open "SELECT * FROM TALONSA.OPEN_PR OBLEMS", adoConn,
adOpenStatic
'While NOT result.EOF
' Response.Write result("PROBLEM _SID")
'Wend
response.write result.RecordCo unt
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.CreateOb ject("ADODB.Con nection")
adoConn.Connect ionString = "Driver={Or acle ODBC Driver};"_
& "Dbq=EMSNTSRVR. WORLD;"_
& "Uid=username;" _
& "Pwd=passwo rd"
adoConn.open
Dim result
Set result = Server.CreateOb ject("ADODB.Rec ordset")
result.ActiveCo nnection = adoConn
result.Open "SELECT * FROM TALONSA.OPEN_PR OBLEMS", adoConn,
adOpenStatic
'While NOT result.EOF
' Response.Write result("PROBLEM _SID")
'Wend
response.write result.RecordCo unt
result.Close
adoConn.Close
%>
Comment