ciao a tutti potete aiutarmi perfavore...ci mettete un attimo ne sono sicuro a risolvere;volevo sapere cosa va sostituito in questa parte del codice se potete scrivermela voi questa parte ho provato a cambiarla in mille modi ma mi da sempre errore..
codice:
Stringa = Replace(stringa, faccine(x, 1), "[img][/img]")
il codice dello script completo è questo:
codice:
<%

Function SMILE (STRINGA)

' DICHIARA L'ARRAY "FACCINE",
' CHE CONTERRA' LE FACCINE
' E IL NOME DELLE IMMAGINI CON LE
' QUALI SOSTITUIRLE..

dim faccine(2, 2)

' IL PRIMO NUMERO, INSERITO FRA PARENTESI
' (IN QUESTO CASO IL NUMERO 2), CORRISPONDE
' AL NUMERO DI FACCINE INSERITE
' DA SOSTITUIRE,
' QUINDI PER OGNI FACCINA DA SOSTITUIRE
' CON UNA IMMAGINE CHE INSERIREMO,
' DOVREMO INCREMENTARE IL PRIMO NUMERO
' PER AGGIUNGERE UNA FACCINA, SCRIVEREMO SOTTO
' LE FACCINE GIA' INSERITE:
' faccine(Numero seguente, 1) = "faccina"
' faccine(Numero faccina, 2) = "nome dell'immagine.estensione"
' RICORDIAMOCI DI INCREMENTARE IL PRECEDENTE NUMERO
' (L'INDICE DELL'ARRAY -> dim faccine(X, 2))

faccine(0, 1) = ":-)"
faccine(0, 2) = "felice.gif"
faccine(1, 1) = ":-("
faccine(1, 2) = "triste.gif"
faccine(2, 1) = ":D"
faccine(2, 2) = "felicissimo.gif"

' CARTELLA DOVE ANDRANNO MESSE LE IMMAGINI
' DELLE FACCINE (AD ESEMPIO "/SMILE/")

Cartella = "/img/"

' -> -> -> -> -> -> -> -> -> ->
' DA QUI INIZIA IL VERO CUORE
' DELLA FUNZIONE
' -> -> -> -> -> -> -> -> -> ->
' SE LA LUNGHEZZA DELLA STRINGA PASSATA
' E' MAGGIORE DI 0, EFFETTUA IL CONTROLLO
' E LE EVENTUALI SOSTITUZIONI DELLE FACCINE

IF Len(Stringa) > 0 Then

For x = 0 to Ubound(faccine)

' SOSTITUISCE LE EVENTUALI FACCINE
' CON LE LORO IMMAGINI

Stringa = Replace(stringa, faccine(x, 1), "[img][/img]")

Next

' RILASCIA IL CONTENUTO PASSATO
' CON LA SOSTITUZIONE OVVIAMENTE DELLE FACCINE
' CON DELLE IMMAGINI

SMILE = Stringa

End IF

End Function
%>
Grazie e buon lavoro a tutti