专注收集记录技术开发学习笔记、技术难点、解决方案
网站信息搜索 >> 请输入关键词:
您当前的位置: 首页 > VB Dotnet

请问VB2005有关数据库的有关问题,初学请多关照

发布时间:2011-06-23 15:55:33 文章来源:www.iduyao.cn 采编人员:星星草
请教VB2005有关数据库的问题,初学请多关照
我想用下面的代码给SQl2005的数据库中写信息,可是第一次点“Button1_Click”没问题,当第二次点“Button1_Click”时,写入数据库的是一条空信息。请问怎么办?谢谢。

Imports   System.Data.Sql
Imports   System.Data.SqlClient

Public   Class   Form1
        Dim   Datalank   As   SqlConnection   =   New   System.Data.SqlClient.SqlConnection(   _
                "Server=TLCM-WHJ;Database=Vs2005_Data;User   ID=sa;Password=123456; ")
        Dim   Datacommand   As   SqlCommand   =   New   System.Data.SqlClient.SqlCommand

        Private   Sub   Form1_Load(ByVal   sender   As   System.Object,   ByVal   e   As   System.EventArgs)   Handles   MyBase.Load
                Datacommand.Connection   =   Datalank
                Datacommand.CommandText   =   "INSERT   INTO   lx01   (user_name,user_tel)   VALUES   (@usr_name01,@usr_tel01) "
                Datacommand.Parameters.AddWithValue( "@usr_name01 ",   TextBox1.Text)
                Datacommand.Parameters.AddWithValue( "@usr_tel01 ",   TextBox2.Text)

        End   Sub

        Private   Sub   Button1_Click(ByVal   sender   As   System.Object,   ByVal   e   As   System.EventArgs)   Handles   Button1.Click
                'MsgBox( "ok ")
                If   TextBox1.Text   <>   " "   And   TextBox2.Text   <>   " "   Then
                        Datalank.Open()
                        Datacommand.ExecuteNonQuery()
                        Datalank.Close()
                Else
                        MsgBox( "No ")
                End   If
                TextBox1.Text   =   " "
                TextBox2.Text   =   " "
        End   Sub
End   Class


------解决方案--------------------
你的SqlConnection和SqlCommand都是在过程外实例化的,没有报错么?
------解决方案--------------------
确实不会报错,晕。
我从这段代码中看不出什么错来。
------解决方案--------------------
Datacommand.Parameters.AddWithValue( "@usr_name01 ", TextBox1.Text)
Datacommand.Parameters.AddWithValue( "@usr_tel01 ", TextBox2.Text)
最好别写在 pageload里面
------解决方案--------------------
你在Datacommand.Parameters.AddWithValue( "@usr_name01 ", TextBox1.Text)
Datacommand.Parameters.AddWithValue( "@usr_tel01 ", TextBox2.Text)这里的时候是把textbox1和textbox2当参数,而你在Button1_Click这个方法的最后
友情提示:
信息收集于互联网,如果您发现错误或造成侵权,请及时通知本站更正或删除,具体联系方式见页面底部联系我们,谢谢。

其他相似内容:

热门推荐: