Imports System.Data.
SqlClient
Imports System.Data.SqlClient.SqlException
Imports System.Data
Public Class demo
Inherits System.Web.UI.Page
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)
Handles Me.Load
End Sub
Protected Sub Button1_Click(ByVal sender As Object, ByVal e As EventArgs)
Handles Button1.Click
Dim con As New SqlConnection("Data Source=.\SQLEXPRESS;AttachDbFilename=c:\
users\jilsu\onedrive\documents\visual studio 2010\Projects\demoPro\demoPro\
App_Data\Database1.mdf;Integrated Security=True;User Instance=True")
Dim cm As New SqlCommand("INSERT INTO demo VALUES ('" & TextBox1.Text &
"' ,'" & TextBox2.Text & "')", con)
con.Open()
If (TextBox1.Text = "" And TextBox2.Text = "") Then
MsgBox("please insert Records...")
Else
cm.ExecuteNonQuery()
con.Close()
TextBox1.Text = ""
TextBox2.Text = ""
MsgBox("Success", MsgBoxStyle.Information, "Success...")
End If
End Sub
Protected Sub Button2_Click(ByVal sender As Object, ByVal e As EventArgs)
Handles Button2.Click
Dim con As New SqlConnection("Data Source=.\SQLEXPRESS;AttachDbFilename=c:\
users\jilsu\onedrive\documents\visual studio 2010\Projects\demoPro\demoPro\
App_Data\Database1.mdf;Integrated Security=True;User Instance=True")
Dim fetch As New SqlCommand("SELECT * FROM demo", con)
Dim da As New SqlDataAdapter(fetch)
Dim dt As New DataTable
da.Fill(dt)
GridView1.DataSource = dt
GridView1.DataBind()
End Sub
Private Sub GridView1_SelectedIndexChanged(ByVal sender As Object, ByVal e As
System.EventArgs) Handles GridView1.SelectedIndexChanged
TextBox3.Text =
HttpUtility.HtmlDecode(GridView1.SelectedRow.Cells.Item(0).Text.ToString)
TextBox1.Text =
HttpUtility.HtmlDecode(GridView1.SelectedRow.Cells.Item(1).Text.ToString)
TextBox2.Text =
HttpUtility.HtmlDecode(GridView1.SelectedRow.Cells.Item(2).Text.ToString)
End Sub
Protected Sub Button3_Click(ByVal sender As Object, ByVal e As EventArgs)
Handles Button3.Click
Dim con As New SqlConnection("Data Source=.\SQLEXPRESS;AttachDbFilename=c:\
users\jilsu\onedrive\documents\visual studio 2010\Projects\demoPro\demoPro\
App_Data\Database1.mdf;Integrated Security=True;User Instance=True")
Dim cm As New SqlCommand("UPDATE demo SET name ='" & TextBox1.Text & "' ,
city ='" & TextBox2.Text & "' WHERE id =" & TextBox3.Text & "", con)
con.Open()
cm.ExecuteNonQuery()
con.Close()
MsgBox("Update Success", MsgBoxStyle.Information, "Success...")
End Sub
Protected Sub Button4_Click(ByVal sender As Object, ByVal e As EventArgs)
Handles Button4.Click
Dim con As New SqlConnection("Data Source=.\SQLEXPRESS;AttachDbFilename=c:\
users\jilsu\onedrive\documents\visual studio 2010\Projects\demoPro\demoPro\
App_Data\Database1.mdf;Integrated Security=True;User Instance=True")
Dim cm As New SqlCommand("DELETE FROM demo WHERE id ='" & TextBox3.Text &
"'", con)
con.Open()
cm.ExecuteNonQuery()
con.Close()
MsgBox("Delete Success", MsgBoxStyle.Information, "Success...")
End Sub
End Class
design file
<%@ Page Language="vb" AutoEventWireup="false" CodeBehind="demo.aspx.vb"
Inherits="demoPro.demo" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head runat="server">
<title></title>
<style type="text/css">
.style1
{
width: 100%;
}
.style2
{
width: 257px;
}
.style3
{
width: 257px;
height: 26px;
}
.style4
{
height: 26px;
}
.style5
{
height: 26px;
width: 292px;
}
.style6
{
width: 292px;
}
.style7
{
width: 257px;
height: 51px;
}
.style8
{
width: 292px;
height: 51px;
margin-left: 40px;
}
.style9
{
height: 51px;
}
.style10
{
width: 257px;
height: 29px;
}
.style11
{
width: 292px;
height: 29px;
}
.style12
{
height: 29px;
}
</style>
</head>
<body>
<form id="form1" runat="server">
<div>
 
;
</div>
<asp:GridView ID="GridView1" runat="server" AutoGenerateColumns="False"
BackColor="#DEBA84" BorderColor="#DEBA84" BorderStyle="None"
BorderWidth="1px"
CellPadding="3" CellSpacing="2">
<Columns>
<asp:BoundField DataField="id" HeaderText="id" SortExpression="id" />
<asp:BoundField DataField="name" HeaderText="name"
SortExpression="name" />
<asp:BoundField DataField="city" HeaderText="city"
SortExpression="city" />
<asp:ButtonField ButtonType="Button" CommandName="Select"
HeaderText="select"
ShowHeader="True" Text="select" />
</Columns>
<FooterStyle BackColor="#F7DFB5" ForeColor="#8C4510" />
<HeaderStyle BackColor="#A55129" Font-Bold="True" ForeColor="White" />
<PagerStyle ForeColor="#8C4510" HorizontalAlign="Center" />
<RowStyle BackColor="#FFF7E7" ForeColor="#8C4510" />
<SelectedRowStyle BackColor="#738A9C" Font-Bold="True" ForeColor="White" />
<SortedAscendingCellStyle BackColor="#FFF1D4" />
<SortedAscendingHeaderStyle BackColor="#B95C30" />
<SortedDescendingCellStyle BackColor="#F1E5CE" />
<SortedDescendingHeaderStyle BackColor="#93451F" />
</asp:GridView>
<table class="style1">
<tr>
<td class="style3">
<asp:Label ID="Label1" runat="server" Text="Id"></asp:Label>
</td>
<td class="style5">
<asp:TextBox ID="TextBox3" runat="server"></asp:TextBox>
</td>
<td class="style4">
</td>
<td class="style4">
</td>
<td class="style4">
</td>
</tr>
<tr>
<td class="style7">
name</td>
<td class="style8">
<asp:TextBox ID="TextBox1" runat="server"></asp:TextBox>
</td>
<td class="style9">
<asp:RequiredFieldValidator ID="RequiredFieldValidator1"
runat="server"
ControlToValidate="TextBox1" ErrorMessage="please enter name"
ForeColor="Red"
ValidationGroup="i1"></asp:RequiredFieldValidator>
</td>
<td class="style9">
</td>
<td class="style9">
</td>
</tr>
<tr>
<td class="style2">
</td>
<td class="style6">
</td>
<td>
</td>
<td>
</td>
<td>
</td>
</tr>
<tr>
<td class="style10">
city</td>
<td class="style11">
<asp:TextBox ID="TextBox2" runat="server"></asp:TextBox>
</td>
<td class="style12">
<asp:RequiredFieldValidator ID="RequiredFieldValidator2"
runat="server"
ControlToValidate="TextBox2" ErrorMessage="please enter city"
ForeColor="Red"
ValidationGroup="i1"></asp:RequiredFieldValidator>
</td>
<td class="style12">
</td>
<td class="style12">
</td>
</tr>
<tr>
<td class="style2">
<asp:Button ID="Button1" runat="server" Text="Button"
ValidationGroup="i1" />
<asp:Button ID="Button2" runat="server" Text="fetch" />
</td>
<td class="style6">
<asp:Button ID="Button3" runat="server" Text="Update" />
 
;
<asp:Button ID="Button4" runat="server" Text="Delete" />
</td>
<td>
</td>
<td>
</td>
<td>
</td>
</tr>
</table>
</form>
</body>
</html>
