Wrox Home  
Search P2P Archive for: Go

  Return to Index  

access_asp thread: RE: This error is wrecking my head


Message #1 by "Sean Dillon" <sdillon@b...> on Fri, 3 May 2002 16:35:03 +0100
I keep getting this error. the error is:
Microsoft VBScript runtime error '800a000d' 

Type mismatch: 'rs' 

/credit.asp, line 236 

Line 236 is:
 <input type="hidden" name="Recordid" value="<%=rs("SheetNo")%>">

Can anyone explain to me why i keep getting this error??
Im would very grateful for any help that anyone gives me.
Thanx
Message #2 by "Paul Winter" <p.winter@s...> on Fri, 3 May 2002 17:11:16 +0100
I think it should be rst("Sheetno")

Paul

----- Original Message -----
From: "Sean Dillon" <sdillon@b...>
To: "Access ASP" <access_asp@p...>
Sent: Friday, May 03, 2002 4:35 PM
Subject: [access_asp] RE: This error is wrecking my head


> I keep getting this error. the error is:
> Microsoft VBScript runtime error '800a000d'
>
> Type mismatch: 'rs'
>
> /credit.asp, line 236
>
> Line 236 is:
>  <input type="hidden" name="Recordid" value="<%=rs("SheetNo")%>">
>
> Can anyone explain to me why i keep getting this error??
> Im would very grateful for any help that anyone gives me.
> Thanx
>
>

Message #3 by "Paul Winter" <P.Winter@s...> on Fri, 3 May 2002 19:01:19 +0100
Please ignore previous message - a very long and hard week :-)

Paul

-----Original Message-----
From: Paul Winter [mailto:p.winter@s...] 
Sent: 03 May 2002 17:11
To: Access ASP
Subject: [access_asp] RE: This error is wrecking my head

I think it should be rst("Sheetno")

Paul

----- Original Message -----
From: "Sean Dillon" <sdillon@b...>
To: "Access ASP" <access_asp@p...>
Sent: Friday, May 03, 2002 4:35 PM
Subject: [access_asp] RE: This error is wrecking my head


> I keep getting this error. the error is:
> Microsoft VBScript runtime error '800a000d'
>
> Type mismatch: 'rs'
>
> /credit.asp, line 236
>
> Line 236 is:
>  <input type="hidden" name="Recordid" value="<%=rs("SheetNo")%>">
>
> Can anyone explain to me why i keep getting this error??
> Im would very grateful for any help that anyone gives me. Thanx
>
> ---
> Change your mail options at http://p2p.wrox.com/manager.asp or to 
> unsubscribe send a blank email to
>



Message #4 by "Sean Dillon" <sdillon@b...> on Tue, 7 May 2002 10:58:51 +0100
I am getting this error:
ADODB.Recordset error '800a0cc1'
Item cannot be found in the collection corresponding to the requested name
or ordinal.

/credit.asp, line 493

Line 493 is:
RecSheetNo = rs("SheetNo")

Can anyone please help me.

Message #5 by "Charles Mabbott" <aa8vs@m...> on Tue, 07 May 2002 06:15:19 -0400
Without seeing any of the code, the last time I got an error like
this I had not executed the SQL command and the variable [my case]
was not set.  I moved the command to after execution of the SQL
statement and all [relatively speaking] was right with the world.
Regards,
Chuck

>From: "Sean Dillon" <sdillon@b...>
>Reply-To: "Access ASP" <access_asp@p...>
>To: "Access ASP" <access_asp@p...>
>Subject: [access_asp] RE: This error is wrecking my head
>Date: Fri, 3 May 2002 16:35:03 +0100
>
>I keep getting this error. the error is:
>Microsoft VBScript runtime error '800a000d'
>
>Type mismatch: 'rs'
>
>/credit.asp, line 236
>
>Line 236 is:
>  <input type="hidden" name="Recordid" value="<%=rs("SheetNo")%>">
>
>Can anyone explain to me why i keep getting this error??
>Im would very grateful for any help that anyone gives me.
>Thanx
>


