<meta http-equiv="Content-Language" content="en-us">
<%
'Declare variables as OLE Objects.
Dim OraSession
Dim OraDatabase
Dim OraDynaset
'Create the OraSession Object.
Set OraSession = CreateObject("OracleInProcServer.XOraSession")
'Create the OraDatabase Object by opening a connection to Oracle.
'Be sure your own username and password to access your Oracle db
Set OraDatabase = OraSession.OpenDatabase("", "scott/tiger", _
Cint(0))
'Create the OraDynaset Object to execute SQL statement
Set OraDynaset = OraDatabase.DbCreateDynaset(_
"select * from mytable1", cint(0))
%>
<html>
<body background="myback.jpg">
<p><b><font size="6" face="Bookman Old Style" color="#FF0000">At last u got it
!!!</font></b></p>
<p><b><font face="Bookman Old Style">(If u r unable to see the updated result
then press <font color="#FF0000">F5</font> or <font color="#FF0000">Refresh</font>
button.)</font></b></p>
<table border=1 ID="Table1">
<%
Do While(OraDynaset.EOF = FALSE)
Response.Write("<tr><td>")
Response.write(OraDynaset.Fields("ID"))
Response.Write("</td><td>")
Response.write(OraDynaset.Fields("UserName"))
Response.Write("</td><td>")
Response.write(OraDynaset.Fields("Phone"))
Response.Write("</td><td>")
Response.write(OraDynaset.Fields("Email"))
Response.Write("</td></tr>")
OraDynaset.MoveNext
Loop
'remove OraSession
Set OraSession = Nothing
%>
</table>
</font></body></html>
i cant run the page to view tables and the error i get is:
Microsoft VBScript runtime (0x800A01AD)
ActiveX component can't create object: 'OracleInProcServer.XOraSession'
/asporacle/view.asp, line 10
Make sure your component (dll) 'OracleInProcServer.XOraSession' is registered correctly.
At this moment your webserver can't find and create an instance of it.
Bookmarks