Sensibilium
Programmer
I'm trying to delete a record from my DB but I keep receiving the following error message:
[tt]ADODB.Recordset error '800a0bb9'
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.
/delcategoryresponse.asp, line 23 [/tt]
Below is my Delete Category Page (with line 23 in bold):
[tt]<%@ Language=VBScript %>
<HTML>
<!-- include file="ADOvbs.inc" -->
<HEAD>
<TITLE>Delete Category Action</TITLE>
<META name="description" content="">
<META name="keywords" content="">
</HEAD>
<BODY BGCOLOR="#FFFFFF" TEXT="#000000" LINK="#0000FF" VLINK="#800080">
<h1>Delete Category Action</h1>
<%
Dim vConfirm
vConfirm = Request.Form("Confirm"
If vConfirm="no" Then
Response.Redirect "delcategory.asp"
End If
Dim vCatID
vCatID = Request.Form("CatID"
Dim oRSCategory
Set oRSCategory=Server.CreateObject("ADODB.Recordset"
oRSCategory.Open "tblCategories", "DSN=fairweb; UID=whoever; PWD=xxxxxx",adOpenDynamic,adLockOptimistic
oRSCategory.Find "CategoryID=" & vCatID
If oRSCategory.EOF Then
Response.Write "It should be impossible, but this category don't exist!"
Else
oRSCategory.Delete adAffectCurrent
Response.Write "Category deleted."
End If
oRSCategory.Close
Set oRSCategory = Nothing
%>
</BODY>
</HTML>[/tt]
Can anyone shed any light on this? [sig]<p>ahdkaw<br><a href=mailto:ahdkaw@ots.zzn.com>ahdkaw@ots.zzn.com</a><br><a href= anythign can go wrong, it will'[/sig]
[tt]ADODB.Recordset error '800a0bb9'
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.
/delcategoryresponse.asp, line 23 [/tt]
Below is my Delete Category Page (with line 23 in bold):
[tt]<%@ Language=VBScript %>
<HTML>
<!-- include file="ADOvbs.inc" -->
<HEAD>
<TITLE>Delete Category Action</TITLE>
<META name="description" content="">
<META name="keywords" content="">
</HEAD>
<BODY BGCOLOR="#FFFFFF" TEXT="#000000" LINK="#0000FF" VLINK="#800080">
<h1>Delete Category Action</h1>
<%
Dim vConfirm
vConfirm = Request.Form("Confirm"
If vConfirm="no" Then
Response.Redirect "delcategory.asp"
End If
Dim vCatID
vCatID = Request.Form("CatID"
Dim oRSCategory
Set oRSCategory=Server.CreateObject("ADODB.Recordset"
oRSCategory.Open "tblCategories", "DSN=fairweb; UID=whoever; PWD=xxxxxx",adOpenDynamic,adLockOptimistic
oRSCategory.Find "CategoryID=" & vCatID
If oRSCategory.EOF Then
Response.Write "It should be impossible, but this category don't exist!"
Else
oRSCategory.Delete adAffectCurrent
Response.Write "Category deleted."
End If
oRSCategory.Close
Set oRSCategory = Nothing
%>
</BODY>
</HTML>[/tt]
Can anyone shed any light on this? [sig]<p>ahdkaw<br><a href=mailto:ahdkaw@ots.zzn.com>ahdkaw@ots.zzn.com</a><br><a href= anythign can go wrong, it will'[/sig]