_________________________________________________________________
Join the world?s largest e-mail service with MSN Hotmail. 
http://www.hotmail.com

Message #6 by "Sean Dillon" <sdillon@b...> on Tue, 7 May 2002 11:32:28 +0100
Hi Charles,
I tried that but that didb't work.
Heres my code:
<%
	 conn.execute(SQLstmt)

	 Response.Write "Operation Complete<BR><A HREF=""credit.asp"">Home</A>"

	'If the QueryString Actionvar isn't set to anything, generate the list of
items
	ELSE
	 SQLstmt = "SELECT * FROM credit"
	 %>
</div>
<HR>
SQL statement: <%=SQLstmt%>
<HR><div align="center">
<font color="Blue" size="5"><img id="Picture3" height=77 width=156
src="clip_image002.gif" border=0 nofinside="~!   ~!" align="left" >BWG
Foods Ltd.<br>
Central Billing<br>
Customer Query Booklet</font><br>
<br>
<%
	 Set rs = conn.Execute(SQLstmt)
	 %>
	 <TABLE BORDER=0>
</div>
<TR>
  <p>
  <TD><CENTER><B><font size="2">SheetNo</font></B></CENTER></TD>
  <TD><CENTER><B><font size="2">Customer</font></B></CENTER></TD>
  <TD><CENTER><B><font size="2">Address</font></B></CENTER></TD>
  <TD><CENTER><B><font size="2">W/house A/C No</font></B></CENTER></TD>
  <TD><CENTER><B><font size="2">Invoice Date</font></B></CENTER></TD>
  <TD><CENTER><B><font size="2">Ballyshannon </font></B></CENTER></TD>
  <TD><CENTER><B><font size="2">Dublin</font></B></CENTER></TD>
  <TD><CENTER><B><font size="2">Limerick</font></B> </CENTER></TD>
  <TD><CENTER><B><font size="2">InvoiceNo.</font></B> </CENTER></TD>
  <TD><CENTER><B><font size="2">Invoice Week No</font></B> </CENTER></TD>
  <TD><CENTER><B><font size="2">Pack</font></B> </CENTER></TD>
  <TD><CENTER><B><font size="2">Size</font></B> </CENTER></TD>
  <TD><CENTER><B><font size="2">Description</font></B> </CENTER></TD>
  <TD><CENTER><B><font size="2">Sell by Date</font></B> </CENTER></TD>
  <TD><CENTER><B><font size="2">Qty.</font></B></CENTER></TD>
  <TD><CENTER><B><font size="2">ProductCode</font></B></CENTER></TD>
  <TD><CENTER><B><font size="2">Retailer</font></B></CENTER></TD>
  <TD><CENTER><B><font size="2">R Date</font></B></CENTER></TD>
  <TD><CENTER><B><font size="2">Driver's Name</font></B></CENTER></TD>
  <TD><CENTER><B><font size="2">D Date</font></B></CENTER></TD>
  <TD COLSPAN=2><CENTER><B><font size="2">Modify</font></B></CENTER></TD>

  <%
	 x=0
	 DO WHILE NOT rs.EOF
	  x=x+1
	  RecSheetNo = rs("SheetNo")
	  Cust = rs("Cust")
	  Address1 = rs("Address1")
	  Address2 = rs("Address2")
	  WhAcNo = rs("WhAcNo")
	  InvoiceDate = rs("InvoiceDate")
	  Bally = rs("Bally")
	  Dub = rs("Dub")
	  Lim = rs("Lim")
	  InvoiceNo = rs("InvoiceNo")
	  InvoiceWkNo = rs("InvoiceWkNo")
      Reason= rs("Reason")
	  Pack1 = rs("Pack1")
	  Size1 = rs("Size1")
	  Desc1 = rs("Desc1")
	  SellBy1 = rs("SellBy1")
	  Qty1 = rs("Qty1")
	  ProductCode1 = rs("ProductCode1")
	  Retailer = rs("Retailer")
	  RDate = rs("RDate")
	  DriversSign = rs("DriversSign")
	  DDate = rs("DDate")
	  WTMan = rs("WTMan")
	  WDate = rs("WDate")
	  Input = rs("Input")
	  IDate = rs("IDate")
	  Authorised = rs("Authorised")
	  ADate = rs("ADate")
	  BStock = rs("BStock")
	  DStock = rs("DStock")
	  ODate = rs("ODate")
	  PDifference = rs("PDifference")
	  Carraige = rs("Carraige")
	  Short = rs("Short")
	  Quality = rs("Quality")
	  	  %>
