Avatar billede stkol Nybegynder
06. september 2005 - 20:48 Der er 3 kommentarer og
1 løsning

Gemning af filnavn i DB efter upload med ASPSmartUpload

Hejsa

Jeg sidder og skal have lagt noget information fra en form ind i en database, efter at jeg har uploaded en fil. I denne database skal jeg også have filnavnet lagt ind, men det ser ikke ud til at jeg kan få det til at virke (filen bliver fint uploaded)filnavnet vil ikke blive udskrevet!!

Koden er :

<%
    Dim strSql
    Dim dbInsert_connection
   
  On Error Resume Next

'  Variables
'  *********
  Dim mySmartUpload
  Dim intCount
       
'  Object creation
'  ***************
  Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")

'  Only allow gif,png,jpg,jpeg or swf files
'  ***************************
  mySmartUpload.AllowedFilesList = "gif,png,jpg,jpeg,swf"

'  Deny physical path
'  *******************
  mySmartUpload.DenyPhysicalPath = True

'  Only allow files smaller than 70000 bytes
'  *****************************************
  mySmartUpload.MaxFileSize = 70000

'  Deny upload if the total fila size is greater than 200000 bytes
'  ***************************************************************
  mySmartUpload.TotalMaxFileSize = 80000

'  Upload
'  ******
  mySmartUpload.Upload

'  Save the files with their original names in a virtual path of the web server
'  ****************************************************************************
  intCount = mySmartUpload.Save("/admin/frame/banner")

    '#Insert the Banner
    set dbInsert_connection = Server.CreateObject("ADODB.Connection")
    dbInsert_connection.Open Application("ConnectString")
    set rsSave = Server.CreateObject("ADODB.Recordset")

    strSql = "INSERT INTO banner(bannerimg, filetype, firmanavn, url, beskrivelse, bannertype, show) values('" & FileName & "','" & mySmartUpload.form("filetype") & "','" & mySmartUpload.form("firmanavn") & "','" & mySmartUpload.form("url") & "','" & mySmartUpload.form("beskrivelse") & "','" & mySmartUpload.form("bannertype") & "','j')"

    dbInsert_connection.execute(strSql)

    response.write strSql
    response.end
   
    dbInsert_connection.Close
    set dbInsert_connection = Nothing

    response.redirect "bannermain.asp?added=yes"
%>

response.write strSql giver følgende:

INSERT INTO banner(bannerimg, filetype, firmanavn, url, beskrivelse, bannertype, show) values('','grafik','TestFirma','www.domain.com','Dette er en test tekst','largetop ','j')


Hvad skal jeg skrive istedet for mySmartUpload.form??

Jeg har prøvet med følgende

mySmartUpload.form
request.form
FileName

ingen virker!!

Håber i kan hjælpe!!

/Stig :-)
Avatar billede cpufan Juniormester
06. september 2005 - 21:57 #1
MysmartUpLoad.Files.Item(1).FileName
Avatar billede stkol Nybegynder
06. september 2005 - 22:04 #2
Det var dejligt nemt og hurtigt!! Det virker ;-) MANGE TAK *S

Smider du et svar??
Avatar billede cpufan Juniormester
06. september 2005 - 23:16 #3
kommer her
Avatar billede stkol Nybegynder
07. september 2005 - 07:54 #4
Endnu en gang tak ;-)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester