Hi, All
I am getting a weird problem accessing data from an Oracle 8.1.7 Database. The SQL query only returns the ColumnHeaders, but no data (no error message either)! Even more weird, the same script (with the obvious modifications) runs perfectly in SQLServer 7.0. I would greatly appreciate any insight that anyone has to offer. Below are the relevent details.
OS: WIN2K
Server: IIS 5.0
Database: Oracle 8.1.7
Table: Desination [DestinationID(CHAR(3)),Country(VARCHAR(20))]
Script: See below
<%@ Language=VBScript %>
<html>
<head>
<title>Oracle Test</title>
</head>
<body>
<center>
<%
Set objConn = Server.CreateObject("ADODB.Connection"
objConn.Open "dsn=OraDev;uid=scott;pwd=tiger;"
Set objRs = objConn.Execute("SELECT * FROM Destination"
Response.Write "<table border=1 cellpadding=4>"
Response.Write "<tr>"
For I = 0 To objRS.Fields.Count - 1
Response.Write "<td><b>" & objRS(I).Name & "</b></td>"
Next
Response.Write "</tr>"
Do While Not objRS.EOF
Response.Write "<tr>"
For I = 0 To objRS.Fields.Count - 1
Response.Write "<td>" & objRS(I) & "</td>"
Next
Response.Write "</tr>"
objRS.MoveNext
Loop
Response.Write "</table>"
objRs.Close
objConn.Close
%>
</center>
</body>
</html>
I am getting a weird problem accessing data from an Oracle 8.1.7 Database. The SQL query only returns the ColumnHeaders, but no data (no error message either)! Even more weird, the same script (with the obvious modifications) runs perfectly in SQLServer 7.0. I would greatly appreciate any insight that anyone has to offer. Below are the relevent details.
OS: WIN2K
Server: IIS 5.0
Database: Oracle 8.1.7
Table: Desination [DestinationID(CHAR(3)),Country(VARCHAR(20))]
Script: See below
<%@ Language=VBScript %>
<html>
<head>
<title>Oracle Test</title>
</head>
<body>
<center>
<%
Set objConn = Server.CreateObject("ADODB.Connection"
objConn.Open "dsn=OraDev;uid=scott;pwd=tiger;"
Set objRs = objConn.Execute("SELECT * FROM Destination"
Response.Write "<table border=1 cellpadding=4>"
Response.Write "<tr>"
For I = 0 To objRS.Fields.Count - 1
Response.Write "<td><b>" & objRS(I).Name & "</b></td>"
Next
Response.Write "</tr>"
Do While Not objRS.EOF
Response.Write "<tr>"
For I = 0 To objRS.Fields.Count - 1
Response.Write "<td>" & objRS(I) & "</td>"
Next
Response.Write "</tr>"
objRS.MoveNext
Loop
Response.Write "</table>"
objRs.Close
objConn.Close
%>
</center>
</body>
</html>
