vb中如何把添加的记录保存在DateGrid中？
3个回答
展开全部
1.不用代码
（1）打开Visual Studio，依次选择：新建->Web Site->ASP.NET Web Site(位置：任意；语言： Visual Basic）->保存
（2）点击设计区域左下角的设计，切换到设计模式
（3）选择：视图->工具箱
（4）在工具箱第二栏有GridView，选择并拖动到设计区域
（5）自动弹出的设置页面上配置你的数据源，即Access虚拟目录
完毕！
2.代码实现
建立站点步骤与1.相同，但不用切换到设计模式，保留在源模式即可。代码有两部分，分别粘贴到 Default.aspx和Default.aspx.vb文件中。
（1）Default.aspx文件代码
<%@ Page Language="VB" AutoEventWireup="true" CodeFile="Default.aspx.vb" Inherits="_Default" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "">
<html xmlns="" >
<head runat="server">
<title>Untitled Page</title>
</head>
<body>
<form id="form1" runat="server">
<div>
<asp:Label ID="la1" runat="server" Text=""></asp:Label><br/>
<asp:Label ID="la2" runat="server" Text=""></asp:Label><br />
<asp:Label ID="la3" runat="server" Text=""></asp:Label><br />
<asp:Label ID="la4" runat="server" Text=""></asp:Label><br />
<asp:GridView ID="MyDataGrid" runat="server">
</asp:GridView>
</div>
</form>
</body>
（2）Default.aspx.vb文件代码
Imports System.Data.OleDb
Imports System.Data
Partial Class _Default
Inherits System.Web.UI.Page
Dim myConnection As OleDbConnection
Dim myCommand As OleDbCommand
Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs)
'1.连接数据库
Dim dbname As String
dbname = Server.MapPath("db2.mdb")
myConnection = New OleDbConnection("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA Source=" & dbname)
myConnection.Open()
la1.Text = "Connection Opened!"
'2.添加记录
myCommand = New OleDbCommand("Insert into info(authors,books) Values('Simson','usa')", myConnection)
myCommand.ExecuteNonQuery()
la2.Text = "New Record Inserted!"
'3 更新数据(Access)
myCommand = New OleDbCommand("UPDATE info SET authors='Bennett' WHERE authors = 'Simson'", myConnection)
myCommand.ExecuteNonQuery()
la3.Text = "Record Updated!"
'4 删除数据（access）
myCommand = New OleDbCommand("DELETE FROM info WHERE Authors = 'lily'", myConnection)
myCommand.ExecuteNonQuery()
la4.Text = "Record Deleted!"
'5 使用DateGrid显示数据
myCommand = New OleDbCommand("select * FROM info", myConnection)
MyDataGrid.DataSource = myCommand.ExecuteReader()
MyDataGrid.DataBind()
End Sub
End Class
（1）打开Visual Studio，依次选择：新建->Web Site->ASP.NET Web Site(位置：任意；语言： Visual Basic）->保存
（2）点击设计区域左下角的设计，切换到设计模式
（3）选择：视图->工具箱
（4）在工具箱第二栏有GridView，选择并拖动到设计区域
（5）自动弹出的设置页面上配置你的数据源，即Access虚拟目录
完毕！
2.代码实现
建立站点步骤与1.相同，但不用切换到设计模式，保留在源模式即可。代码有两部分，分别粘贴到 Default.aspx和Default.aspx.vb文件中。
（1）Default.aspx文件代码
<%@ Page Language="VB" AutoEventWireup="true" CodeFile="Default.aspx.vb" Inherits="_Default" %>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "">
<html xmlns="" >
<head runat="server">
<title>Untitled Page</title>
</head>
<body>
<form id="form1" runat="server">
<div>
<asp:Label ID="la1" runat="server" Text=""></asp:Label><br/>
<asp:Label ID="la2" runat="server" Text=""></asp:Label><br />
<asp:Label ID="la3" runat="server" Text=""></asp:Label><br />
<asp:Label ID="la4" runat="server" Text=""></asp:Label><br />
<asp:GridView ID="MyDataGrid" runat="server">
</asp:GridView>
</div>
</form>
</body>
（2）Default.aspx.vb文件代码
Imports System.Data.OleDb
Imports System.Data
Partial Class _Default
Inherits System.Web.UI.Page
Dim myConnection As OleDbConnection
Dim myCommand As OleDbCommand
Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs)
'1.连接数据库
Dim dbname As String
dbname = Server.MapPath("db2.mdb")
myConnection = New OleDbConnection("PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA Source=" & dbname)
myConnection.Open()
la1.Text = "Connection Opened!"
'2.添加记录
myCommand = New OleDbCommand("Insert into info(authors,books) Values('Simson','usa')", myConnection)
myCommand.ExecuteNonQuery()
la2.Text = "New Record Inserted!"
'3 更新数据(Access)
myCommand = New OleDbCommand("UPDATE info SET authors='Bennett' WHERE authors = 'Simson'", myConnection)
myCommand.ExecuteNonQuery()
la3.Text = "Record Updated!"
'4 删除数据（access）
myCommand = New OleDbCommand("DELETE FROM info WHERE Authors = 'lily'", myConnection)
myCommand.ExecuteNonQuery()
la4.Text = "Record Deleted!"
'5 使用DateGrid显示数据
myCommand = New OleDbCommand("select * FROM info", myConnection)
MyDataGrid.DataSource = myCommand.ExecuteReader()
MyDataGrid.DataBind()
End Sub
End Class
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
你说的就有问题
datagrid只是数据显示控件
只能把数据写在数据库中，用数据绑定控件（如ADODC）连接数据库，再由datagrid显示
去学些基础吧
QQ304728539
我空间上有篇数据库文章（adodc+datagrid）
仅供参考学习
datagrid只是数据显示控件
只能把数据写在数据库中，用数据绑定控件（如ADODC）连接数据库，再由datagrid显示
去学些基础吧
QQ304728539
我空间上有篇数据库文章（adodc+datagrid）
仅供参考学习
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
展开全部
DateGrid 是数据显示控件，不能保存数据。
数据需要保存在数据库、或文件中。
数据需要保存在数据库、或文件中。
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
更多回答（1）
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
