guestbook una volta per tutte

[zummo]

Ho letto tutti gli esempi di documentazione , i vari interventi e via dicendo....

Ma non ho ancora trovato un semplice guestbook da implementare nel mio sito.

Una cosa semplice con un'interfaccia grafica personalizzabile e con pochi comandi action script per immagazzinare dati.

Non mi importa se usa un db acces o un file testo un file xml, mi importa che funzioni.

Qualcuno mi può aiutare???

[oscarlogoteta]

http://www.enricolai.com/

[zummo]

Ho scaricato sia lo zoo guestbook che il guestbook indicati.....

quest operazione l'ho fatta qualche giorno fa.

Non mi funziona....

scritto il msg.. tenta la connessione ma non ci riesce......

Per quanto riguarda il supporto asp...... ho provato a caricare questo gb in tre siti che io posseggo e in tutti non funziona... cosa sbaglio????

[grandeorco]

Per rendere le cose piu facili costruisci un form html che invia i dati ad una pgina asp semplicemente per immagazinali nel db:
inserisci.asp
<%
nickname = request.form("nickname")
nickname = replace(nickname,"'","''")
messaggio = request.form("messaggio")
messaggio = replace(messaggio,"'","''")
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};" &_
"DBQ="& Server.MapPath("/fpdb/contatti.mdb/")
sql = "INSERT INTO guestbook (nickname, messaggio) VALUES('" & nickname & "','" & messaggio & "')"
Conn.Execute(sql)
conn.close
set conn = nothing
%>
Questo file presupone l' esistenza di una cartella fpdb con all' interno un db di nome contatti con dentro una tabella di nome guestbook con almeno i due campi nickname e messaggio.
I dati a questa pagina devono arrivare con il metodo POST, in questo modo invii i dati al db.
per leggere i dati devi usare una pagina asp contenente questo script:
<%
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};" &_
"DBQ="& Server.MapPath("/fpdb/contatti.mdb/")
sql = "SELECT * FROM guestbook ORDER by ID desc"
Set Rs = Conn.Execute(sql)
If Rs.EOF Then
testo = "Non ci sono dati disponibili!"
Else
Do Until Rs.EOF
testo = testo & "Scritto da :: " & Rs("nickname") & " testo del messaggio :: " & Rs("messaggio") & "
" Rs.MoveNext
Loop
End If
Rs.Close
Set Rs = Nothing
Conn.Close
Set Conn = Nothing
%>dati_contatti=<%=testo%>
lanciate questa pagina devi ottenere dati_contatti=
i dati raccolti. Prova, se funziona e facile fare il form in flash.

[zummo]

Era proprio questo che volevo evitare......

Non volevo mettermi lì a mettere troppo le mani su asp e html ma avrei voluto una piccola applicazione che tramite interfaccia flash mostrava i dati di un un db access o un file xml.

L'esempio di Enrico Lai andava benissimo.

MA NON FUNZIONA!!!!!!!

[zummo]

ho capito nessuno ha niente di meglio?????

[zummo]

Ormai ci rinuncio.. nessuno riesce a darmi una dritta per avere un guestbook semplice.

[grandeorco]

Se fai una ricerca puoi trovarne uno che funziona con un file php
e scrive i messaggi in un file txt, è uno dei primi guestbook che ho usato, se il tuo server suporta il php puoi farcela. Ciao