Forums
This topic is locked
Microsoft VBScript runtime error '800a01a8'
Posted 11 Dec 2007 21:52:33
1
has voted
11 Dec 2007 21:52:33 James Chan posted:
Object required: ''/dropinfitness/Connections/connform.asp, line 12
this is my connection string
<%
' FileName="Connection_odbc_conn_dsn.htm"
' Type="ADO"
' DesigntimeType="ADO"
' HTTP="false"
' Catalog=""
' Schema=""
Dim MM_connfom_STRING
MM_connfom_STRING = "Driver={Microsoft Access Driver (*.mdb)};Dbq=d:\hosting\ohadevery\dropinfitness\form.mdb;Uid=;Pwd=;""
%>
there isn't even a line 12<b></b><u></u>
Replies
Replied 11 Dec 2007 23:36:44
11 Dec 2007 23:36:44 James Chan replied:
I took out the extra quote at the end and it still gives me the same problem
Replied 14 Dec 2007 17:07:36
14 Dec 2007 17:07:36 James Chan replied:
i changed something in the connection string and this is the new error i get:
Microsoft VBScript runtime error '800a01a8'
Object required: 'form'
/dropinfitness/clublocator.asp, line 24
this is my line 24 (its the last one)
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="Connections/connform.asp" -->
<%
Dim rsform
Dim rsform_cmd
Dim rsform_numRows
Set rsform_cmd = Server.CreateObject ("ADODB.Command"
rsform_cmd.ActiveConnection = MM_connform_STRING
rsform_cmd.CommandText = "SELECT * FROM fclub"
rsform_cmd.Prepared = true
Set rsform = rsform_cmd.Execute
rsform_numRows = 0
%>
<%
' *** Recordset Stats, Move To Record, and Go To Record: declare stats variables
Dim form_total
Dim form_first
Dim form_last
' set the record count
form_total = form.RecordCount
Microsoft VBScript runtime error '800a01a8'
Object required: 'form'
/dropinfitness/clublocator.asp, line 24
this is my line 24 (its the last one)
<%@LANGUAGE="VBSCRIPT"%>
<!--#include file="Connections/connform.asp" -->
<%
Dim rsform
Dim rsform_cmd
Dim rsform_numRows
Set rsform_cmd = Server.CreateObject ("ADODB.Command"
rsform_cmd.ActiveConnection = MM_connform_STRING
rsform_cmd.CommandText = "SELECT * FROM fclub"
rsform_cmd.Prepared = true
Set rsform = rsform_cmd.Execute
rsform_numRows = 0
%>
<%
' *** Recordset Stats, Move To Record, and Go To Record: declare stats variables
Dim form_total
Dim form_first
Dim form_last
' set the record count
form_total = form.RecordCount