hmmm.....

får detta felmeddelande när jag ska använda mig av ett bannerskriopt:

Kompileringsfel i Microsoft VBScript error '800a0400' 

Programsats förväntas. 

/banner/inc_AdBanner.asp, line 14 

strAdLinkUrl = [url="http://home.domaindlx.com/groda"]http://home.domaindlx.com/groda[/url]

och detta lilla skript:

<%
Sub zAdBanner(ByVal HowManyAds)
    Randomize
    Dim intAdBanner
 
    '## -- slumpa fram vilken adbanner som ska visas --
    intAdBanner = CInt((rnd * HowManyAds) + 0.5)
 
    Select Case intAdBanner
        Case 1
            strImgLocation = "/banners/"
            strImgName = "banner1.gif"
            strAltText = "Besök nu!"
            strAdLinkUrl = [url="http://home.domaindlx.com/groda"]http://home.domaindlx.com/groda[/url] 
 
            Response.Write "<A href=""" & strAdLinkUrl & """ " & _
                "target=""_blank""><IMG src=""" & strImgLocation & strImgName & """ " & _
                "border=""0""></A>"
 
        Case 2
            strImgLocation = "/banners/"
            strImgName = "brev4.gif"
            strAltText = "Min andra sponsor"
            strAdLinkUrl = [url="http://home.domaindlx.com/groda"]http://home.domaindlx.com/groda[/url] 
 
            Response.Write "<A href=""" & strAdLinkUrl & """ " & _
                "target=""_blank""><IMG src=""" & strImgLocation & strImgName & """ " & _
                "border=""0""></A>"
 
    End Select
 
End Sub
%>