10 aprile 2003 alle 18:07:18 Modificato il 09 luglio 2003 alle 19:40:33www.rockshock.it/portaleaspe
non riesco in alcun modo ad inserire messaggi nei forum (ho definito il moderatore, gli argomenti, ma sia come utente registrato, sia come amministratore ... ninte da fare, il bottone nuovo messaggio non compare)
sondaggi: dopo un timido periodo di funzionamento, non capisco più come mai è sparita la possibilità di votare. in pratica non ci sono i radar button per esprimere le preferenze e non c'è il bottone vota, anche se entro come un utente registrato diverso.
grazie in anticipo per l'aiuto
Massimo
garmax
Amatore
47 Discussioni
10 aprile 2003 alle 18:25:47 circa il forum ho trovato una via di uscita, ma sul sondaggio permane nebbia fitta
joshua
Esperto
255 Discussioni
10 aprile 2003 alle 18:41:29 allora passiamo al tuo forum: molti mettono la registrazione tramite mail (anche io feci l'errore a suo tempo e nessuno postava) in effetti questo non permette agli utenti di postare nel forun neanche dopo la registrazione vai in amministrazione e poi in database fai la seguente query (in bd_forum)
select * from users where uservalid=0
vedrai quelli ke non possono postare per attivarli fai la query
update users set uservalid=-1 where uservalid=0
quindi ora se rifai la prima query non vedrai nessuno, tutti abilitati. per ovviare a tale errore
Vai nel file account-inc.asp e sostituisci la seguente funzione
Function ConfirmAccount(iUserID, sUserLogin, sUserPassword) Dim oCn, oCn2, oRs, rSQL, bDone
bDone = False
If iUserID <> "" Then Set oCn = DBConnexion(DB_MAIN)
rSQL = "SELECT uID FROM Users WHERE uID=" & iUserID & " AND uLogin='" & SQLEncrypt(sUserLogin) & "' AND uPassword='" & SQLEncrypt(sUserPassword) & "' AND uValid=0" Set oRs = DBRecordSet(oCn, rSQL)
If Not oRs.EOF Then rSQL = "UPDATE Users SET uValid=1 WHERE uID=" & iUserID DBExecute oCn, rSQL
Set oCn2 = DBConnexion(DB_FORUM) rSQL = "UPDATE Users SET UserValid=1 WHERE UserLogin='" & SQLEncrypt(sUserLogin) & "'" DBExecute oCn2, rSQL
bDone = True
oCn2.Close Set oCn2 = Nothing End If
oCn.Close Set oCn = Nothing Set oRs = Nothing End If
ConfirmAccount = bDone End Function
Prima di sostituire guarda se nella versione che hai tu manca effettivamente una riga.
--------------- Quarta legge di Finagle: Una volta che si e' pasticciato qualcosa, qualsiasi intervento teso a migliorare la situazione non fara' altro che peggiorarla. http://www.goonet.it http://www.exclusivelondonlife.com ---------------
joshua
Esperto
255 Discussioni
10 aprile 2003 alle 18:44:56 Per quanto riguarda i sondaggi, mi sembra che ti funzionano benissimo, non è che hai gia votato??? hehe in tal caso o aspetti 24ore o cancelli i cookie dal tuo pc, semplice no? ciauz
--------------- Quarta legge di Finagle: Una volta che si e' pasticciato qualcosa, qualsiasi intervento teso a migliorare la situazione non fara' altro che peggiorarla. http://www.goonet.it http://www.exclusivelondonlife.com ---------------
garmax
Amatore
47 Discussioni
11 aprile 2003 alle 19:33:24 grazie di tutto
Log in
Cerca
Sostieni AspNuke
Un piccolo gesto per aiutarci a mantenere AspNuke.it online
Promo
MusicWebItalia.it Video Testi Traduzioni Spot Colonne sonore Accordi e Spartiti gratis.
Visitatori
Visitatori Correnti : 124 Membri : 0
Anna
Iscritti
Utenti: 18940
Ultimo iscritto : glauco Lista iscritti Messaggi privati: 3373Commenti: 2210Immagini: 39Downloads: 144Articoli: 49Pagine: 101Siti web: 425Notizie: 180Sondaggi: 11Preferiti: 202477Post sui forum: 51195Libro degli ospiti: 4Eventi: 7