Hm, What is this strConn ? This is probably somethign around the ADODB.Connection setup - e.g. the reason is probably outside this code.
-----Original Message----- From: Babiker [mailto:[EMAIL PROTECTED]] Sent: Wednesday, August 14, 2002 12:27 AM To: ActiveServerPages Subject: Unspecified error My application run perfect but some times i got this error for no reason please help Provider error '80004005' Unspecified error C:\ACCOUNTS\ZOFAN\GETSTARTED\../Functions/Global.asp, line 21 this is line 21 objRec.Open strSQLFindPages , strConn , adOpenForwardOnly, _ adLockReadOnly, adCmdText the full code is Function FindRandomImage(no, Position) Dim Count Count = 1 Set objRec = Server.CreateObject("ADODB.Recordset") strSQLFindPages = "SELECT* FROM Banners where Position ='" & Position & "'" objRec.Open strSQLFindPages , strConn , adOpenForwardOnly, _ adLockReadOnly, adCmdText If not objRec.EOF Then While not objRec.EOF if no = Count then if Position = "Top" then Session("RandomImageTop") = objRec("FileName") Session("RandomImageTopLink") = objRec("Link") elseif Position = "Left" then Session("RandomImageLeft") = objRec("FileName") Session("RandomImageLeftLink") = objRec("Link") end if end if objRec.MoveNext Count = Count + 1 Wend End If objRec.Close Set objRec = Nothing end function --- You are currently subscribed to activeserverpages as: [EMAIL PROTECTED] To unsubscribe send a blank email to %%email.unsub%% --- You are currently subscribed to activeserverpages as: [email protected] To unsubscribe send a blank email to [EMAIL PROTECTED]
