ASP: Filopplasting med ASP

[ilpostino]

Noen som vet om noen enkle måter å få lastet opp filer i ASP? alle de scriptene jeg har sett på er laaaange.. og jeg skal bare bruke det til å laste opp en fil i ny og ne...

[osoerebo]

Det er nok en del kode som må til dersom du skal laste opp bilde uten bruk av bildeopplastings-komponent. Du kan jo alltids installere ASPUpload eller noe slikt. Eller dersom webserveren har .NET installert så kan du jo lage opplasnings siden i asp.NET, da slipper du unna med mye mindre kode.

 

Alternativt så kan du lage en funksjon der du legger inn selve opplasnings koden, og så legger du den i en (asp eller inc) fil for seg selv. Så includerer du den på asp siden din og kaller funksjonen. Da slipper du ihvertfall å ha all koden i asp siden.

 

 

Øystein

[ilpostino]

fikk løst det ved å innstalere AspUpload fra Persits Software.. i php holder det med cirka 5 linjer med kode for å laste opp filer..... synes det er ganske dårlig at en enten må laste ned og innstalere com-komponenter eller lage laaaange scripts for å laste opp noe i asp...

[OveM]

Dette er ikke avansert i asp.net

 

Se eksempel:

 

I html:

 

<input type="submit" value="Last opp fil" runat="server" ID="SubmitFile" name="SubmitFile">
<input id="MyFile" type="file" runat="server" name="MyFile" title="Upload file">

I CodeBehind:

 

Protected WithEvents SubmitFile As System.Web.UI.HtmlControls.HtmlInputButton
Protected WithEvents MyFile As System.Web.UI.HtmlControls.HtmlInputFile

Private Sub SubmitFile_ServerClick(ByVal Sender As Object, ByVal E As System.EventArgs) Handles SubmitFile.ServerClick 
   Try
       If (MyFile.PostedFile.ContentLength > 0) Then
           Dim strFile As String
           Dim strFileName As String = System.IO.Path.GetFileName(MyFile.PostedFile.FileName)
           Dim strSaveLocation As String = "c:\...bane til filplassering"
           Dim oDir As System.IO.Directory
           Dim oFile As File

           If (oDir.Exists(strSaveLocation) = False) Then
               oDir.CreateDirectory(strSaveLocation)
           End If

           strFile = strSaveLocation + "\" + strFileName
           If (oFile.Exists(strFile) = True) Then
               Response.Write("Feil, filen eksisterer allerede!")
           Else
               MyFile.PostedFile.SaveAs(strFile)
           End If
       Else If Not (MyFile.PostedFile.ContentLength > 0) Then
           Response.Write("Feil, filen eksisterer ikke. Velg en fil!")
       End If
   Catch Ex As Exception
       Response.Write(Ex.ToString)
   End Try
End Sub

[royend]

Takk!

Hjalp meg mye...!