Forum ASP

[Fool]

Sto realizzando un forum in asp custom, mi servirebbe sapere alcune cosette.

- Il quote come lo faccio?
Vorrei che l'utente preme su quote di un messaggio e rimane tipo
>Messaggio
>Messaggio
>Lol

Come posso fare ?

- Inserire caratteri
Se immetti caratteri come apostrofi o accenti mi da errore (uso mysql!)
Il codice che uso è

Dim Conn
Dim Rs
Set Conn = Server.CreateObject("ADODB.Connection")
Set Rs = Server.CreateObject("ADODB.Command")
Conn.ConnectionString =

dim disc
disc = Request.QueryString("Forum")

Conn.Open
Rs.ActiveConnection = Conn
Rs.CommandType = 1
Rs.CommandText = "insert into ElencoDiscussioni (Forum, Autore, Messaggio, Data, Titolo) values('" & Request.QueryString("Forum") & "', '" & Session("Username") & "', '" & Request.Form("Messaggio") & "', '" & Date() & "', '" & Request.Form("Titolo") & "')"
Rs.Execute
Conn.Close

vorrei fare in modo che digerisse anche gli apostrofi nel messaggio

- Come posso inserire simboli che vengono trasformati in immagini come : D - >

Grazie a tutti !!!

[Roby_72]

Il primo ed il terzo punto li risolvi con js, quindi cerca nel forum scripting.
Il secondo punto con la replace:

messaggio = trim(Request.Form("Messaggio"))
messaggio = replace(messaggio, "'", "''")

titolo = trim(Request.Form("titolo"))
titolo = replace(titolo, "'", "''")

Rs.CommandText = "insert into ElencoDiscussioni (Forum, Autore, Messaggio, Data, Titolo) values('" & Request.QueryString("Forum") & "', '" & Session("Username") & "', '" & messaggio & "', '" & Date() & "', '" & titolo & "')"

roby

[Fool]

Perfetto grazie mille

Pe rle faccine ho fatto

dim messaggiob
messaggiob = replace(rec("Messaggio"), ":-)", "<img src=faccine/sorriso.gif>")


Pero mi permette di inserie un solo tipo di faccina, se io volessi inserire piu faccine come posso fare?

Grazie!

[nat99]

Originariamente inviato da Fool
Perfetto grazie mille

Pe rle faccine ho fatto

dim messaggiob
messaggiob = replace(rec("Messaggio"), ":-)", "<img src=faccine/sorriso.gif>")


Pero mi permette di inserie un solo tipo di faccina, se io volessi inserire piu faccine come posso fare?

Grazie!

tante replace... per ogni faccina

[Fool]

Si ma come?
Non posso ridefinire una variabile

[weppos]

Originariamente inviato da Fool
Si ma come?
Non posso ridefinire una variabile

Ridefinire no, rivalorizzare sì.
E' una variabile proprio perchè può variare.

Per comodità creati un array di emoticons con i percorsi e cicla l'array eseguendo il replace per ogni elemento.

[Fool]

Originariamente inviato da weppos
Ridefinire no, rivalorizzare sì.
E' una variabile proprio perchè può variare.

Per comodità creati un array di emoticons con i percorsi e cicla l'array eseguendo il replace per ogni elemento.

Puoi farmi un esempio di codice?

[Nuvolari2]

per poter quotare il messaggio precedente devi fare in modo che quando si clicca su "quote", il link di rimando alla pagina di creazione di un nuovo messaggio di risposta, contenga un parametro ID che indichi l'ID del messaggio a cui si sta rispondendo.

Nella pagina di risposta effettui una query sull'ID del messaggio a cui stai rispondendo (in modo da avere disponibile il testo del messaggio a cui si sta rispondendo). A quel punto lo metti, per esempio, nella text area di risposta.

Nel metterlo nella text area, ci metti davanti e in fondo una sequenza di caratteri speciali che ti inventi tu per visualizzarlo come testo quotato. Per esempio

testoQuotato = "[txtquote]" & query("testo") & "[/txtquote]"

nella pagina di visualizzazione finale del messaggio di risposta, fai in modo che ci sia un controllo per [txtquote] e [/txtquote], sostituendo a queste due sequenze di caratteri, per esempio, una sequenza di "------------------------
" per [txtquote] e una sequenza di "
------------------------" per [/txtquote]

oddio spero di essere stato chiaro...

[Nuvolari2]

Originariamente inviato da Fool
Puoi farmi un esempio di codice?

è semplice e senza if:
metti in sequenza tanti replace quante sono le faccine.

Il primo replace contiene Messaggio
tutti gli altri, contengono messaggiob

messaggiob = replace(rec("Messaggio"), ":-)", "<img src=faccine/sorriso.gif>")

messaggiob = replace(messaggiob, ":-(", "<img src=faccine/triste.gif>")

messaggiob = replace(messaggiob, "*-|", "<img src=faccine/ubriaco.gif>")

messaggiob = replace(messaggiob, ":-D", "<img src=faccine/risata.gif>")

[weppos]

Originariamente inviato da Fool
Puoi farmi un esempio di codice?

Cosa non sai fare tra:

1. creare un array
2. valorizzare ogni posizione dell'array
3. scorrere l'array
4. eseguire un replace per ogni elemento

?