få acces til at køre med SpawnedMailer

du bliver nødt til at komme med lidt mere kode for det kan være alle mulige ting - fx at du forsøger at benytte eller lukke et objekt der ikke findes.

Smiler sorry -

Nu fik jeg sat dir på linje 25

Og fik en ny fejl på linje 40

fejlen er den her
Microsoft JET Database Engine error '80004005'

Operation must use an updateable query.

/nymail/SpawnedMailerAdd.asp, line 40


og her er koden

<!--#include file ="SpawnedHead.asp"--><center><br><%

Dim eAddy
eAddy = Request.Form("eaddy")
response.write( eAddy )

if eAddy = "" then
response.write("Please go back and fill in your email address.")

else



If InStr(1,eAddy,"@",vbTextCompare) = 0 then

response.write(" is not a valid email address. Please try again.")

else




set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open(Server.Mappath("./SpawnedMailer.mdb"))

set rsMail = Server.CreateObject("ADODB.recordset")
rsMail.Open "SELECT * FROM MailingList WHERE MailingAddy='" & eAddy & "'", conn

    If not rsMail.EOF Then
        If rsMail("MailingAddy") = eAddy Then

            response.write(" already exists in the database.")

        End if

    Else

            mailSQL = "INSERT into MailingList (MailingAddy) VALUES ('" & eAddy & "');"
            conn.Execute mailSQL
            response.write(" added successfully!")
    End if


rsMail.close
conn.close
end if
end if





%></center><!--#include file ="SpawnedFoot.asp"-->

du mangler skriverettigheder til databasen.

Ok hvordan laver jeg kaldet op til at den i stedet skriver til min mappe db i roden

Jeg kan få det her til at virke med noget andet kode jeg har kørende

Men kan du hjælpe med at få det ind i det her SpawnedMailer

Set Connect = Server.CreateObject("ADODB.Connection")
Connect.Open = "Driver={Microsoft Access Driver (*.mdb)};" & "DBQ=d:\home\net2admindk\db\shhans.mdb;"

Jeg kender ikke til resten af din kode - men mon ikke det er tilstrækkeligt at ændre stien her;

conn.Open(Server.Mappath("./SpawnedMailer.mdb"))

til fx

conn.Open(Server.Mappath("./SpawnedMailer.mdb"))

hov

til fx

conn.Open("d:\home\net2admindk\db\shhans.mdb")

lukketid?