Filnavn til database

Går ud fra det er aspSmartUpload du bruger...

Så burde du kunne trække navnet ud sådan:
mySmartUpload.Files.Item("File1").FileName

Yes, det er aspSmartUpload jeg bruger.. :-)

Prøver det lige, tak...

Den gav ingen fejl, men der kom desværre ikke noget ind i databasen.
Altså overskift og beskrivelse kommer fint ind..

Skriv følgende:

        oRs("filnavn") = mySmartUpload.Files.Item("File1").FileName
        oRs("pic") = mySmartUpload.Files.Item("File2").FileName
        oRs("overskrift") = mySmartUpload.form("overskrift")
        oRs("beskrivelse") = mySmartUpload.form("beskrivelse")

Smider lige hele koden, kan være jeg har lavet ged i det et andet sted i koden.

<%
'  Variables
'  *********
  Dim mySmartUpload
  Dim file1
  Dim file2
  Dim oConn
  Dim oRs
  Dim intCount
  intCount=0
  Session.LCID = 1030     
'  Object creation
'  ***************
  Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")

'  Upload
'  ******
  mySmartUpload.Upload
  intCount = mySmartUpload.Save("/aspSmartUpload/Upload")

'  Connect to the DB
'  *****************
  Set oConn = Server.CreateObject("ADODB.Connection")
  curDir = Server.MapPath("\database\storedb.mdb")
  oConn.Open "DBQ="& curDir &";Driver={Microsoft Access Driver (*.mdb)};DriverId=25;FIL=MS Access;"

'  Open a recordset
'  ****************
  strSQL = "SELECT * FROM seneste"

  Set oRs = Server.CreateObject("ADODB.recordset")
  Set oRs.ActiveConnection = oConn
  oRs.Source = strSQL
  oRs.LockType = 3
  oRs.Open

'  Select each file
'  ****************
  For each file In mySmartUpload.Files
  '  Only if the file exist
  '  **********************
      If not file.IsMissing Then

      '  Add the current file in a DB field
      '  **********************************
        oRs.AddNew
        oRs("filnavn") = mySmartUpload.Files.Item("File1").FileName
        oRs("pic") = mySmartUpload.Files.Item("File2").FileName
        oRs("overskrift") = mySmartUpload.form("overskrift")
        oRs("beskrivelse") = mySmartUpload.form("beskrivelse")
        oRs("tid") = now()
        oRs.Update
        intCount = intCount + 1
      End If
  Next

'  Display the number of files uploaded
'  ************************************
  Response.Write(intCount & " file(s) uploaded.<BR>")

'  Destruction
'  ***********
  oRs.Close
  oConn.Close
  Set oRs = Nothing
  Set oConn = Nothing
%>

Sorry, det virkede super!!!! :-)
Havde ikke fået opdateret da jeg prøvede.
Jeg siger mange tak...

Ved du noget om hvor jeg ikke kan uploade filer over 1 mb. (tror det er størrelsen), er der en begrænsning på aspSmartUpload?

Det er en begrænsning i IIS. Du skal ind og rette metabase.xml filen på serveren:
http://www.banmanpro.com/support2/File_Upload_limits.asp

.o) <-- One Eyed Jack

Ahhhh... sejt.. :-)

Så har vi fået det fixet....
Jeg siger mange tak...

Forresten, lige et bonusspørgsmål hvis du har tid.. hehe..
Jeg vil gerne have at den ikke bare overskriver filen når jeg uploader, men laver en hvor der f.eks. står  filnavn(1).jpg hvis billedet eksisterer i forvejen.. Ved du hvordan det laves?

Hvis du havde brugt ASPUpload i stedet havde det været nemt (kan du skifte til den?)
Kodemæssig er der ikke den store ændring fra aspSmartUpload til ASPupload.
Med ASPupload sætter du bare denne parametre:
Upload.OverwriteFiles = False

Hvis ASPUpload ikke er på serveren, bliver du nød til at gøre det manuelt, og tjekke om filen eksistere i forvejen via FileSystemObject.

Der må du så have lavet en funktion som kan tjekke om filen eksistere og hvis ikke prøve med "(x)" til den finder et ledigt filnavn. Det bliver dog noget bøvl med upload til memory, navn tjek og manuel save...

Hmmmm... det kan jeg godt se ikke er så nemt.

Jeg kommer fra ASPupload, men problemet er at jeg har fået min egen dedikeret server nu og der skal jeg selv betale for alle komponenter og ASPupload koster sgu rimelig meget og aspSmartUpload er gratis.. Det er grunden tl jeg er skiftet...

lol... Det er altid grunden til at man bruger SmartUpload :)

Jeg har ikke selv søgt, men jeg vil mene der er stor sansynlighed for at finde et script her på E (eller google) til aspSmartUpload som tjekker navnet. Prøv om du kan finde noget, ellers må du igang med at lave det selv :(

Okay, jeg checker lige om jeg kan finde det.
Men du skal i hvert fald have mangen tak for hjælpen, nu kan jeg opdaterer mit site igen.. :-)