Hello,

Thanks in advance. My database was working great the other day and all of a sudden I

started getting the error message below message. I tried a manual insert and still get

this message. My ISP told me they made a change to my FTP login preferences, and thats

when it started. They tell me that shouldn't have made a difference, but apparently it

has. Can anyone tell me what to change in my code or what I can ask my ISP to check on.



Thanks

Mike Moore



strSQL written out

INSERT into Person (UsrFirstName, UsrLastName, EmailAddress, StreetAddress, City, State,

ZipCode, Country, Passwrd, Hint, LastLogin) VALUES

('mike', 'moore', 'email', 'address', 'city', 'state','zip', 'country', 'passwrd',

'hint', #1/31/01 9:43:39 AM#)



Microsoft JET Database Engine error '80004005'



Operation must use an updateable query.



/cmdinsert.asp, line 29





My Code:



<%

Dim objConn

Dim strSource

Dim adCmdText

Dim strSQL

Dim varLogin



adCmdText=1

varLogin=Now



strSQL = "INSERT into Person (UsrFirstName, UsrLastName, EmailAddress, StreetAddress,

City, State, ZipCode, Country, Passwrd, Hint, LastLogin) VALUES ('mike', 'moore',

'email', 'address', 'city', 'state','zip', 'country', 'passwrd', 'hint', #"& varLogin

&"#)"

Response.Write "strSQL written out<BR>"

Response.Write strSQL



Set objConn = Server.CreateObject("ADODB.Connection")

objConn.Provider = "Microsoft.Jet.OLEDB.4.0;"

 strLocation = "E:\inexsites\inex122\TopSecret.mdb"

objConn.Open strLocation, "Admin", ""



Set objCmd = Server.CreateObject("ADODB.Command")



Set objCmd.ActiveConnection = objConn

objCmd.CommandText = strSQL

objCmd.CommandType = adCmdText

objCmd.Execute

Response.Write "strSQL written out<BR>"

Response.Write strSQL







Set objCmd = Nothing

objConn.Close

Set objConn = Nothing

%>



--

"A day without sunshine is like, you know, night."

-Steve Martin

sounds to me like they killed the permissions on your

"E:\inexsites\inex122\" directory or on the database itself...



there's a user account for the webserver called iusr_<whatever the machine's

name is> that has to have read/write access to the database file AND the

folder it's in because access creates a file in that dir when you open it.



shane blake

it consultant

www.metrois.com

raleigh, nc



-----Original Message-----

From: mike@i... [mailto:mike@i...]

Sent: Wednesday, January 31, 2001 10:52 AM

To: ASP Databases

Subject: [asp_databases] Engine error '80004005'





Hello,

Thanks in advance. My database was working great the other day and all of a

sudden I

started getting the error message below message. I tried a manual insert and

still get

this message. My ISP told me they made a change to my FTP login preferences,

and thats

when it started. They tell me that shouldn't have made a difference, but

apparently it

has. Can anyone tell me what to change in my code or what I can ask my ISP

to check on.



Thanks

Mike Moore



strSQL written out

INSERT into Person (UsrFirstName, UsrLastName, EmailAddress, StreetAddress,

City, State,

ZipCode, Country, Passwrd, Hint, LastLogin) VALUES

('mike', 'moore', 'email', 'address', 'city', 'state','zip', 'country',

'passwrd',

'hint', #1/31/01 9:43:39 AM#)



Microsoft JET Database Engine error '80004005'



Operation must use an updateable query.



/cmdinsert.asp, line 29





My Code:



<%

Dim objConn

Dim strSource

Dim adCmdText

Dim strSQL

Dim varLogin



adCmdText=1

varLogin=Now



strSQL = "INSERT into Person (UsrFirstName, UsrLastName, EmailAddress,

StreetAddress,

City, State, ZipCode, Country, Passwrd, Hint, LastLogin) VALUES ('mike',

'moore',

'email', 'address', 'city', 'state','zip', 'country', 'passwrd', 'hint', #"&

varLogin

&"#)"

Response.Write "strSQL written out<BR>"

Response.Write strSQL



Set objConn = Server.CreateObject("ADODB.Connection")

objConn.Provider = "Microsoft.Jet.OLEDB.4.0;"

 strLocation = "E:\inexsites\inex122\TopSecret.mdb"

objConn.Open strLocation, "Admin", ""



Set objCmd = Server.CreateObject("ADODB.Command")



Set objCmd.ActiveConnection = objConn

objCmd.CommandText = strSQL

objCmd.CommandType = adCmdText

objCmd.Execute

Response.Write "strSQL written out<BR>"

Response.Write strSQL







Set objCmd = Nothing

objConn.Close

Set objConn = Nothing

%>



--

"A day without sunshine is like, you know, night."

-Steve Martin