How does one connect to Oracle from an ASP page?
Submitted by admin on Sun, 2005-11-06 03:19.
One can connect to Oracle from ASP Pages using the Oracle ODBC driver or OO4O (Oracle Objects for OLE) calls.
Look at this OO4O example:
<%
Set OraSession = Server.CreateObject("OracleInProcServer.XOraSession")
Set OraDatabase = OraSession.DbOpenDatabase("connect_str.world", "hr/hr",cint(0))
Response.Write "OO4O Version: " & OraSession.OIPVersionNumber & " " & _
"Username: " & OraDatabase.connect & " " & _
"Database Name: " & OraDatabase.DatabaseName & " " & _
"Oracle Version: " & OraDatabase.RDBMSVersion & " "
Set osRecordSet = OraDatabase.DbCreateDynaset("SELECT TNAME FROM TAB", cint(0))
Response.write("<H1>Tables:</H1>")
Do While(osRecordset.EOF = FALSE)
Response.write(osRecordset.Fields("TNAME") & " ")
osRecordSet.MoveNext
Loop
%>
The following example demonstrated ODBC connectivity:
<%
Set OraDatabase = Server.CreateObject("ADODB.Connection")
OraDatabase.Open "dsn=OracleDSN;uid=userid;pwd=password;"
Set osRecordSet = OraDatabase.Execute("SELECT * FROM EMPLOYEE")
Response.Write "<table border=1 cellpadding=4>"
Response.Write "<tr>"
For I = 0 To osRecordSet.Fields.Count - 1
Response.Write "<td>" & osRecordSet(I).Name & "</td>"
Next
Response.Write "</tr>"
Do While Not osRecordSet.EOF
Response.Write "<tr>"
For I = 0 To osRecordSet.Fields.Count - 1
Response.Write "<td>" & osRecordSet(I) & "</td>"
Next
Response.Write "</tr>"
osRecordSet.MoveNext
Loop
Response.Write "</table>"
osRecordSet.Close
OraDatabase.Close
%>»
- Login to post comments

