webForumDet fria alternativet

Kan adrotator visa shockwaveflash banners?

ASP

19 svar · 1 140 visningar · startad av MindsEye

Medlem sedan feb. 200160 inlägg
Frågan#1

Nu vet jag inte om detta är rätt ställe att skriva frågan på men eftersom det är både asp och shockwave så tog jag det här.

Vet någon om det går att använda adrotator komponenten för att visa shockwave flash banners?

Och hur man i så fall gör för att få det att fungera.

Medlem sedan dec. 199919 074 inlägg
#2

*Lyfter upp denna tråd*

Jag vill veta hur man gör detta.. Någon? :)

Medlem sedan juni 20019 519 inlägg
#3

jag tror .. .om det ens går att man måste ha en komponent... med tanken av att addrotator gör typ <img src="BILD.gif"> så.. jag vet inte hur shockwave laddar... men det är iallfall inte <img src=""> :) Men visst om det går så skulle jag också gärna vilja veta.

Medlem sedan dec. 199919 074 inlägg
#4

Finns det nått annat bra knep då måntro?

Medlem sedan juni 200032 967 inlägg
#5

Du kan inte använda adrotator rakt av, eftersom, precis som viogtann1 säger, den slumpar egentligen bara fram en <img>-tagg åt dig.

Bire, du får nog skriva en egen slumpgenerator för flashbanners! :bire

Medlem sedan dec. 199919 074 inlägg
#6

@nders - Den ironiska forumledaren! ;)

Medlem sedan juni 20019 519 inlägg
#7

kör random system mellan 4 eller fler tal... och sen typ:

<%
Dim Tal
Tal = Int(Rnd * 4) 
if tal = "1" then
flash = "http://minflash2.fla"
elseif tal = "2" then
flash = "http://minflash1.fla"
elseif tal = "3" then
flash = "http://minflash1.fla"
elseif tal = "4" then
flash = "http://minflash1.fla"
end if
response.write flash
%>

Vet inte om detta fungera 100%

Medlem sedan dec. 199919 074 inlägg
#8

Ni ber återigen om det omöjliga...
Jag kan inte ASP tillräckligt bra för att skriva en egen funktion.

Medlem sedan juni 20019 519 inlägg
#9

redigerade om mitt så den funktionen "ska" fungera.. har dock inte testat den

Medlem sedan juni 200032 967 inlägg
#10

Jag kan inte ASP tillräckligt bra för att skriva en egen funktion.

Då är det väl dags att lära sig! :bire

Dessutom, adrotatorn gör lite mer än bara slumpar, eftersom du kan vikta banners. Du kan se till att en viss banner slumpas fram 30% av gångerna, o.s.v.
Men om det räcker bra med att bara slumpa, så borde en funktion liknande voigtann1s funktion ovan räcka för att slumpa fram filnamn, under förutsättning att Randomize körs innan rnd.

Mvh,

Medlem sedan maj 200010 687 inlägg
#11

En vacker funktion för att slumpa fram urls:

Function RandomUrl()
	Dim vUrl, lItem
	vUrl = Array("http://www.domän.com/Flashfil1.swf", "http://www.domän.com/Flashfil2.swf", "http://www.domän.com/Flashfil3.swf")
	
	Randomize
	lItem = CLng(Rnd * UBound(vUrl)) 
	
	RandomUrl = vUrl(lItem)
End Function

Response.Write RandomUrl

Skulle också gå att skicka in arrayen. :)

Medlem sedan dec. 199919 074 inlägg
#12

Då är det väl dags att lära sig!

Förvisso :e

Men jag hjälper er med era biltrubbel, ni hjälper mig med ASP.. Fair? ;)

r) Ä va fan.. Detta skall användas på https://www.falubildemontering.se & det innebär att den som gör en komplett lösning som funkar enl mina önskemål får nån reservdel av mig antingen gratis eller till väldigt reducerat pris beroende på vad det är givetvis.

Inte pallar jag att lära mig nått! ;)

Medlem sedan dec. 199919 074 inlägg
#13

Ingen som har fel på bilen?

