Advertisement
If you have a new account but are having problems posting or verifying your account, please email us on hello@boards.ie for help. Thanks :)
Hello all! Please ensure that you are posting a new thread or question in the appropriate forum. The Feedback forum is overwhelmed with questions that are having to be moved elsewhere. If you need help to verify your account contact hello@boards.ie

Microsoft VBScript compilation (0x800A0401)

Options
  • 19-08-2008 12:04pm
    #1
    Registered Users 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 Posts: 21,257 ✭✭✭✭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 Posts: 224 ✭✭The Mighty Dubs


    Cheers for that Eoin.


Advertisement