Come far apparire una variabile

[aliblu]

Salve,
da un database estraggo una varuabile che stampo a video nel seguente modo:
response.write rs("Descrizione")
pero anche se inserisco spazi e righe vuote queste non vengono considerate...il testo viene sempre stampato di seguito.
E' possibile far si che la variabile venga stamnpata con righe e spazi vuoti precedentemente inseriti appositamente?
Grazie

[Roby_72]

<%
descrizione = rs("descrizione")
descrizione = replace(descrizione, VbCrLf, "
")
response.write(descrizione)
%>

Roby

[aliblu]

Grazie...funziona benissimo...
volevo aggiungere...
è possibile (in che modo) far si che si possa inserire del testo come ad esempio
www.aliblu.it
oppure
http://www.aliblu.it
oppure qualcosa come in questo forum in firma....
Per potere far si che il testo appaia come link cliccabile?

Grazie ancora
attendo.

[Roby_72]

Function Link_URL(stringa)
	Dim objRegExp, strTemp
	Set objRegExp = New RegExp
	objRegExp.IgnoreCase = True                   
	objRegExp.Global = True
	objRegExp.Pattern = "(\b(https?\://)\S+\b}?)"
	strTemp = objRegExp.replace(stringa, "CLICCA QUI")
	Link_URL = strTemp
	Set objRegExp = Nothing
End Function

descrizione = rs("descrizione")
descrizione = Link_URL(descrizione"))
descrizione = replace(descrizione, VbCrLf, "
")
response.write(descrizione)

Roby

[aliblu]

c'è qualcosina che non funziona....
non si riesce neppure a visualizzare la pagina....
ricordo la provenienza da database della variabile descrizione.
cosa potrebbe essere?

[santino83]

togli "mostra errori http brevi" nelle opzioni di explorer e vedi che errore ti da

[aliblu]

Microsoft VBScript compilation error '800a03ea'

Syntax error

/web/pub/vittorioemanuele/link.asp, line 256

Function Link_URL(stringa)

[aliblu]

dove sbaglio?

[Roby_72]

descrizione = Link_URL(descrizione)

Roby

[aliblu]

mi da sempre lo stesso errore

Microsoft VBScript compilation error '800a03ea' 

Syntax error 

/web/pub/vittorioemanuele/link.asp, line 256 

Function Link_URL(stringa)
^

ricordo che l'accesso ad database avviene prima
e senza l'aggiunta di

Function Link_URL(stringa)
	Dim objRegExp, strTemp
	Set objRegExp = New RegExp
	objRegExp.IgnoreCase = True                   
	objRegExp.Global = True
	objRegExp.Pattern = "(\b(https?\://)\S+\b}?)"
	strTemp = objRegExp.replace(stringa, "CLICCA QUI")
	Link_URL = strTemp
	Set objRegExp = Nothing
End Function

funziona ....quindi dipende a quest'ultimo codice