Medlem sedan juni 200032 967 inlägg
#14

Jag kan kolla om jag har något liggandes hemma, men tyvärr är jag inte hemma i helgen, som du säkert känner till. Annars kanske du kan lära dig asp över helgen? ;)

Medlem sedan dec. 199919 074 inlägg
#15

Bäste @nders... Jag väntar mycket hellre tills du kommit hem igen!

Hälsa Rikard! :)

Medlem sedan dec. 19992 085 inlägg
#16

Jag skulle helt klart använda Content-Rotator istället. Samma sak som Ad-Rotator bara att man kan skriva in html kod och inte är begränsad till bildnamn. Man kan vikta visningarna där oxå.

Medlem sedan okt. 200591 inlägg
#17

Aktualiserar gammal tråd på nytt!

Ur adrotator får man fram följande text:

<A HREF="annonser/adhandler.asp?url=URLADRESS&image=BILDADRESS" TARGET="_blank"><IMG SRC="BILDADRESS" ALT="ALTTEXT" WIDTH=120 HEIGHT=70 BORDER=0></A>

URLADRESS, BILDADRESS och ALTTEXT är given info från textfilen.

Kan man kontrollera om BILDADRESS innehåller swf och då göra om koden

<IMG SRC="BILDADRESS" ALT="ALTTEXT" WIDTH=120 HEIGHT=70 BORDER=0>

till

<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="120" height="70">
<param name="movie" value="BILDADRESS">
<param name="quality" value="high">
<embed src="BILDADRESS" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="120" height="70"></embed>
</object>

Jag vet att någon här skulle kunna skriva den funktionen lätt men jag kan inte. ( jag antar att man kan göra en variant på den funktion som gör om webbadresser i text till klickbara länkar precis som det fungerar om man skriver en webbadress på dessa sidor)

Tack på förhand

Medlem sedan juni 20019 519 inlägg
#18

nej inte med adrotator... du får isåfall skapa en egen variant av adrotator...

Medlem sedan okt. 200591 inlägg
#19

jag fick det att fungera

Jag gjorde en funktion som delade upp texten och tog ut storlek och url för att sedan sätta samman dem med tillsammans med den kod som behövdes. Återkommer med koden imorgon om någon skulle vara intresserad.

Medlem sedan okt. 200591 inlägg
#20

Här är Functionen.
Den går säkert att optimera så är det någon som kan skriva det effektivare får de ngärna spinna vidare på tråden.

Function adRotatorFlash(kod)

set o = new regexp
o.ignorecase = true
o.pattern = ".swf"
if o.test(kod) then
Langdhel = Len(kod)
Langd1 = Instr(kod,"<IMG")-1
StringStart = left(kod,Langd1)
breddstart = right(kod,Langdhel-Instr(kod,"WIDTH=")-5)
bredd = left(breddstart,Instr(breddstart," "))
hojdstart = right(kod,Langdhel-Instr(kod,"HEIGHT=")-6)
hojd = left(hojdstart,Instr(hojdstart," "))
String3 = right(kod,langdhel-Langd1-10)
Langd3 = Instr(String3,"""")
urlflash = left(String3,Langd3-1)
FlashKod1 = "<object classid=""clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"" codebase=""http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0"" width=""" & bredd & """ height=""" & hojd & """><param name=""movie"" value="""
FlashKod2 = """><param name=""quality"" value=""high""><embed src="""
FlashKod3 = """ quality=""high"" pluginspage=""http://www.macromedia.com/go/getflashplayer"" type=""application/x-shockwave-flash"" width=""" & bredd & """ height=""" & hojd & """></embed></object></a>"
adRotatorFlash = (StringStart & FlashKod1 & urlflash & FlashKod2 & urlflash & FlashKod3)
Else
AdRotatorFlash = kod
end if

End Function

Tacksam för respons på koden. Jag känner mig nöjd som amatör.

273 ms totalt · 4 externa anrop · v20260731065814-full.868a69e5
131 ms — deklarationer (db)
0 ms — hämta statistik (cache)
139 ms — hämta tråd, inlägg och bilagor (db)
130 ms — ändringar (db)