<TR>
  <TD><B><%=RecSheetNo%></B></TD>
  <TD><%=Customer%></TD>
  <TD><%=Address%></TD>
  <TD><%=WhAcNo%></TD>
  <TD><%=InvoiceDate%></TD>
  <TD><%=Bally%></TD>
  <TD><%=Dub%></TD>
  <TD><%=Lim%></TD>
  <TD><%=InvoiceNo%></TD>
  <TD><%=InvoiceWkNo%></TD>
  <TD><%=Reason%></TD>
  <TD><%=Pack1%></TD>
  <TD><%=Size1%></TD>
  <TD><%=Desc1%></TD>
  <TD><%=SellBy1%></TD>
  <TD><%=Qty1%></TD>
  <TD><%=ProductCode1%></TD>


  <TD><CENTER><%=Retailer%></CENTER></TD>

  <TD><CENTER><%=RDate%></CENTER></TD>

  <TD><CENTER><%=DriversSign%></CENTER></TD>

  <TD><CENTER><%=DDate%></CENTER></TD>

  <TD><CENTER><%=WTMan%></CENTER></TD>

  <TD><CENTER><%=WDate%></CENTER></TD>

  <TD><CENTER><%=Input%></CENTER></TD>

  <TD><CENTER><%=IDate%></CENTER></TD>

  <TD><CENTER><%=Authorised%></CENTER></TD>

  <TD><CENTER><%=ADate%></CENTER></TD>

  <TD><CENTER><%=BStock%></CENTER></TD>

  <TD><CENTER><%=DStock%></CENTER></TD>

  <TD><CENTER><%=ODate%></CENTER></TD>

  <TD><CENTER><%=PDifference%></CENTER></TD>

  <TD><CENTER><%=Carraige%></CENTER></TD>

  <TD><CENTER><%=Short%></CENTER></TD>

  <TD><CENTER><%=Quality%></CENTER></TD>

Hope this helps you abit.

Cheers,
Sean



-----Original Message-----
From: Charles Mabbott [mailto:aa8vs@m...]
Sent: 07 May 2002 11:15
To: Access ASP
Subject: [access_asp] RE: This error is wrecking my head



Without seeing any of the code, the last time I got an error like
this I had not executed the SQL command and the variable [my case]
was not set.  I moved the command to after execution of the SQL
statement and all [relatively speaking] was right with the world.
Regards,
Chuck

>From: "Sean Dillon" <sdillon@b...>
>Reply-To: "Access ASP" <access_asp@p...>
>To: "Access ASP" <access_asp@p...>
>Subject: [access_asp] RE: This error is wrecking my head
>Date: Fri, 3 May 2002 16:35:03 +0100
>
>I keep getting this error. the error is:
>Microsoft VBScript runtime error '800a000d'
>
>Type mismatch: 'rs'
>
>/credit.asp, line 236
>
>Line 236 is:
>  <input type="hidden" name="Recordid" value="<%=rs("SheetNo")%>">
>
>Can anyone explain to me why i keep getting this error??
>Im would very grateful for any help that anyone gives me.
>Thanx
>


_________________________________________________________________
Join the world?s largest e-mail service with MSN Hotmail.
http://www.hotmail.com



Message #7 by "Ken Schaefer" <ken@a...> on Wed, 8 May 2002 15:48:46 +1000
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
From: "Sean Dillon" <sdillon@b...>
Subject: [access_asp] RE: This error is wrecking my head


