Displaying image from a directory stored in another drive of server

[bijaysalotry]

I have to display image on webpage. Images are stored on some other directory of the webserver not in the project drive and directory.

When I develop it, it is working on developers machine but when i upload it on the server. I run it, it won't show the images.
The code is given below.

Private Function Showpic() As Integer
 
Dim sDirName As String
 
Dim lst As ArrayList = New ArrayList()
 
Dim html As String
 
sDirName = "\\192.168.4.253\Icon\Image\" & Session("Apid")
 
Dim dDir As New DirectoryInfo(sDirName)
 
If Not dDir.Exists Then
 
msg = "No Document Attached With This Application"
 
Else
 
Dim d As New System.IO.DirectoryInfo(sDirName)
 
Dim intFolders, intFiles As Integer
 
intFolders = d.GetDirectories.GetUpperBound(0) + 1
 
intFiles = d.GetFiles("*.jpg").GetUpperBound(0) + 1
 
Dim s As String
 
For Each s In Directory.GetFiles(sDirName, "*.jpg")
 
html = "<IMG src=" & s & " height=100 width=100>"
 
lst.Add(html)
 
Next
 
DataList1.RepeatColumns = intFiles
 
DataList1.DataSource = lst
 
DataList1.DataBind()
 
End If
 
End Function

[kenobewan]

Have you copied your code from word or some other text editor? Its very hard to read.

[vijaydiwakar]

I have to display image on webpage. Images are stored on some other directory of the webserver not in the project drive and directory.

When I develop it, it is working on developers machine but when i upload it on the server. I run it, it won't show the images.
The code is given below.

[size=2][color=#0000ff]Private[/color][/size][size=2] [/size][size=2][color=#0000ff]Function[/color][/size][size=2] Showpic() [/size][size=2][color=#0000ff]As[/color][/size][size=2] [/size][size=2][color=#0000ff]Integer

[/color][/size][size=2][/size][size=2][color=#0000ff]Dim[/color][/size][size=2] sDirName [/size][size=2][color=#0000ff]As[/color][/size][size=2] [/size][size=2][color=#0000ff]String

[/color][/size][size=2][/size][size=2][color=#0000ff]Dim[/color][/size][size=2] lst [/size][size=2][color=#0000ff]As[/color][/size][size=2] ArrayList = [/size][size=2][color=#0000ff]New[/color][/size][size=2] ArrayList()

[/size][size=2][color=#0000ff]Dim[/color][/size][size=2] html [/size][size=2][color=#0000ff]As[/color][/size][size=2] [/size][size=2][color=#0000ff]String

[/color][/size][size=2]sDirName = [/size][size=2][color=#800000]"\\192.168.4.253\Icon\Image\"[/color][/size][size=2] & Session([/size][size=2][color=#800000]"Apid"[/color][/size][size=2])

[/size][size=2][color=#0000ff]Dim[/color][/size][size=2] dDir [/size][size=2][color=#0000ff]As[/color][/size][size=2] [/size][size=2][color=#0000ff]New[/color][/size][size=2] DirectoryInfo(sDirName)

[/size][size=2][color=#0000ff]If[/color][/size][size=2] [/size][size=2][color=#0000ff]Not[/color][/size][size=2] dDir.Exists [/size][size=2][color=#0000ff]Then

[/color][/size][size=2]msg = [/size][size=2][color=#800000]"No Document Attached With This Application"

[/color][/size][size=2][/size][size=2][color=#0000ff]Else

[/color][/size][size=2][/size][size=2][color=#0000ff]Dim[/color][/size][size=2] d [/size][size=2][color=#0000ff]As[/color][/size][size=2] [/size][size=2][color=#0000ff]New[/color][/size][size=2] System.IO.DirectoryInfo(sDirName)

[/size][size=2][color=#0000ff]Dim[/color][/size][size=2] intFolders, intFiles [/size][size=2][color=#0000ff]As[/color][/size][size=2] [/size][size=2][color=#0000ff]Integer

[/color][/size][size=2]intFolders = d.GetDirectories.GetUpperBound(0) + 1

intFiles = d.GetFiles([/size][size=2][color=#800000]"*.jpg"[/color][/size][size=2]).GetUpperBound(0) + 1

[/size][size=2][color=#0000ff]Dim[/color][/size][size=2] s [/size][size=2][color=#0000ff]As[/color][/size][size=2] [/size][size=2][color=#0000ff]String

[/color][/size][size=2][/size][size=2][color=#0000ff]For[/color][/size][size=2] [/size][size=2][color=#0000ff]Each[/color][/size][size=2] s [/size][size=2][color=#0000ff]In[/color][/size][size=2] Directory.GetFiles(sDirName, [/size][size=2][color=#800000]"*.jpg"[/color][/size][size=2])

html = [/size][size=2][color=#800000]"<IMG src="[/color][/size][size=2] & s & [/size][size=2][color=#800000]" height=100 width=100>"

[/color][/size][size=2]lst.Add(html)

[/size][size=2][color=#0000ff]Next

[/color][/size][size=2]DataList1.RepeatColumns = intFiles

DataList1.DataSource = lst

DataList1.DataBind()

[/size][size=2][color=#0000ff]End[/color][/size][size=2] [/size][size=2][color=#0000ff]If

[/color][/size][size=2][/size][size=2][color=#0000ff]End[/color][/size][size=2] [/size][size=2][color=#0000ff]Function[/color][/size]
[size=2][color=#0000ff]
[/color][/size]

dear try to use server.mappath

[bijaysalotry]

i have used server.mappath. Still it is not working.
The code is reading no. of image file. but not displaying the images.