D
dhagel
Hello,
I am trying to create an .ASP page from an Access table. I would like
to have web site visitors be able to view current data. I have
exported the table as an ASP page, given the Data Source name, the
username and password, the Server URL and a session timeout. I have
created the ODBC connection on the webserver with the same Data Source
name and username/password. When I publish the .ASP page and try to
view it I get an error:
Microsoft VBScript runtime error '800a01a8'
Object required: ''
/ahfl/arenas.asp, line 7
Please help. I have read and read but cannot figure out what I am
doing wrong. Below, I have included the first 29 lines of code in the
..ASP page
Thank you in advance,
Darren
<HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type"
CONTENT="text/html;charset=windows-1252">
<TITLE>Barons</TITLE>
</HEAD>
<BODY>
<%
Session.timeout = 5
If IsObject(Session("AHFL_conn")) Then
Set conn = Session("AHFL_conn")
Else
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "AHFL","XXX","XXX"
Set Session("AHFL_conn") = conn
End If
%>
<%
If IsObject(Session("Barons_rs")) Then
Set rs = Session("Barons_rs")
Else
sql = "SELECT Players.[Last Name], Players.[First Name],
Players.Position, Players.Team, Players.Salary, Players.Contract FROM
Players WHERE (((Players.Team)=""Barons"")) "
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn, 3, 3
If rs.eof Then
rs.AddNew
End If
Set Session("Barons_rs") = rs
End If
%>
I am trying to create an .ASP page from an Access table. I would like
to have web site visitors be able to view current data. I have
exported the table as an ASP page, given the Data Source name, the
username and password, the Server URL and a session timeout. I have
created the ODBC connection on the webserver with the same Data Source
name and username/password. When I publish the .ASP page and try to
view it I get an error:
Microsoft VBScript runtime error '800a01a8'
Object required: ''
/ahfl/arenas.asp, line 7
Please help. I have read and read but cannot figure out what I am
doing wrong. Below, I have included the first 29 lines of code in the
..ASP page
Thank you in advance,
Darren
<HTML>
<HEAD>
<META HTTP-EQUIV="Content-Type"
CONTENT="text/html;charset=windows-1252">
<TITLE>Barons</TITLE>
</HEAD>
<BODY>
<%
Session.timeout = 5
If IsObject(Session("AHFL_conn")) Then
Set conn = Session("AHFL_conn")
Else
Set conn = Server.CreateObject("ADODB.Connection")
conn.open "AHFL","XXX","XXX"
Set Session("AHFL_conn") = conn
End If
%>
<%
If IsObject(Session("Barons_rs")) Then
Set rs = Session("Barons_rs")
Else
sql = "SELECT Players.[Last Name], Players.[First Name],
Players.Position, Players.Team, Players.Salary, Players.Contract FROM
Players WHERE (((Players.Team)=""Barons"")) "
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn, 3, 3
If rs.eof Then
rs.AddNew
End If
Set Session("Barons_rs") = rs
End If
%>