: I am getting this error:
: ADODB.Recordset error '800a0cc1'
: Item cannot be found in the collection corresponding to the requested name
: or ordinal.
:
: /credit.asp, line 493
:
: Line 493 is:
: RecSheetNo = rs("SheetNo")

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

www.adopenstatic.com/faq/800a0cc1.asp

I suggest you explicitly name the fields that you want to use in your SELECT
statement instead of using SELECT * (which is a bad idea).
You can find out what fields are in your recordset by doing the following:

<%
For Each objField in objRS.Fields
    Response.Write(objField.Name & "<br>")
Next
Response.End
%>

Cheers
Ken


Message #8 by "Sean Dillon" <sdillon@b...> on Thu, 9 May 2002 09:46:43 +0100
Thanks for your help Ken. I discovered what my error was. Originally i had
planned only to use one text box for the address but decided to change it to
3text boxes for it. When i done that i forgot to add 2 extra fields into my
database. I hate making simple errors like that which are so easily
overlooked.



-----Original Message-----
From: Ken Schaefer [mailto:ken@a...]
Sent: 08 May 2002 06:49
To: Access ASP
Subject: [access_asp] RE: This error is wrecking my head


~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
From: "Sean Dillon" <sdillon@b...>
Subject: [access_asp] RE: This error is wrecking my head


: I am getting this error:
: ADODB.Recordset error '800a0cc1'
: Item cannot be found in the collection corresponding to the requested name
: or ordinal.
:
: /credit.asp, line 493
:
: Line 493 is:
: RecSheetNo = rs("SheetNo")

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

www.adopenstatic.com/faq/800a0cc1.asp

I suggest you explicitly name the fields that you want to use in your SELECT
statement instead of using SELECT * (which is a bad idea).
You can find out what fields are in your recordset by doing the following:

<%
For Each objField in objRS.Fields
    Response.Write(objField.Name & "<br>")
Next
Response.End
%>

Cheers
Ken




Message #9 by "Sean Dillon" <sdillon@b...> on Thu, 9 May 2002 11:44:55 +0100
I am getting this error everytime i try to do an update.
The error is:
Microsoft OLE DB Provider for ODBC Drivers error '80040e14'

[Microsoft][ODBC Microsoft Access Driver] Syntax error in UPDATE statement.

/credit.asp, line 447

And the code im using is:
IF Actionvar="update" THEN
  IF Len(TRIM(Request.Form("flag"))) = 0 THEN
     SQLstmt = "SELECT * FROM credit WHERE SheetNo ="&
Request.QueryString("Recid")
  %>
<HR>
SQL statement: <%=SQLstmt%>
<HR>
<%
  Set rs = conn.Execute(SQLstmt)
  If Request.Form("BStock") = 0 Then
   BStock = "No"
 Else
  BStock = "Yes"
 End If

 If Request.Form("DStock") = 0 Then
  DStock = "No"
 Else
     DStock = "Yes"
 End If

    If Request.Form("ODate") = 0 Then
        ODate = "No"
    Else
        ODate = "Yes"
    End If

 If Request.Form("PDifference") = 0 Then
  PDifference = "No"
 Else
  PDifference = "Yes"
 End If

 If Request.Form("Carraige") = 0 Then
  Carraige = "No"
 Else
  Carraige = "Yes"
 End If

 If Request.Form("Short") = 0 Then
  Short = "No"
 Else
  Short = "Yes"
 End If

 If Request.Form("Quality") = 0 Then
  Quality = "No"
 Else
  Quality = "Yes"
 End If
  IF NOT RS.EOF THEN
  %>
Update
<HR>
<FORM METHOD="post" ACTION="credit.asp?Actionvar=update" >

