mikael_aMedlem sedan mars 2000475 inlägg är det någon som vet hur jag öppnar länken i ett nytt fönster?
<% Set AdRot = Server.CreateObject("MSWC.AdRotator") %>
<% =AdRot.GetAdvertisement("adrot.txt") %>
adrot.txt
REDIRECT adredir.asp
WIDTH 468
HEIGHT 60
BORDER 1
* [url="http://www.video-center.nu/images/annonsera/ad1.gif"]http://www.video-center.nu/images/annonsera/ad1.gif[/url] [url="http://www.micke-anna.nu/"]http://www.micke-anna.nu/[/url]
Gör ett besök på [url="http://www.micke-anna.nu!"]www.micke-anna.nu![/url]
50
adredir.asp
<% Response.Redirect(Request.QueryString("url")) %>
en kanske enkel fråga för er :) går det inte att använda sig av _self
------------------
Micke & Annas Sajt
micke@micke-anna.nu
PatrikBMedlem sedan mars 20002 836 inlägg Hello,
här får du lite kod som funkar:
Set AdRot = Server.CreateObject("MSWC.AdRotator")
AdRot.TargetFrame = " target=""_blank"""
cya,
PatrikB
------------------
=================================
** ZWGdesign **
=================================
mikael_aMedlem sedan mars 2000475 inlägg jag får följande fel:
Microsoft VBScript compilation error '800a0409'
Unterminated string constant
/main2.asp, line 291
AdRot.TargetFrame = " target=""_blank""
---------------------------------------^
<% Set AdRot = Server.CreateObject("MSWC.AdRotator") %>
<% AdRot.TargetFrame = " target=""_blank"" %>
<%=AdRot.GetAdvertisement("adrot.txt") %>
------------------
Micke & Annas Sajt
micke@micke-anna.nu
[Redigerat av mikael_a den 06 okt 2000]
BenganMedlem sedan juni 2000690 inlägg Lägg till ett citattecken på slutet, alltså:
AdRot.TargetFrame = " target=""_blank"""
När man anger citattecken i aspsträngar så dubblar man dem annars tolkas det som slutet på strängen.
------------------
MvH
/Bengan
www.bengan.com
"Your mouse has moved. Windows will now restart to accept the changes."
mikael_aMedlem sedan mars 2000475 inlägg tackar, det fungerar
------------------
Micke & Annas Sajt
micke@micke-anna.nu