condizione if

[referee84]

Originariamente inviato da optime
so che sono un rompi, ma se le cose ve le risolvete tra di voi, il forum a che serve? se un domani qualcuno ha lo stesso problema di oliweb cosa fa? scrive a referee84? su, fate i bravi

quoto completamente, ma era 1 situazione disperata!!!

[oliweb]

grazie per la comprensione referee84

[maximum]

Resta comunque valido quanto affermato da optime, se si apre un topic, implicitamente ci si appoggia agli utenti della community, altrimenti si usano i messaggi privati e, di conseguenza, le mail o qualsivoglia contatto.

[oliweb]

avete ragione1
il problema è stato risolto in parte!
allora si è creato con l'aiuto di referee84 questa funzione:

'CREI UNA FUNZIONE CHE TI FACCIA QUESTO CONTROLLO e CHE ACCETTI COME PARAMETRO IN INGRESSO LA LOGIN O L'ID DELL'UTENTE
Function VerificaNumeroCrediti(UserID)
dim strSQL,result
result = false
'FAI LA SELECT DENTRO LA TUA TABELLA, OVVIAMENTE SE QUALCOSA NON COINCIDE NELLA WHERE CAMBIALO
strSQL = "SELECT mcrediti FROM aspbb_members where mid = " & UserID
set Rs = Conn.Execute(strSQL)
if not Rs("mcrediti") = 0 then
result = false
end if
VerificaNumeroCrediti = result
End Function

if VerificaNumeroCrediti(userid) Then

che fa visualizzare il form se l'utente ha più di 1 credito!
inviece nn si è riusciti a far scalare il credito ogni volta che un utente inserisce un topic:
è stata creata questa funzione (sempre con l'aiuto di referee84 ):

Function ScalaCrediti(UserID)
dim strSQL,result
result = false
'FAI LA SELECT DENTRO LA TUA TABELLA, OVVIAMENTE SE QUALCOSA NON COINCIDE NELLA WHERE CAMBIALO
strSQL = "update aspbb_members set mcrediti = mcrediti - 1 where mid = " & userId
set Rs = Conn.Execute(strSQL)
ScalaCrediti = result
End Function

e viene richiamata così:

objDAL.Execute "Update aspbb_members set mcrediti = mcrediti - 1 where mid = " & userId

però il problema è che mi fa intervenire nella discussione ma non mi scala il credito!

qualcuno sa darmi qualche dritta?
vi chiedo sucsa di nuovo per essere andati in privato!
Grazie

[optime]

che l'hai fatta a fare la funzione se poi NON la usi?

richiamala con

x = ScalaCrediti(UserID)

[oliweb]

ti ringrazio, però me la potresti spiegare e dirmi dove la dovrei inserire?

grazie

[optime]

VVoVe: ti devo spiegare una cosa che hai fatto tu?

[oliweb]

no però ho richiamato la funzione come hai detto tu, ma non va!

[optime]

avevi detto una cosa diversa... comunque, che vuol dire 'non va'?

[oliweb]

mi fa inserire la discussione, però non mi scala il credito

scusa se mi sono espresso male!