<%
 If rs("BStock") = "-1" Then
  Response.Write "<input type=""checkbox"" name=""BStock"" checked>"
 Else
  Response.Write "<input type=""checkbox"" name=""BStock"">"
 End If
 %>
     <BR>
    <B>Damage Stock:</B>
      <%
 If rs("DStock") = "-1" Then
  Response.Write "<input type=""checkbox"" name=""DStock"" checked>"
 Else
  Response.Write "<input type=""checkbox"" name=""DStock"">"
 End If
 %>
      <BR>
      <B>Out of Date:</B>
      <%
 If rs("ODate") = "-1" Then
  Response.Write "<input type=""checkbox"" name=""ODate"" checked>"
 Else
  Response.Write "<input type=""checkbox"" name=""ODate"">"
 End If
 %>
     <BR>
      <B>Price Difference:</B>
      <%
 If rs("PDifference") = "-1" Then
  Response.Write "<input type=""checkbox"" name=""PDifference"" checked>"
 Else
  Response.Write "<input type=""checkbox"" name=""PDifference"">"
 End If
 %>
     <BR>
      <B>Carraige:</B>
      <%
 If rs("Carraige") = "-1" Then
  Response.Write "<input type=""checkbox"" name=""Carraige"" checked>"
 Else
  Response.Write "<input type=""checkbox"" name=""Carraige"">"
 End If
 %>
     <BR>
      <B>Short Delivery:</B>
      <%
 If rs("Short") = "-1" Then
  Response.Write "<input type=""checkbox"" name=""Short"" checked>"
 Else
  Response.Write "<input type=""checkbox"" name=""Short"">"
 End If
 %>
     <BR>
      <B>Quality:</B>
      <%
 If rs("Quality") = "-1" Then
  Response.Write "<input type=""checkbox"" name=""Quality"" checked>"
 Else
  Response.Write "<input type=""checkbox"" name=""Quality"">"
 End If
 %>
    <BR>
      <INPUT TYPE="hidden" NAME="flag" VALUE="2">
   <INPUT TYPE="hidden" NAME="Recordid" VALUE="<%=rs("SheetNo")%>">
      <INPUT TYPE="submit" VALUE="Update">
    </p>
  </div>
</FORM>
<p>&nbsp;</p>
<p>
  <%
  rs.MoveNext
  rs.Close
  END IF
 ELSEIF Request.Form("flag")="2" THEN
  SQLstmt = "UPDATE credit SET "
  SQLstmt = SQLstmt & "W&TMan='" & TRIM(Request.Form("W&TMan")) & "',"
  SQLstmt = SQLstmt & "WDate='" & TRIM(Request.Form("WDate")) & "',"
  SQLstmt = SQLstmt & "Input='" & TRIM(Request.Form("Input")) & "',"
  SQLstmt = SQLstmt & "IDate='" & TRIM(Request.Form("IDate")) & "',"
  SQLstmt = SQLstmt & "Authorised='" & TRIM(Request.Form("Authorised")) &
"',"'  SQLstmt = SQLstmt & "ADate='" & TRIM(Request.Form("ADate")) & "',"
  SQLstmt = SQLstmt & "BStock='" & TRIM(BStock) & "',"
  SQLstmt = SQLstmt & "DStock='" & TRIM(DStock) & "',"
  SQLstmt = SQLstmt & "ODate='" & TRIM(ODate) & "', "
     SQLstmt = SQLstmt & "PDifference='" & TRIM(PDifference) & "', "
     SQLstmt = SQLstmt & "Carraige='" & TRIM(Carraige) & "', "
     SQLstmt = SQLstmt & "Short='" & TRIM(Short) & "', "
     SQLstmt = SQLstmt & "Quality='" & TRIM(Quality) & "' "
  SQLstmt = SQLstmt & "WHERE SheetNo=" & TRIM(Request.Form("Recordid"))
  %>
</p>
<HR>
SQL statement: <%=SQLstmt%>
<HR>
<%
  Conn.Execute (SQLstmt)
  Response.Write "Operation Complete<br><A HREF=""credit.asp"">Home</A>"
 END IF

Line447 is:
<%
	 Conn.Execute (SQLstmt)
	 Response.Write "Operation Complete<br><A HREF=""credit.asp"">Home</A>"
	END IF

