Forum 

Forum AspNuke.it - Il tuo Portale OpenSource in ASP

newsletter di default

Autore Messaggio
orbitando

Amatore
Amatore
39 Discussioni



Profilo - orbitando
26 maggio 2003 alle 15:19:21 Profilo - orbitandoInvia un messaggio privato Rispondi quotando
Ragazzi vorrei che le news fossero di default attivate per tutti quli iscritti
o almeno in atto dell'iscrizione aggiungere una riga dove si da la possibilità di scegliere come posso fare ne ho provato un casino non ci riesco. aiuto :)
djveleno

Amministratore

Esperto
Esperto
1025 Discussioni



Profilo - djveleno
26 maggio 2003 alle 22:03:13 Profilo - djvelenoInvia un messaggio privato Rispondi quotando
Scusa, puoi essere più chiaro? Non ho capito bene la tua domanda, riguarda la newsletter o la possibilità di scrivere news?
Ciauzz Dj
---------------
A lavare la testa ai somari, ci si rimette l'acqua e il sapone!

http://aspnuke208.somee.com/Default.asp

orbitando

Amatore
Amatore
39 Discussioni



Profilo - orbitando
27 maggio 2003 alle 00:10:28 Profilo - orbitandoInvia un messaggio privato Rispondi quotando
io vorrei le newsletter attivate di default per tutti i nuovi iscritti
orbitando

Amatore
Amatore
39 Discussioni



Profilo - orbitando
29 maggio 2003 alle 01:47:03 Profilo - orbitandoInvia un messaggio privato Rispondi quotando
Possibile che nessuno sappia come fare?????
felixcafarelli

Eliminato
Eliminato
0 Discussione



Profilo - felixcafarelli
29 maggio 2003 alle 08:31:11 Profilo - felixcafarelliInvia un messaggio privato Rispondi quotando
Nella pagina /includes/account-inc.asp, nella funzione AddAccount, in grassetto il valore della newsletter basta impostarlo ad 1 di default:


If bAutoSignup Then
rSQL = "INSERT INTO users (uLogin, uPassword, uEmail, uMSN, uYahoo, uICQ, uAIM, uURL, uSignature, uRole, uDate, uNewsletter, uProfile, uValid) VALUES ('" & SQLEncrypt(sMyLogin) & "', '" & SQLEncrypt(sMyPassword) & "', '" & SQLEncrypt(sMyEmail) & "', '', '', '', '', '', '', " & ROLE_USER & ", '" & DateTimeToString(Now()) & "', 1, 1, 1)"
rSQL2 = "INSERT INTO Users (UserLogin, UserPosts, UserValid) VALUES ('" & SQLEncrypt(sMyLogin) & "', 0, 1)"
Else
rSQL = "INSERT INTO users (uLogin, uPassword, uEmail, uMSN, uYahoo, uICQ, uAIM, uURL, uSignature, uRole, uDate, uNewsletter, uProfile, uValid) VALUES ('" & SQLEncrypt(sMyLogin) & "', '" & SQLEncrypt(sMyPassword) & "', '" & SQLEncrypt(sMyEmail) & "', '', '', '', '', '', '', " & ROLE_USER & ", '" & DateTimeToString(Now()) & "', 1, 1, 0)"
rSQL2 = "INSERT INTO Users (UserLogin, UserPosts, UserValid) VALUES ('" & SQLEncrypt(sMyLogin) & "', 0, 0)"
End If
orbitando

Amatore
Amatore
39 Discussioni



Profilo - orbitando
30 maggio 2003 alle 18:08:32 Profilo - orbitandoInvia un messaggio privato Rispondi quotando
Grazie mille

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 : 209
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: 558 Notizie: 180 Sondaggi: 11 Preferiti: 5685533 Post sui forum: 51195 Libro degli ospiti: 4 Eventi: 7

Versioni

Temi