Forum 

Forum AspNuke.it - Il tuo Portale OpenSource in ASP

Sondaggi homepage Random

Autore Messaggio
pathfinder

Amatore
Amatore
40 Discussioni



Profilo - pathfinder
10 maggio 2005 alle 10:44:17 Profilo - pathfinderInvia un messaggio privato Rispondi quotando
Dim MaxId, RandomNumber

' RANDOM POLLS
rSQL = "SELECT MAX(pID) AS MaxId FROM polls"
set oRs = oCn.Execute(rSQL)

If Not oRs.Eof Then
MaxId = oRs("MaxId")
Else
MaxId = 0
End If
oRs.Close
Set oRs = Nothing

Randomize
RandomNumber = Rnd * MaxId + 1
' FINE RAMDOM POLLS

'rSQL = "SELECT prID, pColor, pTitle, prHits, prText FROM polls, pollsresults WHERE pID=prPoll AND pValid=1 AND pID=" & iID
rSQL = "SELECT polls.*, pollsresults.*, polls.pValid, polls.pID, polls.pID FROM polls, pollsresults WHERE (((polls.pValid)=True) AND ((polls.pID)=(" & Cint(RandomNumber) & ") And (polls.pID)=[prPoll]));"

'Response.write rSQL
'Response.End()


Il codice sopra permette di visualizzare i sondaggi in modo random nella homepage.
Inserire il codice dalla riga 76 in poi nella pagina polls-inc.asp, aggiungendo le nuove variabile e commentando la query vecchia.

Il codice è testato sulla versione 2.0.5


Ciao a tutti. (i)
djveleno

Amministratore

Esperto
Esperto
1025 Discussioni



Profilo - djveleno
10 maggio 2005 alle 21:30:58 Profilo - djvelenoInvia un messaggio privato Rispondi quotando
Carissimo Path, a parte il dire che chi sviluppa codice per Aspnuke è sempre ben visto dallo staff, vorrei precisare una piccola cosa, prima di rilasciare del codice, vorremmo essere messi in grado di testarlo e, successivamente, dare l'ok per il rilascio, queste operazioni di scrittura di codice le puoi fare liberamente sul tuo portale, nel forum di Aspnuke sarebbe meglio contattare preventivamente qualcuno dello staff, tieni conto che, sia io che Zalabard che Emu, siamo presenti quasi tutti i giorni.
Ciauzz DJ
---------------
A lavare la testa ai somari, ci si rimette l'acqua e il sapone!

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

pathfinder

Amatore
Amatore
40 Discussioni



Profilo - pathfinder
11 maggio 2005 alle 08:13:41 Profilo - pathfinderInvia un messaggio privato Rispondi quotando
Msg recepito.
Scusate

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 : 123
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: 202947 Post sui forum: 51195 Libro degli ospiti: 4 Eventi: 7

Versioni

Temi