ขอ โคด asp.net ขอโคด asp.net ที่ใช้ในการดาวน์โหลด-อัพโหลดไฟล์ ขอบคุณล่วงหน้าด้วยจ้า

		If Me.fiUpload.HasFile = False Then
			Me.lblText.Text = "Please select upload file!"
		ELse
			Me.fiUpload.SaveAs(Server.MapPath("Myfiles/"&fiUpload.FileName))
			Me.lblText.Text = "<b>" &fiUpload.FileName & "</b> Uploaded.<br>"

			'*** Save to Database ***'
			Dim objConn As OleDbConnection
			Dim objCmd As OleDbCommand
			Dim strConnString,strSQL As String

			strConnString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("database/mydatabase.mdb")&";"
			objConn = New OleDbConnection(strConnString)
			objConn.Open()

			strSQL = "INSERT INTO picture (PictureName) " & _
			"VALUES ('" & fiUpload.FileName & "')"

			objCmd = New OleDbCommand()
			With objCmd
				.Connection = objConn
				.CommandType = CommandType.Text
				.CommandText = strSQL
			End With
			objCmd.ExecuteNonQuery()		

			objCmd = Nothing
			objConn.Close()
			objConn = Nothing

			Me.hplLink1.NavigateUrl = "AspNetFileUploadToDatabase1.aspx"
			Me.hplLink2.NavigateUrl = "AspNetFileUploadToDatabase2.aspx"
		End IF