Oh, I got this sometimes too :( I should follow the problem - probably a security problem or something. Meanwhile use OLEDB connect sting with the corresponding ADO connection or create ODBC alias. This works but I think answer should be found...
-----Original Message----- From: Babiker [mailto:[EMAIL PROTECTED]] Sent: Wednesday, August 14, 2002 11:09 PM To: ActiveServerPages Subject: General error Unable to open registry key My program runs perfect but I GOT THIS ERROR FOR NOREASON . I GOT THIS ERROR IT DISABLE MY CONNECTION STRING IN ALL THE APPLICATION SO I GET UN SPECIFIED ERROR THE FULL ERROR IS... Microsoft OLE DB Provider for ODBC Drivers error '80004005' [Microsoft][ODBC Microsoft Access Driver]General error Unable to open registry key 'Temporary (volatile) Jet DSN for process 0x138 Thread 0x4e8 DBC 0x20c1d1c Jet'. C:\ACCOUNTS\ZOFAN\NEWSLETTERMAILLIST\../Functions/NewsLetterMailList.asp, line 6 THIS IS LINE 6 ..... objRecUpdatebasKetItem.Open strSQLUpdateItem , strConn , adOpenForwardOnly, _ THE FULL CODE IS..... Function SendEmailToMailingList(Subject, Body) Dim Count Set objRecUpdatebasKetItem = Server.CreateObject ("ADODB.Recordset") strSQLUpdateItem = "Select* From SubscriptionEmailList Where newsletterconfirmed = 'YES' AND newslettersubscription = 'YES'" objRecUpdatebasKetItem.Open strSQLUpdateItem , strConn , adOpenForwardOnly, _ adLockReadOnly, adCmdText if not objRecUpdatebasKetItem.EOF Then While not objRecUpdatebasKetItem.EOF Body = Body & vbCrLf & "<br><a href=http://www.Zofan.com/Subscription/Confirm.asp?EmailId="; & EmailId & "&Unsubscribe=NewsLetter>Unsubscribe from the list </a>" call SendEmail(Session("NewsLetterMailingListEmailFrom"), objRecUpdatebasKetItem("Emailaddress"), Subject, Body, Cc) objRecUpdatebasKetItem.MoveNext Count = Count + 1 Wend End If objRecUpdatebasKetItem.Close Set objRecUpdatebasKetItem = Nothing End Function PLEASE HELP --- 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]
