ASP upload eller smart upload

ASPsmartupload er nemt at have med at gøre, og gratis :))
Rimelige gode eksempler på http://www.aspsmart.com/scripts/aspSmartUpload/publigen/content/templates/show.asp?P=258&L=EN

Det første eksempel på siden opfylder dine kriterier.

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

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

'  Save the files with their original names in a virtual path of the web server
'  ****************************************************************************
  intCount = mySmartUpload.Save("/aspSmartUpload/Upload")
  ' sample with a physical path
  ' intCount = mySmartUpload.Save("c:\temp\")

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


det forstår jeg ikke?? hvor gemmer den? og hvor får den fil navn og sti fra?
Jeg regner med, at give fil navnet now(); da de jo så ikke kommer til at hedde det samme, og så bare gemme navnet i databasen...

Her defineres stien hvor billedet gemmes:
intCount = mySmartUpload.Save("/aspSmartUpload/Upload")

Du skal bruge Sample 4 hvis du skal gemme i en database.

Okay, men hvad så med filnavn?

Filnavnet er det billedet hedder i forvejen.

Det er lidt et problem, kan du ik et eller andet trick så jeg kan kalde det hvad jeg vil? eks tiden, som jeg skriver...?

det er jo ikke så godt, hvis der er flere billeder, der kommer til at hedde det samme, hvilket jo er meget tænkeligt

For each file In mySmartUpload.Files
      If not file.IsMissing Then
    nytfilnavn =  Now()
        file.SaveAs("/aspSmartUpload/Upload" & nytfilnavn)
      End If
  Next

Sådan noget lignende

Server object error 'ASP 0177 : 800401f3'

Server.CreateObject Failed

/upload.asp, line 7
  denne fejl får jeg og koden ser sådan ud:


<%

  Dim mySmartUpload
  Dim intCount
       

  Set mySmartUpload = Server.CreateObject("aspSmartUpload.SmartUpload")


  mySmartUpload.Upload
For each file In mySmartUpload.Files
id = id + 1
filnavn = now() & id
  intCount = file.saveAs("/aspSmartUpload/Upload" & filnavn)

next

  Response.Write(intCount & " file(s) uploaded.")
%>

NU smækker jeg lige 200 points på. Gider du så ikke, at komme med et eksempel hvor den gemmer 4 billeder. de 4 felter hedder billede1, billede2, billede3 og billede4. Jeg skal kunne gemme alle fil navnene i en session eller variabel, så jeg har mulighed for at skrive dem i databsen.

Jeg beklager, men jeg laver meget sjældent færdige løsninger her på eksperten, og slet ikke for points.
Det er som du siger til en bilforhandler, og så er der sikkert penge i det for dig :))

færdige løsninger og færdige løsninger. En stump kode som virker er det eneste jeg beder om. Og den stump kode skal såmæn bare sættes sammen med mit system.

Måske kigger jeg på det hvis jeg får tid senere idag, men jeg kan ikke love noget.

Hmm... jeg har fundet ud af det

Godt, men hvordan pokker gik det til at vi begge fik 200 points ??