Problem med opplasting av flere bilder i asp.net

[hurlis]

Hei, eg lager ei webside som skal laste opp en katalog til serveren. Dette går fint med tekstfiler, og får også lastet opp bildefilene, problemet er når eg åpner bildefilene, får eg ikkje sett på disse, men størrelsen er fortsatt den samme, noen som veit korleis eg kan ordne dette? På førehand takk!

 

Dim sFileName As String

Dim path As String

Dim dirpath As String

 

Try

If Not (txtUpload.PostedFile Is Nothing) Then

path = txtUpload.PostedFile.FileName

sFileName = GetFileName(path)

dirpath = Left(path, (path.Length - sFileName.Length))

 

'Array for the files in the directory:

Dim sFiles As String()

Dim dir As Directory

Dim i As Integer

Dim fsin As FileStream

Dim oReader As StreamReader

Dim fsout As StreamWriter

Dim buffer As BufferedStream

Dim buffsize As Integer = 1024

Dim encode As Encoding = GetEncoding(0)

 

lblMessage.Text += dirpath

 

sFiles = dir.GetFiles(dirpath)

For i = 0 To UBound(sFiles)

sFileName = Right(sFiles(i), (sFiles(i).Length - dirpath.Length))

fsin = New FileStream(sFiles(i), FileMode.OpenOrCreate, FileAccess.Read)

buffer = New BufferedStream(fsin, buffsize)

oReader = New StreamReader(buffer, encode)

fsout = New StreamWriter(Server.MapPath(".\\" + sFileName))

fsout.Write(oReader.ReadToEnd)

lblMessage.Text += sFileName & "<br/>"

 

fsin.Close()

fsout.Close()

oReader.Close()

Next

Else

lblMessage.Text = "Choose a file to upload."

End If

Catch ex As Exception

lblMessage.Text += ex.Message & ex.Source & ex.HelpLink

End Try

[hurlis]

The problem is solved with different code. So no need for help anymore