怎么调用存储过程




别人这么做来着


相关代码

Imports System.Data.SqlClient

Dim conn As New SqlConnection("server=weiweiqun.;database=gz;integrated security=sspi")
Dim comm As New SqlCommand
Dim ds As New DataSet
Dim da As New SqlDataAdapter

button_click

If conn.State = ConnectionState.Closed Then
conn.Open()
End If
comm.Connection = conn
comm.CommandType = CommandType.Text
comm.CommandText = "update 员工密码表 set 密码 ='" & TextBox2.Text & "' where 姓名= '" & TextBox1.Text & "'"
da.SelectCommand = comm
da.Fill(ds, "员工密码表")
MessageBox.Show("用户密码修改成功", "提示信息")
If conn.State = ConnectionState.Open Then
conn.Close()
End If

[此贴子已经被作者于2006-12-6 13:02:44编辑过]

期待中

借鉴到同学的方法了  可以看看

这叫调用存储过程么 这是ADO嘛

Dim cmBackup As New SqlCommand
cmBackup.Connection = cn
cmBackup.CommandText = "[backupDATABASE]"
cmBackup.CommandType = CommandType.StoredProcedure
cmBackup.Parameters.Add("@RETURN_VALUE", SqlDbType.Int, 4)
cmBackup.Parameters("@RETURN_VALUE").Direction = ParameterDirection.ReturnValue
cmBackup.Parameters.Add("@db", SqlDbType.VarChar, 20)
cmBackup.Parameters.Add("@disk", SqlDbType.VarChar, 50)
cn.Close()

这是定义含参数的存储过程

cmBackup.Parameters(1).Value = backupdb
cmBackup.Parameters(2).Value = backupdisk
'备份数据库
Try
'打开连接，执行存储过程
cn.Open()
cmBackup.ExecuteNonQuery()
MsgBox("恭喜你！备份成功！")
Catch ex As Exception
'异常处理
MsgBox(ex.ToString)
End Try

这是执行存储过程