aggiornare campo si/no

[-AA-]

non riesco a passare i valore sottocategoria (campo si/no) correttamente

tipo
risutatovecchio = 6
risutatovecchio = (cint(Categoria("num_cat"))-1)
sottocat = 0

if risultatovecchio = cint(0) then
strSql = " UPDATE Categoria SET num_Cat = " & ToSql(risutatovecchio) & ", sottocategoria = " & ToSql(sottocat) & " where IDCategoria =" & vecchiacategoria
cn.Execute strSql
else
strSql = " UPDATE Categoria SET num_Cat = " & ToSql(risutatovecchio) & " where IDCategoria =" & vecchiacategoria
cn.Execute strSql
end if


in questo modo non è mai ELSE ...
if risultatovecchio = cint(0) then <--- va bene scritto così il confronto?

[santino83_11_04]

esagerato, se scrivi il numero nel codice, per altro numero intero, perchè devi mettere cint?

ma sei sicuro che risultatovecchio sia = a 0?

[-AA-]

esagerato...

hehe a dire il vero facevo tutto...appunto senza CINT ...ma non andava...per cui ho provato a mettere il cint ..ma appunto non cambia nulla...

risultatovecchio non è sempre uguale a zero...ma può esserlo...

questo perchè sposto delle "sottocategorie" e man mano che le sposto da 1 all'altra categoria...faccio -1 alla prima e +1 alla seconda...così che nella tabella CATEGORIE ho il numero di quante sono le sottocategorie legate...(mi serviva saperlo direttamente nella tabella),

ho anche 1 campo si/no nella stessa tabella che....quando num_cat <--- numero di sottocategorie = a zero ...il campo si/no ...non deve essere spuntato...

per dirti santino...io inserisco nel DB anche il num risultatovecchio ed è ok

la mia logica è questa...esempio...
Categoria("num_cat") = 1

risultatovecchio = (Categoria("num_cat")-1)

per cui risultatovecchio = 0

[-AA-]

questo è quanto:

Dim fr, vecchiacategoria, nuovacategoria, idsottocat, risutatovecchio, risultatonuovo, sottocat, sottocat2, numincrementa
vecchiacategoria = request.QueryString("idc")
nuovacategoria = request.QueryString("idc2")
fr = request.QueryString("fr")


if fr = ("2") then
idsottocat = request.QueryString("idst")

set Categoria = Server.CreateObject("ADODB.Recordset")
sql = "select * from Categoria where IDCategoria =" & vecchiacategoria
Categoria.ActiveConnection = cn
Categoria.Open sql, cn
risutatovecchio = (cint(Categoria("num_cat"))-1)
sottocat = 0

if risultatovecchio = cint(0) then
strSql = " UPDATE Categoria SET num_Cat = " & ToSql(risutatovecchio) & ", sottocategoria = " & ToSql(sottocat) & " where IDCategoria =" & vecchiacategoria
cn.Execute strSql
else
strSql = " UPDATE Categoria SET num_Cat = " & ToSql(risutatovecchio) & " where IDCategoria =" & vecchiacategoria
cn.Execute strSql
end if


set Categoria = Server.CreateObject("ADODB.Recordset")
sql = "select * from Categoria where IDCategoria =" & nuovacategoria
Categoria.ActiveConnection = cn
Categoria.Open sql, cn
risultatonuovo = (cint(Categoria("num_cat"))+1)
sottocat2 = 1

strSql = " UPDATE Categoria SET num_Cat = " & ToSql(risultatonuovo) & ", sottocategoria = " & ToSql(sottocat2) & " where IDCategoria =" & nuovacategoria
cn.Execute strSql


strSql = " UPDATE Sottocategorie SET IDCategoria = " & ToSql(nuovacategoria) & " where IDSottocategoria =" & idsottocat
cn.Execute strSql

Categoria.close()
Set Categoria = nothing

[Cesar]

ma il tipo di campo "si/no" di access non è una booleana che si imposta con true e false ? :master:

[-AA-]

yes infatti quando lo stampo è true o false...ma corrispondono a zero e 1 per cui se metto...

sottocat = true ....o false mi da errore....

cmq il campo si/no ...lo modifica ....è che non mi fa l'else if giusto come dovrebbe essere...come se il confronto non fosse giusto

ora mi stampo tutto ...anche se l'ho già fatto....e vedo cosa sto combinando

[-AA-]

UPDATE Categoria SET num_Cat = '1', sottocategoria = '0' where IDCategoria =149<--- tolgo 1 sottocategoria

come si vede nella sopra il campo num_CAt è 1 (giusto)....per cui sottocat non dovrebbe esserci



UPDATE Categoria SET num_Cat = '1', sottocategoria = '1' where IDCategoria =148 UPDATE Sottocategorie SET IDCategoria = '148' where IDSottocategoria =174 <--- aggiungo una sottocategoria...




ho provato a spostare 1 sottocategoria da categoria i numerini "num_Cat" vengono calcoati giusto...non capisco dove sbaglio nel confronto

[-AA-]

Niente da fare ....è proprio il confronto che non va bene ...qualcuno vede l'errore?

codice pagina
set Categoria = Server.CreateObject("ADODB.Recordset")
sql = "select * from Categoria where IDCategoria =" & vecchiacategoria
Categoria.ActiveConnection = cn
Categoria.Open sql, cn
risutatovecchio = Categoria("num_cat")-1


if (risultatovecchio) = (0) then
sottocat = 0
strSql = " UPDATE Categoria SET num_Cat = " & ToSql(risutatovecchio) & ", sottocategoria = " & ToSql(sottocat) & " where IDCategoria =" & vecchiacategoria
response.Write(strsql)

else

strSql = " UPDATE Categoria SET num_Cat = " & ToSql(risutatovecchio) & " where IDCategoria =" & vecchiacategoria
response.Write(strsql)

end if

risultato response.write di UPDATE

UPDATE Categoria SET num_Cat = '4', sottocategoria = '0' where IDCategoria =149

Il response.write dovrebbe farmi una cosa come

UPDATE Categoria SET num_Cat = '4' where IDCategoria =149
e non aggiungere --> , sottocategoria = '0'



è proprio questo (credo) l'errore ---> if (risultatovecchio) = (0) then <--- ...ma come i può vedere nel response.write risutatovecchio è uguale a 4
sicuramente è una cavolata ...ma proprio non riesco a trovarla