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

Client side Delete Confirmation in a Gridview

This code use for show a message box when delete button clicked on gridview and when to prevent the accidental deletions.

protected void gv1_RowDataBound(object sender, GridViewRowEventArgs e)
{
if (e.Row.RowType == DataControlRowType.DataRow)
{
foreach (DataControlField dcf in gv1.Columns)
{
if (dcf.ToString() == "CommandField")
{
if (((CommandField)dcf).ShowDeleteButton == true)
{
e.Row.Cells[gv1.Columns.IndexOf(dcf)].Attributes
.Add("onclick", "return confirm(\"Are you sure?\")");
}
}
}
}
}

Create msgbox in class (C#)

public static void alert(string msg)
{
string jscript = "";

Page page = HttpContext.Current.Handler as Page;
if (page != null)
{
page.RegisterStartupScript("clientScript", jscript);
}
}

Database connection with MSSQL for data reader

VB 'using mssql express edition Dim strConn As String = " \SQLEXPRESS;database=;Integrated Security=SSPI" Dim conn As New SqlConnection(strConn) Dim cmd As SqlCommand = conn.CreateCommand Dim reader As SqlDataReader cmd.CommandText = "Select * from clients where client_id = '" + iid.ToString() + "'" conn.Open() reader = cmd.ExecuteReader If reader.Read = True Then TextBox1.Text = reader.GetString(1) TextBox2.Text =reader.GetDatetime(2) TextBox3.Text = reader.GetString(3) TextBox4.Text = reader.GetString(4) End If conn.Close() C# string strConn = "\\SQLEXPRESS;database=;Integrated Security=SSPI"; SqlConnection conn = new SqlConnection(strConn); SqlCommand cmd = conn.CreateCommand; SqlDataReader reader; cmd.CommandText = "Select * from clients where client_id = '" + iid.ToString() + "'"; conn.Open(); reader = cmd.ExecuteReader; if (reader.Read == true) { TextBox1.Text = reader.GetString(1); TextBox2.Text = reader.GetDatetime(2); TextBox3.Text = reader.GetString(3); TextBox4.Text = reader.GetString(4); } conn.Close();