Can anyone please help me

Message #10 by "Ken Schaefer" <ken@a...> on Fri, 10 May 2002 11:45:32 +1000
Sean,

This has been posted before. Please do this:

<%
Response.Write(SQLstmt)
Response.End
%>

and post the output to the list. When you do something like:

DoStuff(x)

and the code generates an error, it's becuase there is something wrong with
"x", but we don't know what value x actually has, so we need to Print() it
to the screen (or similar).

Cheers
Ken

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
From: "Sean Dillon" <sdillon@b...>
Subject: [access_asp] RE: This error is wrecking my head


: I am getting this error everytime i try to do an update.
: The error is:
: Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
:
: [Microsoft][ODBC Microsoft Access Driver] Syntax error in UPDATE
statement.

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Message #11 by "Sean Dillon" <sdillon@b...> on Fri, 10 May 2002 08:38:30 +0100
Ken,
I was printing the results of the SQL to the screen put my program kept
crashing everytime it went to execute the SQL. Found out it was because i
was using a reserved word.
Do you have a list of reserved words or know where i might find a list of
reserved words.

Thanks Ken,
Sean



-----Original Message-----
From: Ken Schaefer [mailto:ken@a...]
Sent: 10 May 2002 02:46
To: Access ASP
Subject: [access_asp] RE: This error is wrecking my head


Sean,

This has been posted before. Please do this:

<%
Response.Write(SQLstmt)
Response.End
%>

and post the output to the list. When you do something like:

DoStuff(x)

and the code generates an error, it's becuase there is something wrong with
"x", but we don't know what value x actually has, so we need to Print() it
to the screen (or similar).

Cheers
Ken

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
From: "Sean Dillon" <sdillon@b...>
Subject: [access_asp] RE: This error is wrecking my head


: I am getting this error everytime i try to do an update.
: The error is:
: Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
:
: [Microsoft][ODBC Microsoft Access Driver] Syntax error in UPDATE
statement.

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~



Message #12 by "Charles Mabbott" <aa8vs@m...> on Fri, 10 May 2002 07:04:59 -0400
Sean,
There are several good books out there.  Try Amazon, www.p2p.wrox.com, etc.  
Having these at your fingertips has been a big help to
me.

Now about unwrecking the subject line....  8^P

Regards,
Chuck


>From: "Sean Dillon" <sdillon@b...>
>Reply-To: "Access ASP" <access_asp@p...>
>To: "Access ASP" <access_asp@p...>
>Subject: [access_asp] RE: This error is wrecking my head
>Date: Fri, 10 May 2002 08:38:30 +0100
>
>
>Ken,
>I was printing the results of the SQL to the screen put my program kept
>crashing everytime it went to execute the SQL. Found out it was because i
>was using a reserved word.
>Do you have a list of reserved words or know where i might find a list of
>reserved words.
>
>Thanks Ken,
>Sean
>
>
>
>-----Original Message-----
>From: Ken Schaefer [mailto:ken@a...]
>Sent: 10 May 2002 02:46
>To: Access ASP
>Subject: [access_asp] RE: This error is wrecking my head
>
>
>Sean,
>
>This has been posted before. Please do this:
>
><%
>Response.Write(SQLstmt)
>Response.End
>%>
>
>and post the output to the list. When you do something like:
>
>DoStuff(x)
>
>and the code generates an error, it's becuase there is something wrong with
>"x", but we don't know what value x actually has, so we need to Print() it
>to the screen (or similar).
>
>Cheers
>Ken
>
>~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
>From: "Sean Dillon" <sdillon@b...>
>Subject: [access_asp] RE: This error is wrecking my head
>
>
>: I am getting this error everytime i try to do an update.
>: The error is:
>: Microsoft OLE DB Provider for ODBC Drivers error '80040e14'
>:
>: [Microsoft][ODBC Microsoft Access Driver] Syntax error in UPDATE
>statement.
>
>~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
>
>
>
>




