Tutorial: Realizziamo una chat per il nostro sito (Lesson 2)

di
Spread the love

Cominciamo la nostra seconda lezione sulla creazione di una piccola chat da inserire in un box del nostro sito web, spiegando a cosa servono le righe di comando che abbiamo utilizzato nell’Action Script del pulsante Invia.

 

L’azione:

 

loadVariablesNum (“resp.asp”, 0, “POST”);

 

da l’avvio al inserimento del nuovo messaggio, effettua il refresh dei messaggi e pulisce il nostro campo di testo per inserire i nuovi messaggi.

Lo script di resp.asp, va comunque inserito in codice. Di seguito vedremo l’inserimento effettuato con i commenti per capire meglio passo passo cosa stiamo facendo:

<%
Dim strLinea, FileObject, Instream, intVisite, intTipo, OutStream, i, k, arrMsg(100), fine, allMsg
‘questa stringa permette l’utilizzo semplice in visualizzazione di : “username _ messaggio”
stringa = Trim(Request(“stringa”))
strFile = Server.MapPath(“msg.txt”)
‘ definiamo l’oggetto creato in questo caso i messaggi che andranno in un file di testo
Set FileObject = Server.CreateObject(“Scripting.FileSystemObject”)
‘faccio la lettura del file
intTipo = 1 ‘ lettura
Set InStream = FileObject.OpenTextFile(strFile,IntTipo,true)
‘inseriamo il valore di data e ora al messaggio per fare in modo che in ordine cronologico siano aggiunti nella lista
i = 0
arrMsg(i) = FormatDateTime(Now(),3)&” – “&stringa
‘leggiamo il file di testo ed inseriamo i messaggi
Do While not InStream.AtEndOfStream
StrLinea = InStream.ReadLine()
i=i+1
arrMsg(i) = StrLinea
Loop
Set OutStream = FileObject.CreateTextFile(strFile, true)
‘determiniamo il numero massimo di messaggi
if i>15 then
fine=15
else
fine=i
end if
k=0
‘visualizziamo in Flash i messaggi inserendo il (br) a capo dove necessario
Do While k<=fine
OutStream.WriteLine(arrMsg(k))
allMsg=allMsg&arrMsg(k)&”<br />”
k=k+1
Loop
OutStream.Close
Set OutStream = Nothing
InStream.Close
Set InStream = Nothing
Set FileObject = Nothing
‘inviamo definitivamente i messaggi alla chat
Response.Write(“corpo=”&allMsg)
%>

Ecco, così abbiamo inserito il codice alla nostra chat e potremmo utilizzarla in modalità standard per dare la possibilità agli utenti del vostro sito di scambiare due chiacchiere. Ricordiamo che la versione utilizzata per la realizzazione di questo tutorial è l’ActionScript 4 incluso nella suite Adobe Macromedia Flash CS4 Professional.

Nella prossima ed ultima lezione, vedremo come dare un “tocco di colore” alla nostra chat.

Related Posts:

7.693 commenti su “Tutorial: Realizziamo una chat per il nostro sito (Lesson 2)”

  6. side effects of gabapentin medication [url=http://neurocaredirect.com/#]gabapentin medline pubmed[/url] FDA-approved gabapentin alternative

    Rispondi

  7. купить диплом техникума высокого пять плюс [url=http://frei-diplom8.ru]купить диплом техникума высокого пять плюс[/url] .

    Rispondi

  19. generic gabapentin pharmacy USA [url=https://neurocaredirect.shop/#]gabapentin capsules for nerve pain[/url] gabapentin capsules for nerve pain

    Rispondi

  24. gabapentin 100mg gre [url=http://neurocaredirect.com/#]gabapentin capsules for nerve pain[/url] Neurontin online without prescription USA

    Rispondi

  29. tadalafil canadian pharmacy online [url=http://everlastrx.com/#]FDA-approved Tadalafil generic[/url] safe online pharmacy for ED pills

    Rispondi

  40. affordable Neurontin medication USA [url=http://neurocaredirect.com/#]Neurontin online without prescription USA[/url] can you drink alcohol and take gabapentin

    Rispondi

  49. можно купить диплом медсестры [url=www.frei-diplom15.ru/]можно купить диплом медсестры[/url] .

    Rispondi

Lascia un commento