Il codice sotto inserito nella pagina poll-inc.asp permette di visualizzare i sondaggi in modo random. Per il momento anche se funzionanete può essere migliorato, il vostro aiuto non farebbe male.
-----------------------------------------------
CODICE DA AGGIUNGERE DALLA RIGA 76 IN POI:
' 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
'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()
Commetata la riga della query, ed dimensionate due nuove variabili :
Inserito il 16 maggio 2005 alle 14:07:15 da pathfinder.
Ciao raga, ho notato che a volte il valore random è zero, perciò il sondaggio non appare ma appare la stringa sezione vuota. Qualcuno ha risolto il difetto ?
Grazie
Inserito il 23 maggio 2005 alle 16:21:38 da pierin.
C'è già un sito on line, per poter vedere e valutare la cosa? Grazie
Inserito il 26 luglio 2005 alle 18:16:36 da marcoasp.
Ciao, anche se in ritardo, io l'ho risolto in maniera molto banale, ossia dopo la riga
RandomNumber = Rnd * MaxId + 1
ho aggiunto la seguente :
if RandomNumber=0 then RandomNumber = 1
Manca la risoluzione di un problema, lo sto vedendo ora, anche perchè l'ho scaricato adesso e' che cmq anche se la visualizzazione casuale dei sondaggi funziona per qualunque sondaggio visualizzato da sempre lo stesso totale voti, presumibilmente il primo o l'ultimo che si trova nel db. Buon Lavoro
Inserito il 26 luglio 2005 alle 18:40:54 da marcoasp.
Ciao, dimenticavo: per quanto riguarda il problema relativo al valore random 0 oltre ad aggiungere la riga (banale) di cui commento precedente ho anche variato la riga
RandomNumber = Rnd * MaxId + 1
in
RandomNumber = Rnd * MaxId
Invece per il problema sempre riferito al commento precedente ossia al fatto del numero indicato come totale voti ho risolto così :
+ o - alla riga 116 e precisamente
While Not oRs.EOF iTdWidth = Round(100*(oRs("prHits")/MaxHits))
ho aggiunto dopo quest'ultima la seguente :
nbVotes = nbVotes + oRS("prHits")
Pare funzioni, calcolate che io lo utilizzo con SQL server, magari (non credo) con Access andava bene.
Buon Lavoro
Inserito il 26 luglio 2005 alle 18:42:44 da marcoasp.
una giornataccia, riferito al commento precedente ho anche aggiunto ovviamente prima del ciclo (riga 116 ca) While Not oRs.EOF iTdWidth = Round(100*(oR("prHits")/MaxHits))
la seguente riga
nbVotes = 0
Cià
Marco
Inserito il 26 luglio 2005 alle 19:01:37 da marcoasp.
rieccomi putroppo lavorandoci ho trovato qualche altro piccolo bag, ad esempio randomizzando la visualizzazione si hanno problemi quando poi vado a visualizzare la pagina sondaggi, poi il conteggio del totale dei voti va rifatto anche da un'altra parte, quindi se mi dite come rimando tutto il file polls-inc.asp corretto e facciamo prima.....
Cià Marco
Inserito il 28 luglio 2005 alle 15:08:15 da pathfinder.
Ottima soluzione marcoasp.
Aggiungi - Commenti
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 : 140 Membri : 0
Anna
Iscritti
Utenti: 18940
Ultimo iscritto : glauco Lista iscritti Messaggi privati: 3373Commenti: 2210Immagini: 39Downloads: 144Articoli: 49Pagine: 101Siti web: 425Notizie: 180Sondaggi: 11Preferiti: 758050Post sui forum: 51195Libro degli ospiti: 4Eventi: 7
Anna
Versione stampabile | Questa pagina è stata eseguita in 0,0625 secondi.
![[lo]](/smileys/coucou.gif)
![[big]](/smileys/bigleu.gif)