ASP.NET Forum

**blelisa** · 12-04-2006, 03:56 PM

HI I am using asp to write to a database for users to register with me through a form on my web. It is not working.

the error I get is:
Microsoft JET Database Engine error '80004005'

Operation must use an updateable query.

/hemisphe/prolg.asp, line 32

My asp page writing it has code of:

Code:

<%
Dim intCounter, intDecimal, strPassword

For intCounter = 1 To 6
    Randomize
    intDecimal = Int((26 * Rnd) + 1) + 64

strPassword = strPassword & Chr(intDecimal)

Next


set connection=Server.CreateObject("ADODB.Connection")
connection.ConnectionString="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &_
server.MapPath("data/hemicustreg.mdb")
connection.Open

sql="INSERT INTO [customer] ([cmpname], [address], [city], [state], [zip], [number], [contact], [email], [system], [pwrd], [username])" 
sql=sql & "VALUES" 
sql=sql & "('" & Request.Form("cmpname") & "',"
sql=sql & "'" & Request.Form("address") & "',"
sql=sql & "'" & Request.Form("city") & "',"
sql=sql & "'" & Request.Form("state") & "',"
sql=sql & "'" & Request.Form("zip") & "',"
sql=sql & "'" & Request.Form("number") & "',"
sql=sql & "'" & Request.Form("contact") & "',"
sql=sql & "'" & Request.Form("email") & "',"
sql=sql & "'" & Request.Form("system") & "',"
sql=sql & "'" & strpassword & "',"
sql=sql & "'" & Request.Form("username") & "')"

connection.Execute(sql) 

Dim Mail
Set Mail=Server.CreateObject("CDONTS.NewMail")

HTML = HTML & "<HTML>"
  HTML = HTML & "<HEAD>"
  HTML = HTML & "<TITLE>Send Mail with HTML</TITLE>"
  HTML = HTML & "</HEAD>"
  HTML = HTML & "<BODY>"
  HTML = HTML & "<TABLE cellpadding=""4"">"
  HTML = HTML & "<TR><TH><FONT color=""red"">"
  HTML = HTML & "<IMG SRC=""myImage.gif""></A><BR><BR>" 
  HTML = HTML & "<h2>Thank you for Registering with Hemisphere Communications</h2></TH></TR>"
  HTML = HTML & "<TR><TH><FONT color=""blue"" SIZE=""4"">"  
  HTML = HTML & "Your password is&nbsp;"  & strPassword
  HTML = HTML & "<BR><BR>"
  HTML = HTML & "To Log In <a href=""http://www.hemisphere.net/login.html"">Click Here</a>&nbsp;or go to http://www.hemisphere.net/login.html</TH></TR>"
  HTML = HTML & "</FONT></TD></TR></TABLE><BR><BR>"
  HTML = HTML & "</BODY>"
  HTML = HTML & "</HTML>"

Mail.to=Request.Form("email")
Mail.From="lblendowski@hemisphere.net"
Mail.Subject="Hemisphere.net Registration"
Mail.MailFormat= 0
Mail.BodyFormat=0
Mail.Body=HTML
Mail.Send
Set Mail=nothing
  
  if err<>0 then 
    Response.Write(Err.Description) 
  else 
    response.redirect("tyreg.html") 
end if
connection.close 


%>

Can someone please point out what I am doing wrong? Should the code be UPDATE instead of INSERT?

Any help is greatly appreciated!

**ADAM Web Design** · 12-05-2006, 02:56 AM

Nope. Your code should work in this instance. (Although it will need to be cleaned up at some point, but first things first.)

What you're experiencing is a common thing...a misconfigured host. Your host doesn't have write permissions set on the folder containing your database. This means that the files in that folder cannot be altered in any way, including in this case the inserting of data.

Bit of a pain in the butt when working on a database-driven site, isn't it?

The good news is that it's fixable. If your host has any semblance of a clue, they should know what to do.

If not, point them to this article and this should help them:

http://support.microsoft.com/kb/175168

**ophir.oren** · 12-06-2006, 04:29 AM

put a space before "values" keyword in sql query.
check that all fields name are currect and db file has write/update permission by iuser