Hi. I am trying to troubleshoot someone else's code. I am getting the following error when the page tries to open the connection. Any ideas?

Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified

Dim Conn
Dim connectstring

   Dim sRTF, sFileName, sConn

   'Create the file for the RTF
   Dim fso, MyFile
   Set fso = CreateObject("Scripting.FileSystemObject")
   datestamp = Month(Date) & Day(Date) & Year(Date) & "_" & Hour(Time()) & Minute(Time()) & Second(Time())
   sFileName = Server.MapPath("path_" & datestamp & ".rtf")
   Set MyFile = fso.CreateTextFile(sFileName, True)

   Cycle = request("Cycle")
   Dim rs
   connectstring = "test"
   Set Conn = CreateObject("ADODB.Connection")
   'Conn.Provider = "Microsoft.Jet.OLEDB.4.0"
   Conn.Mode = 3 'adModeRead=1
   Conn.Open connectstring, "username", "password"

connectstring variable should be something like
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
           "Data Source=c:\somepath\myDb.mdb;" & _
           "User Id=admin;" & _
           "Password="

you have just given it the value "test" which is meaningless. If you have a DSN set-up called test then you can change it to "DSN=test".

hth
Phil