帮忙填一下代码，小弟先谢了!

小弟刚接触ASP.NET，买的教材的实例有错，请各位帮忙！  
  代码如下：  
   
  Dim   Connectionstring   As   String   =   "Provider=Microsoft.Jet.OLEDB.4.0;   Data   Source="   &   Server.MapPath("dcl.mdb")  
          Dim   MyConnection   As   OleDb.OleDbConnection  
   
          Sub   aboutdata()  
                  '向数据库发出操作命令  
                  Dim   SQLstring   As   String   =   "select   *   from   dcl2"  
                  Dim   MyCommand   As   OleDb.OleDbDataAdapter   =   New   OleDb.OleDbDataAdapter(SQLstring,   MyConnection)  
                  '建立数据集并进行数据绑定  
                  Dim   DS   As   DataSet   =   New   DataSet()  
                  MyCommand.Fill(DS,   "dcl2")  
                  DataGrid1.DataSource   =   New   DataView(DS.Tables("dcl2"))  
                  DataGrid1.DataBind()  
          End   Sub  
   
          Private   Sub   Page_Load(ByVal   sender   As   System.Object,   ByVal   e   As   System.EventArgs)   Handles   MyBase.Load  
                  '连接数据库  
                  MyConnection   =   New   OleDb.OleDbConnection(Connectionstring)  
                  Call   aboutdata()  
          End   Sub  
   
          Private   Sub   DataGrid1_PageIndexChanged(ByVal   source   As   Object,   ByVal   e   As   System.Web.UI.WebControls.DataGridPageChangedEventArgs)   Handles   DataGrid1.PageIndexChanged  
                  Call   aboutdata()  
          End   Sub  
   
  Private   Sub   btnadd_Click(ByVal   sender   As   System.Object,   ByVal   e   As   System.EventArgs)   Handles   btnadd.Click  
                  Dim   insercmd   As   String   =   "inser   dcl2(学校,班级,姓名,年龄,爱好,成绩,ID)"   &   "value(@学校,@班级,@姓名,@年龄,@爱好,@成绩,@ID)"  
                  Dim   MyCommand   As   OleDb.OleDbDataAdapter   =   New   OleDb.OleDbDataAdapter(insercmd,   MyConnection)  
                ……  
          End   Sub  
   
  问题：  
  （一）在DataGrid1的PageIndexChanged事件中调用aboutdata过程不能实现DataGrid1的分页功能；  
  （二）btnadd的Click事件中，要向表dcl2插入一条记录，新插入的数据来自7个textbox的text属性值。倒数第二行的省略号为教材实例中缺少的部分（很奇怪），请各位帮忙阿！  
  问题点数：20、回复次数：3Top

1 楼blackcatiii（能教我做框架设计吗）回复于 2003-05-03 13:29:41 得分 15

你看看.net的framework的帮助，里面好多例子呀。  
  1、aboutdata只是绑定数据，你的分页还需要在DataGrid1_PageIndexChanged里加一句：DataGrid1.CurrentPageIndex   =   e.NewPageIndex  
  aboutdata()  
  2、省略号是省了给Command对象赋值的语句。对添加新记录的操作我感觉直接用OleDbCommand对象比较合理，这样：  
  Dim   MyCommand   As   OleDb.OleDbCommand   =   New   OleDb.OleDbCommand(insercmd,   MyConnection)  
  MyCommand.Parameters.Add("@学校",OleDbType.VarChar,10).Value   =   txtSchool.Text  
  '将参数值传递给OleDbCommand对象，txtSchool为学校的输入框控件  
  '其他六个参数类似设置，注意字段类型和长度...  
  MyCommand.ExecuteNonQuery()   '保存记录到数据库  
  Top

2 楼skyword（网络新丁）回复于 2003-05-03 13:39:37 得分 5

MyConnection没有赋值。  
  改为：  
  dim   Myconnection   as   new   oledbconnection(connectionstring)Top

3 楼skyword（网络新丁）回复于 2003-05-03 13:40:10 得分 0

题外话，是买的哪一本教材？！Top

相关问题

• datagrid
• 数据库
• 数据
• ds
• aboutdata
• dcl2
• 帮忙
• datagrid1
• pageindexchanged
• myconnection

• 帖主：trylearn
• blackcatiii
• skyword

• CSDN .NET频道
• .NET类图书
• C#类图书
• .NET类源码下载