Gridview Delete

Protected Sub gv1_RowDeleting(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewDeleteEventArgs) Handles gv1.RowDeleting

Dim row As Integer
row = e.RowIndex
Dim idx As String = gv1.Rows(row).Cells(0).Text

Dim cmd As SqlCommand = conn.CreateCommand
Dim ds As New DataSet
cmd.CommandText = "Delete from login where id = " + idx.ToString + ""
conn.Open()
cmd.ExecuteNonQuery()
conn.Close()

bind_grid()

End Sub

Gridview Paging

Protected Sub gv1_PageIndexChanging(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewPageEventArgs) Handles gv1.PageIndexChanging
gv1.PageIndex = e.NewPageIndex
bind_grid()
End Sub

Upload picture

this source code will get the image size, image dimension, image type and save to folder

If FileUpload1.HasFile = True Then
If Round(FileUpload1.PostedFile.ContentLength / 1000) > 100 Then
Label1.Text = "Uploaded file size must be less than 100 KB"
End If

Label1.Text = "File name: " & _
FileUpload1.PostedFile.FileName & "
" & _
"File Size: " & _
Round(FileUpload1.PostedFile.ContentLength / 1000) & " kb
" & _
"Content type: " & _
FileUpload1.PostedFile.ContentType & _
"Image Dimensions :" & _
GetSize(FileUpload1.PostedFile.InputStream, "").ToString
FileUpload1.PostedFile.SaveAs(Server.MapPath(FileUpload1.PostedFile.FileName))
Else
Label1.Text = "Please select file"
End If

Show alert from DataList

this example for show alert message when user click at delete button in Datalist

Protected Sub dl1_ItemDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.DataListItemEventArgs) Handles dl1.ItemDataBound

If Not e.Item.ItemType = ListItemType.Header And Not e.Item.ItemType = ListItemType.Footer Then

Dim lnkDelete As LinkButton = CType(e.Item.FindControl("LDelete"), LinkButton)

lnkDelete.Attributes.Add("onclick", "return confirm('Are you sure you want to delete this record?');")

End If

End Sub