|
|
 | Indsæt billede i stedet for tal
Fra : Thrane |
Dato : 04-10-06 08:21 |
|
Hej gruppe...
Håber på lidt hjælp her med følgende:
Jeg har et site med et forum og vil gerne vise antallet af medlemmer på
forsiden med billeder.
Jeg kan sagtens få vist antallet, men hvordan får jeg skiftet de enkelte
cifre ud med tilsvarende billeder jeg har lavet?
/Thrane
| |
 Lars Hoffmann (04-10-2006)
| Kommentar
Fra : Lars Hoffmann |
Dato : 04-10-06 10:04 |
|
Thrane wrote:
> Hej gruppe...
>
> Håber på lidt hjælp her med følgende:
> Jeg har et site med et forum og vil gerne vise antallet af medlemmer på
> forsiden med billeder.
> Jeg kan sagtens få vist antallet, men hvordan får jeg skiftet de enkelte
> cifre ud med tilsvarende billeder jeg har lavet?
Jeg antager at dine billeder hedder billede1,gif, billede2,gif,
billede3,gif, billede4,gif etc
Prøv noget i stil med:
function visEtNummerSomBillede(nummer)
visEtNummersomBillede= "<img src=""billede"&nummer&".gif""
alt="""&nummer&""" />"
end function
funktion VisTalBillede(tal)
dim i
dim returStreng
returStreng = ""
for i = 1 to len(tal)
returStreng = returStreng & visEtNummersomBillede(mid(CStr(tal),i,1))
next
VisTalBillede= returStreng
end function
Du kan så udskrive dit tal-billede med
response.write(VisTalBillede(12345))
Med venlig hilsen
Lars Hoffmann
| |
Thrane (04-10-2006)
| Kommentar
Fra : Thrane |
Dato : 04-10-06 13:27 |
|
"Lars Hoffmann" <lars@intercambiodvd.com> wrote in message
news:1159952651.959064.313140@b28g2000cwb.googlegroups.com...
Jeg antager at dine billeder hedder billede1,gif, billede2,gif,
billede3,gif, billede4,gif etc
Prøv noget i stil med:
//SNIP//
Du kan så udskrive dit tal-billede med
response.write(VisTalBillede(12345))
Med venlig hilsen
Lars Hoffmann
Super, Lars!
Det virker perfekt...
Mange tak!
/Thrane
| |
Thrane (04-10-2006)
| Kommentar
Fra : Thrane |
Dato : 04-10-06 13:51 |
|
"Lars Hoffmann" <lars@intercambiodvd.com> wrote in message
news:1159952651.959064.313140@b28g2000cwb.googlegroups.com...
Jeg antager at dine billeder hedder billede1,gif, billede2,gif,
billede3,gif, billede4,gif etc
Med venlig hilsen
Lars Hoffmann
PS.
Kan man lave tricket med bogstaver også?
Og i så fald, hvad skal ændres?
/Thrane
| |
Lars Hoffmann (04-10-2006)
| Kommentar
Fra : Lars Hoffmann |
Dato : 04-10-06 14:02 |
|
Thrane wrote:
> Kan man lave tricket med bogstaver også?
> Og i så fald, hvad skal ændres?
Ja, det kan man godt, faktisk vil du ikke behøve at ændre noget. Du
skal dog være opmærksom på at funktionen ikke vil skille imellem
store og små bogstaver.
Med venlig hilsen
Lars Hoffmann
| |
Thrane (04-10-2006)
| Kommentar
Fra : Thrane |
Dato : 04-10-06 15:10 |
|
"Lars Hoffmann" <lars@intercambiodvd.com> wrote in message
news:1159966906.321700.179830@h48g2000cwc.googlegroups.com...
>Ja, det kan man godt, faktisk vil du ikke behøve at ændre noget. Du
>skal dog være opmærksom på at funktionen ikke vil skille imellem
>store og små bogstaver.
>Med venlig hilsen
>Lars Hoffmann
Takker!
Ligger du evt. inde med noget der kan skelne i forbindelse med den function?
Jeg er ikke god til den slags fra bunden, men er mere til at ændre i
eksisterenede kode!
/Thrane
| |
Lars Hoffmann (04-10-2006)
| Kommentar
Fra : Lars Hoffmann |
Dato : 04-10-06 15:34 |
|
Thrane wrote:
> Ligger du evt. inde med noget der kan skelne i forbindelse med den function?
Jeg kan da lige bikse noget sammen, prøv at ændre funktionen
visEtNummerSomBillede til:
function visEtNummerSomBillede(nummer)
if StrComp(lower(nummer),nummer) then
visEtNummersomBillede= "<img src=""billede"&nummer&".gif""
alt="""&nummer&""" />"
else
visEtNummersomBillede= "<img src=""billedeStort"&nummer&".gif""
alt="""&nummer&""" />"
end if
end function
Jeg tager naturligvis forbehold for fejl da intet er testet.
Med venlig Hilsen
Lars hoffmann
| |
Thrane (05-10-2006)
| Kommentar
Fra : Thrane |
Dato : 05-10-06 07:28 |
|
"Lars Hoffmann" <lars@intercambiodvd.com> wrote in message
news:1159972437.978300.25900@c28g2000cwb.googlegroups.com...
Thrane wrote:
Jeg kan da lige bikse noget sammen, prøv at ændre funktionen
visEtNummerSomBillede til:
function visEtNummerSomBillede(nummer)
if StrComp(lower(nummer),nummer) then
visEtNummersomBillede= "<img src=""billede"&nummer&".gif""
alt="""&nummer&""" />"
else
visEtNummersomBillede= "<img src=""billedeStort"&nummer&".gif""
alt="""&nummer&""" />"
end if
end function
Jeg tager naturligvis forbehold for fejl da intet er testet.
Med venlig Hilsen
Lars hoffmann
Super, dog får jeg:
Microsoft VBScript runtime error '800a000d'
Type mismatch: 'lower'
| |
Lars Hoffmann (05-10-2006)
| Kommentar
Fra : Lars Hoffmann |
Dato : 05-10-06 12:19 |
|
On Oct 5, 8:27 am, "Thrane" <kysk...@stofanet.dk> wrote:
> Type mismatch: 'lower'
Ja det er min fejl - funktionen hedder jo lcase og ikke lower.
Med venlig hilsen
Lars Hoffmann
| |
Thrane (05-10-2006)
| Kommentar
Fra : Thrane |
Dato : 05-10-06 14:42 |
|
"Lars Hoffmann" <lars@intercambiodvd.com> wrote in message
news:1160047157.755116.145020@b28g2000cwb.googlegroups.com...
> On Oct 5, 8:27 am, "Thrane" <kysk...@stofanet.dk> wrote:
>
> > Type mismatch: 'lower'
>
> Ja det er min fejl - funktionen hedder jo lcase og ikke lower.
>
> Med venlig hilsen
> Lars Hoffmann
>
Det virker perfekt, tak Lars...
Nu vil jeg til at teste lidt på noget Replace-noget ang. specialtegn!
Igen tak for hjælpen!
/Thrane
| |
|
|