|
I got the following error message on my utility.inc file:
Error Type:
Server object, ASP 0177 (0x800401F3)
Invalid class string
/project/utility.inc, line 13 (which is this line of code: Set rs = Server.CreateObject ("ADOB.Recordset")
--------------------------------------------------------
this is my utility.inc file:
<%
'Cks to see if value is in table. Returns a -1 if update, 0 if need to add record
Function CkExistence (sqlstring)
Dim rscount ' The recordset object
Dim myDSN
Dim conn
myDSN = "DSN=HTC;DBQ=C:\Inetpub\wwwroot\database\HTC.m db;"
'Opens a connection object
Set rs = Server.CreateObject ("ADOB.Recordset")
set conn = Server.CreateObject("ADODB.Connection")
'conn.open "C:/Inetpub/wwwroot/database/HTC.mdb"
conn.open myDSN
rscount=conn.execute(sqlstring)
if rscount.eof then
ckexistence = 0
else
ckexistence = -1
end if
End Function
%>
------------------------------
it is use to check to see if a user exist in the database. if it exist then it pull out request info; otherwise, it redirect user to a "add new user page"
thanks
|