*.aspx.vb文件:
Dim strsql AS String
.............
Pub_C_KAMEI = ....
DB_HAKI_MODE = ....
............
strsql = "{ call dm_M03007U('" & Pub_C_KAMEI & "', '" & DB_HAKI_MODE & "' , '" & txtboxCode.Text & "')}"
Me.DBCommon.ADONETExecuteSQL(Ssql)



存储过程:
CREATE Procedure dm_M03007U(
@Code Varchar(6),
@MODE int,
@DAYS int
)As
Begin
Update CD加盟店 Set HAKI_MODE = @MODE, HAKI_DAYS = @DAYS
from CD加盟店
Where Code = @Code
End
GO


Back