Søg
Avatar billede alphine Nybegynder
14. februar 2003 - 20:09 Der er 28 kommentarer

smileys

<%
function smileys(Message)
Message = Trim(Replace(Message, ":/", "<img src=""smiley/1.bmp"">"))
Message = Trim(Replace(Message, ":\", "<img src=""smiley/1.bmp"">"))
Message = Trim(Replace(Message, "=)", "<img src=""smiley/2.bmp"">"))
Message = Trim(Replace(Message, "B)", "<img src=""smiley/3.bmp"">"))
Message = Trim(Replace(Message, "8)", "<img src=""smiley/3.bmp"">"))
Message = Trim(Replace(Message, ":D", "<img src=""smiley/4.bmp"">"))
Message = Trim(Replace(Message, ":O", "<img src=""smiley/5.bmp"">"))
Message = Trim(Replace(Message, ":o", "<img src=""smiley/5.bmp"">"))
Message = Trim(Replace(Message, "+(", "<img src=""smiley/6.bmp"">"))
Message = Trim(Replace(Message, ":-)", "<img src=""smiley/7.bmp"">"))
Message = Trim(Replace(Message, ":)", "<img src=""smiley/8.bmp"">"))
Message = Trim(Replace(Message, ":(", "<img src=""smiley/9.bmp"">"))
Message = Trim(Replace(Message, ">:O", "<img src=""smiley/10.bmp"">"))
Message = Trim(Replace(Message, ">:o", "<img src=""smiley/10.bmp"">"))
Message = Trim(Replace(Message, ">O", "<img src=""smiley/10.bmp"">"))
Message = Trim(Replace(Message, ">o", "<img src=""smiley/10.bmp"">"))
Message = Trim(Replace(Message, ">(", "<img src=""smiley/10.bmp"">"))
Message = Trim(Replace(Message, ":?", "<img src=""smiley/11.bmp"">"))
Message = Trim(Replace(Message, ";)", "<img src=""smiley/12.bmp"">"))
Message = Trim(Replace(Message, ":P", "<img src=""smiley/13.bmp"">"))
Message = Trim(Replace(Message, "8O", "<img src=""smiley/14.bmp"">"))
Message = Trim(Replace(Message, "8o", "<img src=""smiley/14.bmp"">"))
Message = Trim(Replace(Message, ":s", "<img src=""smiley/15.bmp"">"))
Message = Trim(Replace(Message, ":S", "<img src=""smiley/15.bmp"">"))
smileys = Message
end function
%>


Hvorfor virker det ikke?
der kommer ingen fejl melling med den erstatter ikke mine smileys :(
Avatar billede alphine Nybegynder
14. februar 2003 - 20:17 #1
det er det eneste om smileys jeg har, skal der står noget et andet sted?
Avatar billede initializing Nybegynder
14. februar 2003 - 20:24 #2
Aldrig gen billder som .BMP.. Altid GIF, JPG eller PNG
Avatar billede eagleeye Praktikant
14. februar 2003 - 20:32 #3
Du har ikke kaldt Server.HTMLEncoder før du laves smiles i teksten?
Avatar billede eagleeye Praktikant
14. februar 2003 - 20:35 #4
Hvis du gør det laver den nemlig tegn om til HTML koder eks bliver > lavet om til &gt;
Avatar billede alphine Nybegynder
14. februar 2003 - 20:42 #5
nej hvordan gør man det?
Avatar billede kourosh Nybegynder
14. februar 2003 - 20:58 #6
jeg har lige provet med <% response.write smileys(":)") %> og det virker fint.
hvordan kalder du functionen?
Avatar billede alphine Nybegynder
14. februar 2003 - 21:34 #7
<%
function smileys(Message)
Avatar billede mortvader Nybegynder
14. februar 2003 - 22:45 #8
Brug en variabel:

<%
function smileys(Message)
msg=Message
msg = Trim(Replace(msg, ":/", "<img src=""smiley/1.bmp"">"))
msg = Trim(Replace(msg, ":\", "<img src=""smiley/1.bmp"">"))
msg = Trim(Replace(msg, "=)", "<img src=""smiley/2.bmp"">"))

'..osv...

smileys = msg
end function
%>
Avatar billede alphine Nybegynder
15. februar 2003 - 01:16 #9
nej virker stadigvæk ikke

jeg har den her text



<%
function smileys(Message)
msg=Message
msg = Trim(Replace(msg, ":/", "<img src=""smiley/1.bmp"">"))
msg = Trim(Replace(msg, ":\", "<img src=""smiley/1.bmp"">"))
msg = Trim(Replace(msg, "=)", "<img src=""smiley/2.bmp"">"))
msg = Trim(Replace(msg, "B)", "<img src=""smiley/3.bmp"">"))
msg = Trim(Replace(msg, "8)", "<img src=""smiley/3.bmp"">"))
msg = Trim(Replace(msg, ":D", "<img src=""smiley/4.bmp"">"))
msg = Trim(Replace(msg, ":=", "<img src=""smiley/5.bmp"">"))
msg = Trim(Replace(msg, ":o", "<img src=""smiley/5.bmp"">"))
msg = Trim(Replace(msg, "+(", "<img src=""smiley/6.bmp"">"))
msg = Trim(Replace(msg, ":-)", "<img src=""smiley/7.bmp"">"))
msg = Trim(Replace(msg, ":)", "<img src=""smiley/8.bmp"">"))
msg = Trim(Replace(msg, ":(", "<img src=""smiley/9.bmp"">"))
msg = Trim(Replace(msg, ">:o", "<img src=""smiley/10.bmp"">"))
msg = Trim(Replace(msg, ">:O", "<img src=""smiley/10.bmp"">"))
msg = Trim(Replace(msg, ">O", "<img src=""smiley/10.bmp"">"))
msg = Trim(Replace(msg, ">o", "<img src=""smiley/10.bmp"">"))
msg = Trim(Replace(msg, ">(", "<img src=""smiley/10.bmp"">"))
msg = Trim(Replace(msg, ":?", "<img src=""smiley/11.bmp"">"))
msg = Trim(Replace(msg, ";)", "<img src=""smiley/12.bmp"">"))
msg = Trim(Replace(msg, ":P", "<img src=""smiley/13.bmp"">"))
msg = Trim(Replace(msg, "8O", "<img src=""smiley/14.bmp"">"))
msg = Trim(Replace(msg, "8o", "<img src=""smiley/14.bmp"">"))
msg = Trim(Replace(msg, ":S", "<img src=""smiley/15.bmp"">"))
msg = Trim(Replace(msg, ":s", "<img src=""smiley/15.bmp"">"))
Message = Trim(Replace(Message, ":S", "<img src=""smiley/15.bmp"">"))
smileys = msg
end function
%>

den står aller øverst og er det eneste jeg har til smileys
Avatar billede kourosh Nybegynder
15. februar 2003 - 02:17 #10
jeg tror du har problem med at kalde din funktion
skriv <% response.write smileys(":)") %> og det virker.
din variabel Message har ikke noget. Prøv først med response.write(Message) før du kalder funktionen. og bagefter response.write(smileys(Message)) og også en fx.  response.write(smileys(":)")). din koder virker fint hos mig.
Avatar billede eagleeye Praktikant
15. februar 2003 - 02:20 #11
Kommer teksten fra en database??
Typsisk kalder man Sewerver.HTMLEncode når man ligger en tekst i databasen og vil havde disabled HTML tags:

str = Server.HTMLEncode(Request.Form("message"))
Avatar billede alphine Nybegynder
15. februar 2003 - 04:52 #12
nej den kommer ikke fra en database :\
Avatar billede alphine Nybegynder
15. februar 2003 - 05:01 #13
kourush ...
ja der kommer da rigtig nok en smiley men hvis jeg nede i body skrive ":)" kommer det bare kolon + parentes :(
Avatar billede kourosh Nybegynder
15. februar 2003 - 05:06 #14
du skal ikke skrive i body. det skal komme fra en link fx. smileye.asp?message=:s eller fra en form.
Avatar billede kourosh Nybegynder
15. februar 2003 - 05:09 #15
og jeg hedder kourosh
Avatar billede alphine Nybegynder
15. februar 2003 - 11:39 #16
ok... men jeg skal bruge det dem i min guestbook og den er i body :\
Avatar billede kourosh Nybegynder
15. februar 2003 - 13:05 #17
når guestbook gemmes, denne konvertering skal ske. dvs du en form en en side fx. form.asp og gemGuestbook.asp i den anden side.
eller du kan konvertere dem når du viser dem. prøv at skrive helle koden her. jeg retter dem.
Avatar billede alphine Nybegynder
15. februar 2003 - 20:11 #18
altså ude i min oveersigt skal den bare kunne omskrive ":)" til "<img href="1.gif">" det skal jeg vel ikke bruge flere sider til? og det virkede jo på den mpåde :S
Avatar billede alphine Nybegynder
15. februar 2003 - 20:13 #19
prøver lige igen
altså ude i min oveersigt skal den bare kunne omskrive ":)" til "<img href="1.gif">" det skal jeg vel ikke bruge flere sider til? og det virkede jo på den anden måde med <% response.write smileys(":)") %>
Avatar billede dr-data Nybegynder
19. februar 2003 - 10:22 #20
bliver din function overhovedet kaldt ???
Avatar billede alphine Nybegynder
21. februar 2003 - 17:37 #21
ja jeg kan skrive response.write(smileys(":)")).  så virtker den med hvis det bare står :) sker der ingenting
Avatar billede dr-data Nybegynder
01. marts 2003 - 18:40 #22
så bliver den jo heller ikke kørt !!!....

som kourosh skriver 15/02-2003 13:05:24... synes jeg, at du bør poste din kode, for at vi kan hjælpe dig....
Avatar billede alphine Nybegynder
04. marts 2003 - 20:52 #23
ok men jeg skal bare bruge et script der laver ":)" om til <img href="smiley.gif"> hvad andet kode vil du havde?
Avatar billede kourosh Nybegynder
05. marts 2003 - 01:32 #24
hvordan kalder du din function?
Avatar billede alphine Nybegynder
09. marts 2003 - 19:18 #25
hvad ?
Avatar billede doeboy Nybegynder
25. marts 2003 - 12:31 #26
function smileys(tekst)
tekst = replace(tekst, ":)", "<img src='glad.gif'>")
tekst = replace(tekst, ":(", "<img src='sur.gif'>")
tekst = replace(tekst, ":-)", "<img src='ak.gif'>")
tekst = replace(tekst, ":-(", "<img src='lol.gif'>")
Avatar billede doeboy Nybegynder
25. marts 2003 - 12:32 #27
og så den her for at kalde dem frem
<td width="75%"><% = smileys(forum.Fields("Beskedtekst"))%> &nbsp;</td>
Avatar billede doeboy Nybegynder
25. marts 2003 - 12:33 #28
også kan du bruge den her til at trykke på billed og indsætte i dit form felt
<a href="java script:"-1"  name="smiley" onClick="BeskedTekst.value=BeskedTekst.value+':-(';"><img src="lol.gif" border="0"></a>

(beskedtekst) er navnet på dit formfelt hvor den skal indsættes
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel Indlæg Oprettet Seneste aktivitet
Persits.Upload Af bsn i ASP 9 17/09/202611:37 21/09/202615:15
Jeg bakser med noget Database og If Then med ASP - hvad gør jeg galt? Af Peer i ASP 10 25/06/202622:20 04/09/202602:30
Tjek alle checkbox i form Af bsn i ASP 4 18/05/202601:57 19/05/202613:33
Lost focus Af bsn i ASP 1 07/11/202415:34 01/01/202514:58
ASP classic Af bsn i ASP 8 28/10/202423:11 30/10/202422:51
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I dag 16:43 Nomad Tracking Car Af fleknes i Apps til Android
25/0916:15 Internet forsvinder hele tiden Af TTA i Internetforbindelser
23/0920:49 Fejl på Tv2 Play Af Bukse i Browsere
23/0918:11 VB, Lægge 2 celler sammen og skrive den i cellen ved side af Af MC3390 i Excel
21/0910:39 DBA er ikke hvad det tidligere var - desværre! Af ErikHg i Fri debat
White papers
Flere white papers »