Microsoft Vbscript Compilation Error '800a03f6
Contents |
here for a quick overview of the site Help Center Detailed answers to any questions you might have Meta Discuss the vbscript error expected end of statement workings and policies of this site About Us Learn more about Stack expected statement vbscript Overflow the company Business Learn more about hiring developers or posting ads with us Stack Overflow Questions Jobs expected end classic asp Documentation Tags Users Badges Ask Question x Dismiss Join the Stack Overflow Community Stack Overflow is a community of 6.2 million programmers, just like you, helping each other. Join
Microsoft Vbscript Compilation Error Expected Statement
them; it only takes a minute: Sign up Microsoft VBScript compilation error '800a03f6' Expected 'End' /itemlookup.asp, line 133 up vote 0 down vote favorite 1 I can not figure out why I am getting this error message: Microsoft VBScript compilation error '800a03f6' Expected 'End' /itemlookup.asp, line 133 Here is my entire code. Can anyone help me out? Down near else if vbscript the bottom there is the End If and that is where it is giving me the error. I put the entire code down below.
<% dim barcode1 barcode1=Request.QueryString("barcode1") dim locator locator=Request.QueryString("locator") set conn=Server.CreateObject("ADODB.Connection") Set rs = Server.CreateObject("ADODB.Recordset") Conn.Open "Provider=SQLNCLI10;Server=XX.XX.XX.X;Database=XXXXXX;Uid=XXX; Pwd=XXX;" If barcode1<>"" Then response.write "" & UCASE(barcode1) & " - Picking History Report - " & time & "
" else If locator<>"" Then response.write "" & UCASE(barcode1) & " - Picking History Report - " & time & "
" sql ="select top 1" _ + " INVENTORY.ITEM_CODE as Item_Code," _ + "DELIVERIES_PICKS.description as description," _ + "INVENTORY.LOCATOR_CODE as locator," _ + "INVENTORY.QTY as qty " & _ " FROM INVENTORY JOIN deliveries_picks ON DELIVERIES_PICKS.item_code = INVENTORY.item_code JOIN deliveries_picks_hist ON DELIVERIES_PICKS.item_code = DELIVERIES_PICKS_hist.item_code WHERE DELIVERIES_PICKS_hist.barcode1 = '"+ barcode1 +" or where INVENTORY.LOCATOR_CODE = '" + locator + "' 'group by INVENTORY.LOCATOR_CODE, INVENTORY.ITEM_CODE, DELIVERIES_PICKS.Expected 'End' Introduction to Error Code 800A03F6 This error code, 800A03F6 occurs when you execute a VBScript. The problem is that you have initiated 'If...Then.. End' logic, but you have omitted the End. The Symptoms You Get 800A03F6 microsoft vbscript compilation error '800a0401' expected end of statement The script does not execute as you hoped, instead you get a WSH error message.
800a0400
The Cause of Error 800A03F6 The underlying cause error 800A03F6 of is a syntax omission, you are missing an 'EndIF' or and 'End' statement. When you have nested If's or nested Else IF statements, then the chances of omitting one of the closing End statements increases dramatically. Note that the Source: is telling us it's a compilation error, http://stackoverflow.com/questions/30292569/microsoft-vbscript-compilation-error-800a03f6-expected-end-itemlookup-asp meaning faulty syntax. The Solution This a mixture of logic and syntax. Check each 'If', or 'Else If' statement and ensure there is a corresponding End If command. As ever, check the Line: number, in my example there are not enough 'End If' statements corresponding to the 'Else If' statements. ‡ Example of Error 800A03F6 ScriptHere is the critical section of the script, which contains multiple 'Else If' statements. In the problem http://www.computerperformance.co.uk/Logon/code/code_800A03F6.htm script there is one too few 'End If' closing statements. For clarity I have left a blank line where the missing statement should be.Lower section of script starting at about line 40. If OSystem = "XP" Then Wscript.Echo " This is where you set XP Group Policy " Else If OSystem = "Windows 2003" Then Wscript.Echo " No Group Policy on the server" Else If OSystem = "W2K" Then Wscript.Echo " You could set W2K Group Policy " Else Wscript.Echo " Default group policy " End If End If Corrected Version If OSystem = "XP" Then Wscript.Echo " This is where you set XP Group Policy " Else If OSystem = "Windows 2003" Then Wscript.Echo " No Group Policy on the server" Else If OSystem = "W2K" Then Wscript.Echo " You could set W2K Group Policy " Else Wscript.Echo " Default group policy " End If End IfEnd If Guy Recommends: SolarWinds Engineer's Toolset v10 This Engineer's Toolset v10 provides a comprehensive console of 50 utilities for troubleshooting computer problems. Guy says it helps me monitor what's occurring on the network, and each tool teaches me more about how the underlying system operates. There are so many good gadgets; it's like having free rein of a sweetshop. Thankfully the utilities are displayed logically: monit
Unanswered Topics Wrox Programmer Forums > ASP.NET and ASP > ASP 3 Classic ASP Active Server Pages 3.0 > Classic ASP Professional Microsoft VBScript compilation error http://p2p.wrox.com/classic-asp-professional/76222-microsoft-vbscript-compilation-error-800a03f6.html '800a03f6' User Name Remember Me? Password Reminder Password Register Register | FAQ https://bytes.com/topic/asp-classic/answers/736965-vbscript-compilation-error-800a03f6-expected-end | Members List | Calendar | Today's Posts | Search Classic ASP Professional For advanced coder questions in ASP 3. NOT for ASP.NET 1.0, 1.1, or 2.0. Search Forums Show Threads Show Posts Advanced Search Find All Thanked Posts Go to Page... Welcome to the p2p.wrox.com Forums. You microsoft vbscript are currently viewing the Classic ASP Professional section of the Wrox Programmer to Programmer discussions. This is a community of tens of thousands of software programmers and website developers including Wrox book authors and readers. As a guest, you can read any forum posting. By joining today you can post your own programming questions, respond to other developers’ questions, and eliminate microsoft vbscript compilation the ads that are displayed to guests. Registration is fast, simple and absolutely free . Page 1 of 2 1 2 > Thread Tools Display Modes #1 (permalink) September 17th, 2009, 03:51 PM 121 Authorized User Join Date: Sep 2009 Posts: 10 Thanks: 0 Thanked 0 Times in 0 Posts Microsoft VBScript compilation error '800a03f6' Can someone help me please!! totally new to scripts but cannot get this to work... i've got no hair left.... error:: Microsoft VBScript compilation error '800a03f6' Expected 'End' /admin/includes/common.asp, line 790 script: <% 'Two varibles are passed into the db 'u_input is the value if the user entered a response to 'the vote/poll question....IP is the address of the user u_input=request.form("u_input") u_ip=request.servervariables("remote_addr") ' if the user did not enter anything in the poll on this visit ' then display the poll question and possible choices if u_input = "" then %>