Please help. I may be overlooking something obvious. I have included the error message when the page is published.
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>CheckData</title>
</head>
<body>
<%
' Create Connection
Set InormConn=Server.CreateObject ("ADODB.Connection"
InormConn.Open "DSN=RapidWeb"
'
' Create Recordset Object
set rsInorm=Server.CreateObject ("ADODB.Recordset"
'
'Set rsInorm methods
rsInorm.ActiveConnection=InormConn
rsInorm.CursorType = adOpenKeyset
rsInorm.LockType=adLockOptimistic ' Line 22
rsInorm.Source="tabApprovals"
rsInorm.Open
ADODB.Recordset error '800a0bb9'
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.
/CheckData.asp, line 22
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>CheckData</title>
</head>
<body>
<%
' Create Connection
Set InormConn=Server.CreateObject ("ADODB.Connection"
InormConn.Open "DSN=RapidWeb"
'
' Create Recordset Object
set rsInorm=Server.CreateObject ("ADODB.Recordset"
'
'Set rsInorm methods
rsInorm.ActiveConnection=InormConn
rsInorm.CursorType = adOpenKeyset
rsInorm.LockType=adLockOptimistic ' Line 22
rsInorm.Source="tabApprovals"
rsInorm.Open
ADODB.Recordset error '800a0bb9'
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another.
/CheckData.asp, line 22