Kod-taggar i en textarea

<textarea name="foo"><blink>Doh!</blink></textarea>

Sen kan du ju lösa det på serversidan så här:

Server.HTMLEncode(Request("foo"))

Jag förstår inte det med serversidan vad lägger jag den koden?

Sen vad är blink för tagg?

jag vill typ ha taggarna <b> och <li>-taggen (punkt framför texten)

Aha, du vill att man ska skriva typ -[b-] / [/b-] (utan streck) så blir texten fet?

Då kan man ju skriva så här:

foo = Replace(lcase(Request("foo")), "[b-]", "<b>")
foo = Replace(lcase(Request("foo")), "[/b-]", "</b>")

Ta bort strecken själv.

Var lägger jag in koden?

jag får det inte att fungera
det blir detta fel

Microsoft VBScript runtime error '800a000d'

Type mismatch: '[string: ""]'

/index.asp, line 180

behöver jag denna kod också på samma sida?
Server.HTMLEncode(Request("foo"))
och var lägger jag den?

Jag trodde först att du ville att HTML-kod som skrivits i en textarea senare skulle visas på en sida. Då använder man HTMLEncode. Annars behöver du inte använda det.
Vad heter textarean i ditt formulär?

HTML-kod som skrivits i en imagemap

ähum

Såg den missen ganska snabbt..

synd att det var en miss, för det skulle jag vilja lära mig hur man gör...

Den heter text1

jag vill ha det som det är här, på forumet. Om man skriver taggen url /url
(inom []) så blir det en länk
och om man skriver[-b] så blir detta fet stil[/b-] och det gör man ju i en textarea.

Där slutar mina kunskaper..
Men det finns säkert många andra som vet hur man gör.

<%
Function to_html(s_string)
    to_html = Replace(s_string, """", "''")
    to_html = Replace(to_html, "<", "<")
    to_html = Replace(to_html, ">", ">")
    to_html = Replace(server.htmlencode(to_html), vbcrlf, "<br>")
    to_html = Replace(to_html, "/<", "<")
    to_html = Replace(to_html, "/>", ">")

	to_html= replace(to_html,"[/font]","</font>")
	to_html= replace(to_html,"[/size]","</font>")
	to_html= replace(to_html,"[/color]","</font>")
	to_html= replace(to_html,"[/FONT]","</font>")
	to_html= replace(to_html,"[/SIZE]","</font>")
	to_html= replace(to_html,"[/COLOR]","</font>")
	to_html= replace(to_html,"[img]","<img src='")
	to_html= replace(to_html,"[IMG]","<img src='")
	to_html= replace(to_html,"[/img]","'>")
	to_html= replace(to_html,"[/IMG]","'>")

    to_html = edit_hrefs(to_html)
End Function
%>

<script language="javascript1.2" runat=server>
function edit_hrefs(s_html){
    // use regular expressions to look for 
    // e_mail addresses and urls
    s_str = new String(s_html);

    s_str = s_str.replace(/\bhttp\:\/\/www(\.[\w+\.\:\/\_]+)/gi, 
		"http\:\/\/¬¤¸$1");

    s_str = s_str.replace(/\b(http\:\/\/\w+\.[\w+\.\:\/\_]+)/gi,
		"<a href=\"$1\">$1<\/a>");
		
    s_str = s_str.replace(/\b(www\.[\w+\.\:\/\_]+)/gi, 
		"<a href=\"http://$1\">$1</a>");
		
    s_str = s_str.replace(/\bhttp\:\/\/¬¤¸(\.[\w+\.\:\/\_]+)/gi,
		"<a href=\"http\:\/\/www$1\">http\:\/\/www$1</a>");
		
    s_str = s_str.replace(/\b(\w+@[\w+\.?]*)/gi, 
		"<a href=\"mailto\:$1\">$1</a>");
		
    
//	s_str=s_str.replace( /\b\[font=([a-z]+)\]/gi,"<font face='$1'>");
	s_str=s_str.replace( /\[font=([a-z]+)\]/gi,"<font face='$1'>");

	s_str=s_str.replace( /\[size=([1-9]+)\]/gi,"<font size='$1'>");
	
	s_str=s_str.replace( /\[color=([a-z]+)\]/gi,"<font color='$1'>");
	
    return s_str;
}
</script>
<%
function smilie(pics)
pics = replace(pics, ":)", "<img src='pics/smilie/smilie.gif' border=0>")
pics = replace(pics, ":(", "<img src='pics/smilie/smilie2.gif' border=0>")
pics = replace(pics, ":D", "<img src='pics/smilie/smilie3.gif' border=0>")
pics = replace(pics, ":?:", "<img src='pics/smilie/smilie4.gif' border=0>")
pics = replace(pics, ":arg:", "<img src='pics/smilie/smilie5.gif' border=0>")
pics = replace(pics, ":raw:", "<img src='pics/smilie/smilie6.gif' border=0>")
pics = replace(pics, ";)", "<img src='pics/smilie/smilie7.gif' border=0>")
smilie = pics
end function 
%>
<%
function koder(ubb)
ubb = replace(ubb, "[b]", "<b>")
ubb = replace(ubb, "[/b]", "</b>")
ubb = replace(ubb, "[i]", "<i>")
ubb = replace(ubb, "[/i]", "</i>")
ubb = replace(ubb, "[u]", "<u>")
ubb = replace(ubb, "[/u]", "</u>")
ubb = replace(ubb, "[center]", "<center>")
ubb = replace(ubb, "[/center]", "</center>")
ubb = replace(ubb, "[citat]", "<font color=#000000>Citat:<br><hr>")
ubb = replace(ubb, "[/citat]", "<br><hr></font>")
ubb = replace(ubb, "[citat]", "<font color=#000000>Citat:<br><hr>")
ubb = replace(ubb, "[/citat]", "<br><hr></font>")
ubb = replace(ubb, "[b]", "<b>")
ubb = replace(ubb, "[/b]", "</b>")
ubb = replace(ubb, "[i]", "<i>")
ubb = replace(ubb, "[/i]", "</i>")
ubb = replace(ubb, "[U]", "<u>")
ubb = replace(ubb, "[/U]", "</u>")
ubb = replace(ubb, "[CENTER]", "<center>")
ubb = replace(ubb, "[/CENTER]", "</center>")
koder = ubb
end function 
%>

Kallas på:
<%=koder(smilie(to_html(rs("Mess"))))%>

Enda problemet som jag inte löst än är att bilder blir:
<img src='<a href="http://www.min">http://www.min</a>-url.nu/avatars/46.gif'>

Vet inte hur jag ska lösa det

[Redigerat av aleborg den 26 apr 2001]

[Redigerat av aleborg den 26 apr 2001]

kul, forumet sabbar koden!

Om den koden som ligger här ovan inte är 100% kan du väl maila den till mig