Protected Sub Page_Init(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Init
Dim upFolder As String = MapPath("~/Seller/MyIPlaza/images/")
Dim upFolder1 As String = MapPath("~/Seller/MyIPlaza/images/")
Dim upFolder2 As String = MapPath("~/Seller/MyIPlaza/images/")
End Sub
Function CheckFileType(ByVal fileName As String) As Boolean
Dim ext As String = Path.GetExtension(fileName)
Select Case ext.ToLower()
Case ".gif"
Return True
Case ".png"
Return True
Case ".jpg"
Return True
Case ".jpeg"
Return True
Case Else
Return False
End Select
End Function
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
...
Go to the complete details ...