salve, lo so fare con due moduli, ma sarebbe possibile uplodare con un solo form testi e un file diverso da immagine, ad esempio pdf?
salve, lo so fare con due moduli, ma sarebbe possibile uplodare con un solo form testi e un file diverso da immagine, ad esempio pdf?
Ovvio, che differenza c'è in termini tecnici tra le due cose? Nessuna...
Roby
www.creamweb.it [v. 3.0]
:: Script ASP!
:: Web directory gratuita!
:: Campioni del mondo!
E allora perchè con questo mi uploda soltanto formati immagini? Cosa devo cambiare?
- <%
Response.Buffer = true
server.scripttimeout = 3600 'Secondi
Dim oUpload
Set oUpload= new cUpload
With oUpload
.EnabledAspUpload = False
.EnabledImageSize = True
.EnabledLog = False
.AutoRename = True
.Overwrite = False
.SetPath "archivio\"
.Load
titolo_file = oUpload.Form("titolo_file")
titolo_file= Replace(titolo_file, "'", "|")
titolo = oUpload.Form("titolo")
titolo= Replace(titolo, "'", "|")
testo = oUpload.Form("testo")
testo= Replace(testo, "'", "|")
data = oUpload.Form("data")
nomefile = oUpload.Form("nomefile")
response.write titolo_file &"
"
response.write titolo &"
"
response.write testo &"
"
response.write nomefile &"
"
response.write data
sArray=SPLIT(nomefile,".")
cod0=sArray(0)
cod1=sArray(1)
finale = (cod1)
nomefile1 = (cod0)
If finale ="pdf" Then
nomefile = .GetFileName()
.UploadOnly "Images"
.SetDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("/mdb-database/documenti.mdb"),"SELECT * FROM documenti"
If Not.EOF then
%>
<head>
<link rel="stylesheet" href= "/stile.css" type="text/css" media="screen" />
<meta http-equiv="refresh" content="5;URL=/modulo_documento.asp?titolo_file=<%=titolo_file%>& testo=<%=testo%>">
</head>
<%
else
.MoveFirst
.Database.Open()
.Save
Response.write "<html>"
Response.write "<head>"
Response.write "<title>.:: nuovo documento ::.</title>"
Response.write "<link rel=""stylesheet"" href=""/stile.css"" type=""text/css"">"
Response.write "</head>"
Response.write "<body>"
Response.write "<span class=""tr11"">[b]"
Response.write "il documento è stato salvato con il file "
Response.write "<span class=""tr11rosso"">"
Response.write nomefile
Response.write "</span>"
Response.write "[b]</span>"
Response.write "</body>"
Response.write "</html>"
.Database.Fields("titolo") = .Form("titolo")
.Database.Fields("titolo_file") = .Form("titolo_file")
.Database.Fields("testo") = .Form("testo")
.Database.Fields("data") = .Form("data")
.Database.Fields("nomefile") = .GetFileName
.Database.Addnew()
.MoveNext
end If
Else
%>
<head>
<link rel="stylesheet" href= "/stile.css" type="text/css" media="screen" />
<meta http-equiv="refresh" content="10;URL=/modulo_documento.asp?titolo_file=<%=titolo_file%>& testo=<%=testo%>">
</head>
<%
response.write "
"
response.write "<p align=""center"">"
response.Write "<span class=""tr11"">"
response.write "il documento "
response.write "<span class=""tr11rosso"">"
response.write .GetFileName()
response.write "</span>"
response.write " deve essere in formato pdf"
response.Write "</span></p>"
End If
end with
%>
<html>
<head>
<meta http-equiv="refresh" content="5;URL=/modulo_documento.asp">
</head>
Non ti sembra un po' sospetta questa?
Robycodice:.UploadOnly "Images"
www.creamweb.it [v. 3.0]
:: Script ASP!
:: Web directory gratuita!
:: Campioni del mondo!
Certo che mi è sospetta!
Risolto:
invece di
.UploadOnly "Images"
utilizzare
oUpload.SaveAll
Originariamente inviato da jet
Risolto:
invece di
.UploadOnly "Images"
utilizzare
oUpload.SaveAll
usare oUpload.SaveAll se non devi fare operazioni sui file che hai caricato.....
IP-PBX management: http://www.easypbx.it
Old account: 2126 messages
Oldest account: 3559 messages
Perchè.
Permessi di invio
Rispondi quotando