"Racial interaction is described by Physics,
for every action there is an opposite
reaction.  We hate them, they hate us, and
we hate them back. And there you are, we are
trapped by mathematics."
    -Londo B5

http://aa8vs.dhs.org:81/aa8vs


_________________________________________________________________
Get your FREE download of MSN Explorer at http://explorer.msn.com/intl.asp.

Message #13 by "Ken Schaefer" <ken@a...> on Mon, 13 May 2002 16:23:41 +1000
Reserved words can be found in Access' Online Help.

Secondly, you need to do it like this:

<%
strSQL = "Blah, blah, blah..."

Response.Write(strSQL)
Response.End

Set objRS = objConn.Execute(strSQL)
%>

Response.End is *very* important. It stops the processing of your page, so
you never get to the objConn.Execute line, which means that the page doesn't
bomb - instead you just see your SQL statement

Cheers
Ken

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
From: "Sean Dillon" <sdillon@b...>
Subject: [access_asp] RE: This error is wrecking my head


:
: Ken,
: I was printing the results of the SQL to the screen put my program kept
: crashing everytime it went to execute the SQL. Found out it was because i
: was using a reserved word.
: Do you have a list of reserved words or know where i might find a list of
: reserved words.

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

Message #14 by "Thomas, Dean" <Dean.Thomas@u...> on Wed, 15 May 2002 15:35:51 -0400
Here is a link for the reserved words...I had the same error not very long
ago!!

http://support.microsoft.com/default.aspx?scid=kb;EN-US;q209187

-----Original Message-----
From: Ken Schaefer [mailto:ken@a...]
Sent: Monday, May 13, 2002 2:24 AM
To: Access ASP
Subject: [access_asp] RE: This error is wrecking my head


Reserved words can be found in Access' Online Help.

Secondly, you need to do it like this:

<%
strSQL = "Blah, blah, blah..."

Response.Write(strSQL)
Response.End

Set objRS = objConn.Execute(strSQL)
%>

Response.End is *very* important. It stops the processing of your page, so
you never get to the objConn.Execute line, which means that the page doesn't
bomb - instead you just see your SQL statement

Cheers
Ken

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
From: "Sean Dillon" <sdillon@b...>
Subject: [access_asp] RE: This error is wrecking my head


:
: Ken,
: I was printing the results of the SQL to the screen put my program kept
: crashing everytime it went to execute the SQL. Found out it was because i
: was using a reserved word.
: Do you have a list of reserved words or know where i might find a list of
: reserved words.

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~


Message #15 by "Sean Dillon" <sdillon@b...> on Thu, 16 May 2002 09:02:59 +0100

Cheers thanx alot. It should save me pulling out my hair because i have used
a reserved word!!




-----Original Message-----
From: Thomas, Dean [mailto:Dean.Thomas@u...]
Sent: 15 May 2002 20:36
To: Access ASP
Subject: [access_asp] RE: This error is wrecking my head


Here is a link for the reserved words...I had the same error not very long
ago!!

http://support.microsoft.com/default.aspx?scid=kb;EN-US;q209187

-----Original Message-----
From: Ken Schaefer [mailto:ken@a...]
Sent: Monday, May 13, 2002 2:24 AM
To: Access ASP
Subject: [access_asp] RE: This error is wrecking my head


Reserved words can be found in Access' Online Help.

Secondly, you need to do it like this:

<%
strSQL = "Blah, blah, blah..."

Response.Write(strSQL)
Response.End

Set objRS = objConn.Execute(strSQL)
%>

Response.End is *very* important. It stops the processing of your page, so
you never get to the objConn.Execute line, which means that the page doesn't
bomb - instead you just see your SQL statement

Cheers
Ken

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
From: "Sean Dillon" <sdillon@b...>
Subject: [access_asp] RE: This error is wrecking my head


:
: Ken,
: I was printing the results of the SQL to the screen put my program kept
: crashing everytime it went to execute the SQL. Found out it was because i
: was using a reserved word.
: Do you have a list of reserved words or know where i might find a list of
: reserved words.

~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~





  Return to Index