Advertisement
Help Keep Boards Alive. Support us by going ad free today. See here: https://subscriptions.boards.ie/.
If we do not hit our goal we will be forced to close the site.

Current status: https://keepboardsalive.com/

Annual subs are best for most impact. If you are still undecided on going Ad Free - you can also donate using the Paypal Donate option. All contribution helps. Thank you.
https://www.boards.ie/group/1878-subscribers-forum

Private Group for paid up members of Boards.ie. Join the club.

Microsoft VBScript compilation (0x800A0401)

  • 19-08-2008 12:04PM
    #1
    Registered Users, Registered Users 2 Posts: 224 ✭✭


    Hi,

    Im getting the following error when i try to apply a piece of code, any ideas


    Error Type:
    Microsoft VBScript compilation (0x800A0401)
    Expected end of statement
    /spark2008/adminarea/Viewmail.asp, line 212, column 55
    strQImage2="../artappimgs/<%=(rsNewArtApp.Fields.Item("Image2").Value)

    ****************

    This is the code

    ***************************

    <%
    Dim strQImage2
    Dim vQuotebtn2
    vQuotebtn2=false
    If rsNewArtApp.Fields("image2").Value <> "" or NOT isnull(rsNewArtApp.Fields("image2").Value) Then
    vQuotebtn2=true
    End If
    If vQuotebtn2=false then
    strQImage2="../siteimgs/noimage.jpg"
    Else
    strQImage2="../artappimgs/<%=(rsNewArtApp.Fields.Item("Image2").Value)%>"
    End If
    %>


    <td><div align="center"><A HREF="<%=strQImage2%>"><img src="<%=strQImage2%>" border="0" target="_blank"></A></div></td>


Comments

  • Registered Users, Registered Users 2 Posts: 21,278 ✭✭✭✭Eoin


    This should work - you are using the <% %> brackets in your ASP code, where you would only need them in your HTML.

    strQImage2 = "../artappimgs/" & rsNewArtApp.Fields.Item("Image2").Value

    PS - it would be nice if you responded to previous questions that have been answered for you.


  • Registered Users, Registered Users 2 Posts: 224 ✭✭The Mighty Dubs


    Cheers for that Eoin.


Advertisement