Compilation Error '800a0400'
Error:
*****
Microsoft VBScript compilation error '800a0400'
Expected statement
/HOD/MedHotels1.asp, line 89
End If
^
*****
Code: .....
Error:
*****
Microsoft VBScript compilation error '800a0400'
Expected statement
/HOD/MedHotels1.asp, line 89
End If
^
*****
Code: .....
Here's the error I get:
Microsoft VBScript compilation error '800a0400'
Expected statement
/Includes/Common/DebugFunctionsJS.asp, line 3
<script language="JScript" runat="server">
Here's the code:
I get this Microsoft VBScript compilation error '800a0400' on the form processor and everything looks fine.
Microsoft VBScript compilation error '800a0411'
Name redefined
/dene/shout.asp, line 23
Dim i
----^
Maybe you someone can point out my error. Code:
I'm trying to develop a company intranet using iis and asp. When I try to view my page, I get the following error:
Microsoft VBScript compilation error '800a0400'
Expected statement
/iisHelp/common/500-100.asp, line 356
& Server.URLEncode(objASPError.Category) & _ "&os=&over=&hrd=&Opt1=" & Server.URLEncode(objASPError.ASPCode) & "&Opt2=" & Server.URLEncode(objASPError.Number) & _ "&Opt3=" & Server.URLEncode(objASPError.Description) strURL = "http://www.microsoft.com/ContentRedirect.asp?" & _ strQueryString
^
I've checked out some tutorial sites but haven't been able to find the proper syntax I would need for this statement.
I am trying to display data from three tables in an MS Access database. Here is my code:
View Replies View RelatedI'm trying to send an email with a list of people in the body of the email but when i ty to send the mail i get the error
Microsoft VBScript compilation error '800a03ea'
Syntax error
/admin/tr1.asp, line 124 do while not rsp.eofwmail is the body of the email.I'm completely stumped here. Code:
I found this code on writing to a csv file within this form. I have modified the connection and command slightly. I keep getting this error and can't figure it out!
Microsoft VBScript compilation error '800a0408'
Invalid character
/Expat/CSV_test.asp, line 38
^
Also, I have not created a csv file - not sure whether I need to create one with the headers/field names etc first. All I have done is the code below. Is this enough to create the csv file?
I have all of a sudden started to receive this error on my site. I have no idea what script it is executing, why it is now failing, what is going on? All I have been able to find out is that Microsoft has had the same problem on their site.
Microsoft VBScript compilation error '800a03f6'
Expected 'End'
?, line 0
The error code is:
Microsoft JScript compilation error '800a03ec'
Expected ';'
/bicc.nl/Connections/BICCwebsite.asp, line 2
Set Conn = Server.CreateObject("ADODB.Connection")
----^
The connectionstring I'm using: Code:
I have no idea what's wrong with the following ASP statement:
Response.Write "<select name="id">"
MS VBScript Compilation error 800a0401
expected end of statement
However, if I do the following, it will be fine:
<select name="id">
<%
%>
</select>
any ideas??
I need some help with my punctuation on this connection script: Code:
connString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.mappath((request.servervariables("URL"),1,InstrRev(LCase(request.servervariables("URL")),"installer")-1)) & "CPDatastore1.mdb;"
This results in this error:
Microsoft VBScript compilation error '800a03ee'
Expected ')'
where this punctuation need to go?
I have all of a sudden started to receive this error on my site!
I have no idea what script it is executing, why it is now failing, what is going on??
All I have been able to find out is that Microsoft has had the same problem on their site!
Microsoft VBScript compilation error '800a03f6'
Expected 'End'
?, line 0
As you can see i am getting the following error message, this is for my university coursework j have finished the website but it just doesnt link to my databse properly
Microsoft JScript compilation error '800a03ec'
Expected ';'
/jamestoone/webbug.asp, line 2
Dim Conn Code:
Here's the error:
Microsoft VBScript compilation error '800a0401'
Expected end of statement
/SEI/test/order_step2.asp, line 1
Here is my code that I am using to write the cookie: ....
My global.asa file looks like this
<script language=Vbscript RUNAT=server>
Sub Application_OnStart
application("ADOSqlConnection")="driver=SQL Server;Server=;uid=;pwd=;database="
application("ConnectString") = "driver=SQL Server;Server=;uid=;pwd=;database="
Sub Session_OnStart
Set Session("arrTo") = Server.CreateObject("Scripting.Dictionary")
Set Session("arrCC") = Server.CreateObject("Scripting.Dictionary")
Set Session("arrBCC") = Server.CreateObject("Scripting.Dictionary")
Set Session("arrFiles") = Server.CreateObject("Scripting.Dictionary")
Session("Count") = 0' to generate unique keys for the dictionaries
end sub
Sub Session_OnEnd
end sub
End Sub
</script>
I get this error
Microsoft VBScript compilation error '800a03ea'
Syntax error
/LM/W3SVC/542313792/Root/global.asa, line 8
Sub Session_OnStart
One of my asp pages can be loaded in two ways - it may be submitted to itself (and therefore contains user data) or it can be loaded by clicking on a link on my menu, and consequently all fields are empty.
If the fields contain values (ie. the submit button was pressed), i want to load data from my database into an array, but if it is accessed via a link, i don't want this data to be loaded. So essentially, i want to know if there is some form of conditional compilation or something in asp (i know it technically shouldn't be called that, but i'm coming from a c++ background, so...) similar to the #if and #elif type directives in C
I can't place the code in a subprogram and selectively call it, because I want the arrays to be global so all my client-side scripts can access the data I'm using VBScript for the asp scripting.
updating my asp page. here is the error code that i get, and on the bottom is my original code.
Microsoft VBScript compilation (0x800A0401)
Expected end of statement
//shoppingcart.asp, line 19, column 70
set RSCustomers = Conn.Execute ("Select Max(Cust_ID) From Customers") As ("MaxID")
If IsEmpty (Session("Cust_ID")) Then
set RSCustomers = Conn.Execute ("Insert into Customers(Order_Date) " & "Values ('" & Now & "') ")
set RSCustomers = Conn.Execute ("Select Max(Cust_ID) From Customers") As ("MaxID")
Session("Cust_ID") = RSCustomers("MaxID")
End If
I'm getting this error on opening a page from a category :
Microsoft VBScript compilation error '800a0411'
Name redefined
/includes/adovbs.inc, line 14
Const adOpenForwardOnly = 0
Generally what does it mean and how do I fix it?
I'm getting the following error on an ASP page that previously worked fine:
Microsoft VBScript compilation (0x800A03F6)
Expected 'End'
I know that this can mean that there's a problem with If..Then...Else structures, but I've checked them over & over and they appear fine. Same goes for loops.
I'm more than happy to send the code if necessary, it's just that it's rather long....
why i got the error message using the following sql statement?Error Type:
Microsoft VBScript compilation (0x800A0401)
Expected end of statement
sql_update = "UPDATE Expenses SET Value = '" & val & "', Detail = '" & modifiednote & "', Time = '" & Time() "' WHERE myDate = '" & Date() & "'"
I am just trying to update my Expenses table in mdb database
and the table has field names:
1. MyDate
2. Value
3. Detail
4. Publisher
5. Time
I am attempting to connect a form in Dreamweaver MX 2004 to a Microsoft Access database and am receiving the following error message:
Error Type:
Microsoft VBScript compilation (0x800A0411)
Name redefined
C:DOCUMENTS AND SETTINGSLOOK FORWARDMY DOCUMENTSMY WEBSLOOKFORWARDV2.0DATABASES../Connections/conMembers.asp, line 8, column 5
Dim MM_conMembers_STRING
----^
From what I can gather the MM_conMembers_String has been used somewhere before in my page but I cannot figure out where. I have no knowledge of code and would great appreciate it if someone could help me out. In the attached file are both the conMembers.asp page and members.asp page code.
I am very new at this and ding this in context of a course. I am getting an error stating
Error Type:
Microsoft VBScript compilation (0x800A03EE)Expected ')'
Can you please look at this and tell me where I went wrong ? .........
When the ASP statement end with a _ character, then the next line cannot
have comment ' character. Is that correct? Since I encountered the following
error:
Microsoft VBScript compilation (0x800A0400)
Expected statement
sqlStmt = "insert into TimeSlot (WeekDay, BeginTime, EndTime) VALUES (" _
' & 2 & "," _
& beginhour & "," _
& tohour & ");"
Ok I know there are lots of posts out there for this problem but no matter what I try I can not seem to get it to work
What is wrong with this syntax
sSQL = "SELECT * FROM serviceHostingMatrix WHERE start_date = "# & startDate & #";"
startDate is a variable that I filled from another tables date field
getting this error
Error Type:
Microsoft VBScript compilation (0x800A0401)
Expected end of statement
I keep getting this error message appear but cant find where the invalid character is:
Error Type:
Microsoft VBScript compilation (0x800A0408)
Invalid character
/test/test.asp, line 18
For Each x in rs.Fields
here is my code:
do until rs.EOF
For Each x in rs.Fields
Response.Write(x.name)
Response.Write(" = ")
Response.Write(x.value & "<br />")
next
Response.Write("<br />")*
rs.MoveNext
Loop
What have i done wrong?
I got an error saying
Microsoft VBScript runtime error- Error '800a000d'
Type mismatch
/briansforums/default.asp, line 923
also another error called Code:
# Error Type:
Server object, ASP 0177 (0x800401F3)
Invalid ProgID. For additional information specific to this message please visit the Microsoft Online Support site located at: http://www.microsoft.com/contentredirect.asp.
/CoxAxis/adminEditPage.asp, line 6
My code:
<%
dim self, pid, i, c
self = Request.ServerVariables("URL")
pid = Request.Querystring("pid")
set Session("pageContent") = Server.CreateObject("Scripting.Dictionary")
Set custObj = Server.CreateObject("NFIFunctions.ValidateField") Line 6
set psi = Session("pageContent")
set errDict = Server.CreateObject("Scripting.Dictionary")
i = 1
i'm getting
Provider error '80004005' Unspecified error
admin/dbconnection.inc, line 4
what this is, it only started happening after i did a recent upload of my database!, i 've tryed uploading it again but the error still appears.
Let me start by saying I'm fairly new to Asp coding. That said...
My ISP only uses AspSmartMail. I've created an online form that uses fill out, which is then e-mailed to the collector of the information and CC-ed to the person who submitted the information.
The error I'm receiving is this:
aspSmartMail.SendMail : Error 28 error '8004001a'
504 Invalid Username or Password
In my script, I've Dimensioned several items, as you'll see below, passing the authenticating username/password to the smtp server, but it's not working. I tried not passing the information by entering in the actual info without it being passed by the diminsioned items. This didn't work either. I of course verified that the username/password I'm usine is correct.
Can someone plase tell me why I can't authenicate? I would really appreciate any help that might be out there.
Relavant Asp code below:
-----------------------------------------
Dim smtpserver,youremail,yourpassword,yourusername,rem oteemail
'Edit these 3 values accordingly
smtpserver = "mail.smtp_server.org"
youremail = "yourname@smtp_server.org"
yourpassword = "password"
yourusername = "yourusername"
remoteemail = "email_address_to_send_to"
Dim ObjSendMail
Set ObjSendMail = Server.CreateObject("AspSmartMail.SmartMail")
'Config remote SMTP server info.
ObjSendMail.Server = smtpserver
ObjSendMail.ServerTimeOut = 35
ObjSendMail.SenderAddress = youremail
ObjSendMail.Password = yourpassword
ObjSendMail.Username = yourusername
'End remote SMTP server config.
'Config E-mail.
ObjSendMail.Recipients.Add remoteemail
ObjSendMail.CCs.Add Request.Form("Confirm_Email")
ObjSendMail.Subject = "Email Subject"
ObjSendMail.SenderAddress = "Confirmation-NoReply@smtp_server.org"
ObjSendMail.SenderName = "SenderName"
ObjSendMail.ContentType = "text/html"
ObjSendMail.Body = strBody
'Note - strBody is Dimensioned elsewhere in my script to build the HTML message body.
'End Config E-mail.
'ObjSendMail.Send
ObjSendMail.SendMail
if err.number <> 0 then
response.write("Error n° " & err.number - vbobjecterror & " = " & err.description & "<br>")
else
Response.Write "aspSmartMail has sent your message with this file as attachment : <br>"
'Response.Write ObjSendMail.Attachments.Item(1).FilePathName
end if
Set ObjSendMail = Nothing
---------------------------------------
End code
i m getting this following error:
Compiler Error Message: BC30002: Type 'ODBCConnection' is not defined.
Following is my code: ...
I keep getting an error when I try to run this update statment: [CODE]
INSERT INTO MYPosts ( IEname, country, server_name, LANIPAddy, license_ver, wrkstn1, wrkstn2, wrkstn3, wrkstn4, wrkstn5, notes, status, rdse, esc, eso, parent, , timezone, ) VALUES ( '" & lcIEname & "', '" & lcCountry & "', '" & lcServerName & "', '" & lcLicenseVer & "', '" & lcwrkstn1 & "', '" & lcwrkstn2 & "', '" & lcwrkstn3 & "', '" & lcwrkstn4 & "', '" & lcwrkstn5 & "', '" & lcNotes & "', " & lcStatus & ", " & lnRDSE & ", " & lcESC & ", " & lcESO & ", " & lcParent & ", " & lcTimeZone & ")"
I get the following error:
Microsoft JET Database Engine error '80040e14'
Syntax error (missing operator) in query expression
CDONTS is not working on my webserver. IIS 5.0 Windows 2000
I am using this code
<%
Dim objNewMail
Set objNewMail = CreateObject("CDOnts.NewMail")
objNewMail.From ="webmaster@test.com"
objNewMail.To = "***@***.com"
objNewMail.Subject = "Test"
objNewMail.MailFormat=0
objNewMail.BodyFormat=0
objNewMail.Body = "<html><b>test test</b></html>"
objNewMail.Send
Set objNewMail=nothing
%>
But it gives me error
__________
Microsoft VBScript runtime error '800a0046'
Permission denied
/test.asp, line 11
_________
I have also referred this Microsoft KB but no help....
I have a database driven (ms access) website which runs fine on my computer (win 2000 iis6). However, on uploading, some pages am receiving the following error
"An Unknown script error occured while processing your request."
......