categoria e immagini

[oric76]

Salve volevo sapere come si puo fare a inserire con la creazione di una nuova categoria, uplodare un'immagine con la stessa categoria.
di modo tale che la categoria venga visualizzata con l'immagine
ecco il codice che utilizzo per creare la nuova categoria:
..................
<%

If Request.QueryString("Categoria")<>"" Then

categoria=replace(Request.QueryString("categoria") ,"'","''")

Sql = "insert into Categorie (categoria) values ('" & categoria & "')"
conn.execute(Sql)
conn.Close
set rs = nothing
set conn = nothing
Response.Write "
"
Response.Write "<p align=""center"" class=""testo12nero"">"
Response.Write "I DATI SONO STATI INSERITI CORETTAMENTE NEL DATABASE
"
Response.Write "Torna alla pagina principale di amministrazione. Clicca qui!"

else
%>
..........................

[Sclerato]

mi sa che ci devi lavorare un po'
fai una ricerca riguardo la classe di baol
altro nin zo'

[oric76]

allora sono passato all'azione
il risultato mi uploada l'img, ma il problrma e il record nel database che non mi scrive la cat, sottocat.
ho fatto cosi:
Dim bytecount
Dim retErr
Dim id, description, filePath
'Dim db, tb

bytecount = UpLoad()

if bytecount > 0 then

END IF
If Request.QueryString("Sottocategoria")<>"" Then

categoria=replace(Request.QueryString("categoria") ,"'","''")
Sottocategoria=replace(Request.QueryString("sottoc ategoria"),"'","''")
''''''''''''''''''''''''''''''''''''
uploadFile = "./administrator/public/" & inputs("uploadFile").filename


if inputs("uploadFile").isFile = true and (ucase(right(uploadFile,3))="GIF" or ucase(right(uploadFile,3))="JPG") then

retErr = inputs("uploadFile").saveFileAs(Server.MapPath( "public"), "")
end if
'''''''''''''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''

Sql = "insert into Sottocategoria (categoria, sottocategoria, immagine) values ('" & categoria & "', '" & sottocategoria & "', '" & uploadfile& "')"
conn.execute(Sql)
conn.Close
set rs = nothing
set conn = nothing
Response.Write "
"
Response.Write "<p align=""center"" class=""testo12nero"">"
Response.Write "I DATI SONO STATI INSERITI CORETTAMENTE NEL DATABASE
"
Response.Write "Torna alla pagina principale di amministrazione. Clicca qui!"

else
%>

qualcuno mi aiuti

[seafarer]

conn.execute(Sql)

...ma conn l'hai dichiarato?cioè...alla fine il tuo problema si è ridotto al fatto che non scrive sul db?

[oric76]

il problema e che il tutto mi crea un nuovo record in cui viene scritto solo il percorso dell'immagine senza il nome della sottocategoria

[seafarer]

non mirisulta che vbscript sia case sensitive ma prima hai messo nell'if
Request.QueryString("Sottocategoria")
poi nel replace
Request.QueryString("sottocategoria")
cmq prova a stampare a video solo ciò che c'è nel request per la sottocategoria e controlla che non sia davvero vuoto

[oric76]

allora mi spigo meglio.
Quando cerco di aggiungere una nuova sottocategoria con l'upload della relativa immagine, ner database succede questo: viene creato un nuovo record che contiene solo ed esclusivamente il percorso dell'img uplodada. (il nome della sottocategoria nn viene scitti)
cmq faro' altre prove..........

[Roby_72]

L'id della categoria lo devi passare come campo hidden del form.
L'upload di baol ti consente di prelevare dati che non siano file ma devi capirne il metodo. Non tramite request tradizionale comunque.

Roby