|
|||||||||
|
|||||||||
|
|||||||||
 |
|||||||||
| |
||
|
|
|
|
|||||||||
|
|||||||||
|
|||||||||
|
|||||||||
| |
||
|
|
|
| |||||||||
 |
|
|
«
Previous Thread
|
Next Thread
»
|
Thread Tools | Search this Thread | Rate Thread | Display Modes |
ASP Free Forums Sponsor:
|
|
|
|
#1
June 6th, 2004, 08:56 AM
|
|||
|
|||
|
Microsoft VBScript compilation error '800a03f6' expected end
Hi i am getting thi s error :Microsoft VBScript compilation error '800a03f6'
Expected 'End' /myspace/edit_userloc.asp, line 36 from running this page: . edituser_loc.asp <%@ LANGUAGE="VBSCRIPT" %> <% Response.buffer = TRUE %> <!--#include virtual="/adovbs.inc"--> <!--#include virtual="/pagetop.txt"--> <!--#include virtual="/isadmin.inc"--> <% if isAdmin then username = Request.cookies("isLoggedInAs")("username") town = cstr(Request.form("utown")) postcode = cstr(Request.form("upostcode")) alerts = cstr(Request.form("alerts")) Response.write town & "<br>" Response.write alerts & "<br>" Response.write postcode & "<br>" Response.write username set racDB = Server.CreateObject("ADODB.Connection") racDB.Open "rac" set insertset = Server.CreateObject("ADODB.RecordSet") insertset.Open "Select count(*) as Cnt from memb_loc where username= '" & username & "'", racdb Dim UserExist, strsql UserExist = insertset("Cnt") insertset.close set insertset = Nothing If CInt(UserExist)=0 then strsql="Insert into memb_loc(username,town,postcode,alerts) Values('" & username & "','" & town & "','" & postcode & "','" & alerts & "')" response.write strsql response.end racdb.Execute(strsql) Else strsql="Update memb_loc set town='" & town & "', postcode='" & postcode & "', alerts='" & alerts & "' where username='" & username & "'" response.write strsql response.end racdb.Execute(strsql) End if %> </BODY> </HTML> this is going to write the values as well as update the database. all the variables have values so that all works..... please help. steve
|
|
#2
June 6th, 2004, 05:10 PM
|
|||
|
|||
|
There is a reason you didn't post this in the asp forum?
Just curious.
__________________
====== Doug G ====== I didn't attend the funeral, but I sent a nice letter saying I approved of it. --Mark Twain
|
|
#3
October 15th, 2004, 08:47 PM
|
|||
|
|||
|
I had this and went to the extend of commenting the entire incude file only to find in the file with the include statement had a <5 instead of a <% after the include statement
|
|
| Viewing: ASP Free Forums > Other > ASP Free Lounge > Microsoft VBScript compilation error '800a03f6' expected end |
| Thread Tools | Search this Thread |
| Display Modes | Rate This Thread |
|
|
 |
|
|
|
|
|
Del.icio.us
Digg
Google
Spurl
Blink
Furl
Simpy
Y! MyWeb
Linear Mode
