高分求救!!!!怎样用Datalist控件!!!!

huangbznet 2004-10-14 03:45:51
现本人碰到一个问题!!!
我从数据库读取数据绑定到DataList中然后我要修改绑定中的数据是怎么写的??????
最好有个范例(连接数据库的)!!!
谢谢了
解决问题马上给分!!!!!(在线等!!!!!)急!!!!!!
...全文
80 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
huangbznet 2004-10-14
  • 打赏
  • 举报
回复
TO: wenww(小不点)
能不能发个例子过来看看?????
dofine 2004-10-14
  • 打赏
  • 举报
回复
小日本??????????????????
wenww 2004-10-14
  • 打赏
  • 举报
回复
Public Function Update(ByVal strCommandText As ArrayList) As String

If IsNothing(strCommandText) Or IsDBNull(strCommandText) Then Return ""

'ArrayListのクラス()を初期化
Dim arylist As New ArrayList()

'SqlCommandのクラスを初期化
Dim SqlCmd = New SqlCommand()
SqlCmd = SqlConn.CreateCommand()

'IEnumeratorのクラスを初期化
Dim myEnumerator As System.Collections.IEnumerator = strCommandText.GetEnumerator()

'事務を始まる
SqlCmd.transaction = SqlConn.BeginTransaction()

'SQL文の循環
While myEnumerator.MoveNext()

Try
'更新のSQL文をセット
SqlCmd.Commandtext = myEnumerator.Current

'DBを更新処理
SqlCmd.ExecuteNonquery()

Catch exp As Exception
'エラーの場合、事務を割戻し
SqlCmd.Transaction.Rollback()
'エラーメッセージを生成する。
WriteLog(exp.Message, SqlCmd.Commandtext)
'エラーの場合 エラーメッセージを返す
Return exp.Message
End Try

'If True Then
' 'エラーメッセージを生成する。
' WriteLog("", SqlCmd.Commandtext)
'End If

End While

'事務を正常終了
SqlCmd.Transaction.Commit()

'0000の返す
Update = "0000"
slon3dmax 2004-10-14
  • 打赏
  • 举报
回复
把datalist 转为摸版编辑 放一个textBox 进来帮定textBox 的属性就乡帮定dataGrid一样

16,554

社区成员

发帖
与我相关
我的任务
社区描述
VB技术相关讨论,主要为经典vb,即VB6.0
社区管理员
  • VB.NET
  • 水哥阿乐
  • 无·法
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