Hi,
Hope I am not too late to address your problem as
such. I think the error is in the objcon.open stmt.
It should have been objCon.open "DSN=sysAdminDB"
instead of objCon.open sysAdminDB.
HTH
vinay.
--- Alex Elger <[EMAIL PROTECTED]> wrote:
> If anyone could help me with this i would be very
> grateful.
> Ok so I've been looking at this for the last 3 hours
> now and i cant for the
> life of me figure out that's wrong with it.
> The error i am getting is:
>
> Microsoft VBScript runtime error '800a01a8'
>
> Object required: ''
>
> /sys3/backuplog/updatetapes.asp, line 41
>
>
> and the code is:
>
>
>
> <% @LANGUAGE = VBSCRIPT %>
> <%option explicit%>
> <%response.buffer=true%>
> <!-- #INCLUDE FILE="../adovbs.inc" -->
> <!-- #INCLUDE FILE="../connection.asp" -->
> <%
> 'LOCAL VARIABLES
> dim objCon ' Connection object
> dim objCommand ' Command object
> dim objRS ' Recordset object
> dim intRows ' Number of matches found
> dim intGroup ' Group
> dim blnGotRows ' Flag indicating if anything was
> found
> dim strRecordArray ' Array for holding Records
> dim intMaxCount
> dim intCounter
> dim Serial
> dim UserName
> dim FullName
> dim InsertType
> dim Server
> dim Day
> dim FirstUseDate
> dim Archived
> dim Print
> dim InsertUserName
>
> ' GET THE DATA FROM THE FORM
> UserName = Request.Cookies("Micronage")("UserName")
> FullName = Request.Cookies("Micronage")("FullName")
> InsertType = Request.QueryString("InsertType")
> Serial=Request.Form("Serial")
> Day=Request.Form("Day")
> FirstUseDate=Request.Form("FirstUseDate")
> Archived=Request.Form("Archived")
> Print=Request.Form("Print")
>
>
> ' FIRSTLY CHECK THE DATABASE FOR MATCHING DATA AND
> REDIRECT TO a "No
> Matches" PAGE IF NONE FOUND
> ' Create Connection
> Set objCon = Server.CreateObject( "ADODB.Connection"
> )
> objCon.Open SysAdminDB
>
>
>
> It is the """""Set objCon = Server.CreateObject(
> "ADODB.Connection" )"""""
> bit that is not working (BTW there are no quoted
> arround it in my asp it's
> just there to make it stand out in the sentance.
>
>
>
>
> Thanks for the help
> Alex Elger
>
>
> ---
> You are currently subscribed to activeserverpages
> as: [EMAIL PROTECTED]
> To unsubscribe send a blank email to
%%email.unsub%%
__________________________________________________
Do you Yahoo!?
New DSL Internet Access from SBC & Yahoo!
http://sbc.yahoo.com
---
You are currently subscribed to activeserverpages as: [email protected]
To unsubscribe send a blank email to [EMAIL PROTECTED]
