qq_37708997 2020-08-02 15:03 采纳率: 0%
浏览 100
已采纳

SQL数据库改成ACC数据库

VB.net
需要用到这段代码,但原码是SQL数据连接,本人用的是ACC,请帮忙改下换成ACC数据连接方式。谢谢!

Protected Sub GridView1_RowUpdating(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewUpdateEventArgs) Handles GridView1.RowUpdating
    Dim oldno As String = Session("oldNo").ToString
    Dim a As TextBox = GridView1.Rows(e.RowIndex).Cells(1).Controls(0)
    Dim currno As String = a.Text
    Dim b As TextBox = GridView1.Rows(e.RowIndex).Cells(2).Controls(0)
    Dim currname As String = b.Text
    Dim Conn As New SqlConnection
    Conn.ConnectionString = "Server=.;Uid=sa;Pwd=123;Database= StuManage"
    Conn.Open()
    Dim comm As New SqlCommand
    comm.Connection = Conn
    comm.CommandType = Data.CommandType.Text
    comm.CommandText = "update class set clsNo=@clsNo,clsName=@clsName where clsNo=@oldno"
    comm.Parameters.AddWithValue("@clsNo", currno)
    comm.Parameters.AddWithValue("@clsName", currname)
    comm.Parameters.AddWithValue("@oldno", oldno)
    Try
        comm.ExecuteNonQuery()
    Catch ex As Exception
        MsgBox(Err.Description, MsgBoxStyle.Information)
    End Try
    Conn.Close()
    GridView1.EditIndex = -1
    GridRefesh()
End Sub
  • 写回答

2条回答 默认 最新

  • jingluan666 2020-08-02 15:09
    关注
    本回答被题主选为最佳回答 , 对您是否有帮助呢?
    评论
查看更多回答(1条)

报告相同问题?

悬赏问题

  • ¥15 对于相关问题的求解与代码
  • ¥15 ubuntu子系统密码忘记
  • ¥15 信号傅里叶变换在matlab上遇到的小问题请求帮助
  • ¥15 保护模式-系统加载-段寄存器
  • ¥15 电脑桌面设定一个区域禁止鼠标操作
  • ¥15 求NPF226060磁芯的详细资料
  • ¥15 使用R语言marginaleffects包进行边际效应图绘制
  • ¥20 usb设备兼容性问题
  • ¥15 错误(10048): “调用exui内部功能”库命令的参数“参数4”不能接受空数据。怎么解决啊
  • ¥15 安装svn网络有问题怎么办