Forum 

Forum AspNuke.it - Il tuo Portale OpenSource in ASP

Forum
  SUPPORTO TECNICO VECCHIE VERSIONI
      FUNZIONALITA' BASE
         Disabilitazione Commenti

Disabilitazione Commenti

Autore Messaggio
zingaro

Principiante
Principiante
5 Discussioni


Profilo - zingaro 		04 maggio 2003 alle 09:14:36 Profilo - zingaroInvia un messaggio privato Invia Messaggio Yahoo Rispondi quotando
...mi scuso per la ripetizione della domanda...ma nei post precedenti, pur provando, non sono riuscito a risolvere.
Desidererei poter disattivare i commenti per i visitatori non registrati, evitando così l'inserimento da parte di anonimi...
Un grazie a tutti....per l'aiuto !!! [lo]

zingaro1@hotmail.com
stefano

Utente
Utente
68 Discussioni


Profilo - stefano 		04 maggio 2003 alle 21:59:33 Profilo - stefanoInvia un messaggio privato Rispondi quotando
ho proposto una soluzione in questo post.
http://http://www.aspnuke.it/forum/Forum.asp?forum=7&section=3&post=3636&page=2
in fondo alla pagina.
Prova se funziona e fammi sapere.
Ciao
zingaro

Principiante
Principiante
5 Discussioni


Profilo - zingaro 		05 maggio 2003 alle 08:18:12 Profilo - zingaroInvia un messaggio privato Invia Messaggio Yahoo Rispondi quotando
Grazie Stefano per aver risposto al mio post,
io avevo letto la tua soluzione ed ho provato anche a metterla in pratica....ma sicuramente ho sbagliato qualche passaggio...
la riga 110 devo sostituirla o integrarla???
Potresti per favore essere chiarissimo....(io, come avrai capito, non capisco nulla o quasi di asp !! :()...ti ringrazio !!!!
stefano

Utente
Utente
68 Discussioni


Profilo - stefano 		07 maggio 2003 alle 12:17:18 Profilo - stefanoInvia un messaggio privato Rispondi quotando
Non occorre sostituire nulla.
Cercherò di essere più chiaro:
Questa è la sub che devi modificare:
Sub DisplayNewComment(iID, iType)
Dim oCn, oRs, rSQL, X

Set oCn = DBConnexion(DB_MAIN)

If iID = "" Then iID = 0
If sPseudo <> "" Then

CreateTopTable "AddComments", GetTranslation("LANG_ADD") & " - " & GetTranslation("LANG_COMMENTS")
Response.Write GLOBAL_SITE_SUBTABLE & vbCRLF
....................
............................
.........................
fino alla fine lasciare inalterata
poi
oCn.Close
Set oCn = Nothing
Set oRs = Nothing
ELSE
CreateTopTable "aggiungi", "aggiungi un commento"
Response.Write " Se vuoi inserire un commento devi registrarti"& vbCRLF %>

<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber1">
<tr>
<td width="50%" align="center">
<a href="http://www.tuodominio/authent.asp">Login</a></td>
<td width="50%">
<p align="center">
<a href="http://www.tuodominio/signup.asp">Registrati</a></td>
</tr>
</table>
<%
CreateBottomTable ""

End If
Le parti in neretto vanno aggiunte e dove c'è tuodominio devi mettere la tua url.
Spero di essere stato chiaro; comunque sono a disposizione per ulteriori chiarimenti.
Fammi sapere.

Log in

Login
Password
Memorizza i tuoi dati:

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 : 122
Membri : 0 offline Anna

Iscritti

 Utenti: 18940
Ultimo iscritto : glauco
Lista iscritti
Messaggi privati: 3373 Commenti: 2210 Immagini: 39 Downloads: 144 Articoli: 49 Pagine: 101 Siti web: 425 Notizie: 180 Sondaggi: 11 Preferiti: 199769 Post sui forum: 51195 Libro degli ospiti: 4 Eventi: 7

Versioni

Temi