VB.NET问题。。。！！！

brian29002001

我是VB.NET新手。。。
要怎样把TEXTBOX的东西写进DATABASE里。。？？
我是用ODBC跟SQL SERVER的。。。！！！

比如说我要把textbox的字SAVE进database table, column "ID"的新row里，要怎么code....???







这个做到了。。！！

[ 本帖最后由 brian29002001 于 23-11-2005 06:56 PM 编辑 ]

brian29002001

怎样把ODBC跟GRID CONTROL LINK起来，好让我可以看到DATABASE里的东西。。。？？？


这个做到了。。！！

[ 本帖最后由 brian29002001 于 25-11-2005 11:40 AM 编辑 ]

brian29002001

有谁知道要怎样用source CODE把RADIO BUTTON click 或unclick。。。？？？

brian29002001

要怎样去拿DB里的每一ROW的DATA出来啊。。？？？
我要把APPLICATION TABLE里的ID那出来ADD进COMBOBOX。

OdbcDataAdapter2.SelectCommand.CommandText = "Select * from APPLICATIONS"
            OdbcDataAdapter2.SelectCommand.ExecuteNonQuery()
            For CIndex = 1 To (DSet.Tables("APPLICATIONS").Rows.Count - 1)
                ComboBox1.Items.Add()
            Next


ComboBox1.Items.Add()里面要怎么打啊。。？？？

brian29002001

用SQL SELECT 了DATA 要怎样把它拿出来COMPARE 啊。。？？(DATA 只有一个，要CHECK它对不对)

OdbcDataAdapter1.SelectCommand.CommandText = "Select * from Events where evt_name = '" & EName & "'"
                OdbcDataAdapter1.SelectCommand.ExecuteNonQuery()

EXECUTE SQL 之后要怎样啊。。。？？？

brian29002001

怎么都没人帮帮我啊。。。？？？
酱下去我就JIAK塞罗。。。！！！！

brian29002001

这里没人帮到我吗。。。。？？？？

goatstudio

原帖由 brian29002001 于 23-11-2005 06:58 PM 发表
要怎样去拿DB里的每一ROW的DATA出来啊。。？？？
我要把APPLICATION TABLE里的ID那出来ADD进COMBOBOX。

OdbcDataAdapter2.SelectCommand.CommandText = "Select * from APPLICATIONS"
            ...

ComboBox1.Items.Add("something")...
相关的资料你可以在 .Net SDK Documentation 找到.

goatstudio

原帖由 brian29002001 于 23-11-2005 07:00 PM 发表
用SQL SELECT 了DATA 要怎样把它拿出来COMPARE 啊。。？？(DATA 只有一个，要CHECK它对不对)

OdbcDataAdapter1.SelectCommand.CommandText = "Select * from Events where evt_name = '" & ENam ...

你已经 compare 了, 只要传回来的 DataSet 完全没有资料, 就是说没有资料可以 matched.

相关的资料可以在 .Net SDK Documentation 的 OdbcDataAdapter.SelectCommand Property 里找到.

goatstudio

原帖由 brian29002001 于 23-11-2005 05:48 PM 发表
有谁知道要怎样用source CODE把RADIO BUTTON click 或unclick。。。？？？

CheckBox.Checked = false; // unclick

你可以在 .Net SDK 的 CheckBox.Checked Property  里找到.

goatstudio

原帖由 brian29002001 于 23-11-2005 10:06 AM 发表
怎样把ODBC跟GRID CONTROL LINK起来，好让我可以看到DATABASE里的东西。。。？？？

参考 .Net SDK 里的 DataGrid, 还有 DataView/DataSet 的用法.

Sukiyaki

原帖由 brian29002001 于 23-11-2005 05:48 PM 发表
有谁知道要怎样用source CODE把RADIO BUTTON click 或unclick。。。？？？

RadioButton1.Checked = True
或者
RadioButton1.Checked=False

是這一個吧??

brian29002001

原帖由 Sukiyaki 于 24-11-2005 09:33 AM 发表


RadioButton1.Checked = True
或者
RadioButton1.Checked=False

是這一個吧??

谢谢罗。。。！！！ ^^

brian29002001

原帖由 goatstudio 于 24-11-2005 09:23 AM 发表


ComboBox1.Items.Add("something")...
相关的资料你可以在 .Net SDK Documentation 找到.

羊兄。。。。
是这个吗。。。？？？
ComboBox1.Items.Add(dataset.Tables.Add.Rows(CIndex))
麻烦你了。。。
谢谢。。。。

[ 本帖最后由 brian29002001 于 24-11-2005 12:15 PM 编辑 ]

callmee

楼上的... 你这样子在这里问问题..只会招人反感... 要小心啊

goatstudio

原帖由 brian29002001 于 24-11-2005 11:26 AM 发表


羊兄。。。。
我电脑没有INSTALL MSDN。。。。
麻烦你帮我写写CODE好吗。。？？
谢谢。。。。

可以先安装 .Net SDK... 免费的.
不然可以参考网上版本的: .NET Framework SDK

起码先试试看吧...

brian29002001

原帖由 callmee 于 24-11-2005 12:01 PM 发表
楼上的... 你这样子在这里问问题..只会招人反感... 要小心啊

不好意思啦。。。
我也是逼不得以才酱的啦。。。！！！

brian29002001

原帖由 goatstudio 于 24-11-2005 12:17 PM 发表


可以先安装 .Net SDK... 免费的.
不然可以参考网上版本的: .NET Framework SDK

起码先试 ...

谢谢罗。。。！！！
麻烦你了。。。！！！

brian29002001

原帖由 goatstudio 于 24-11-2005 09:26 AM 发表


你已经 compare 了, 只要传回来的 DataSet 完全没有资料, 就是说没有资料可以 matched.

相关的资料可以在 .Net SDK Documentation 的 OdbcDataAdapter.SelectCommand Property 里找到.

这个我知道问题了，就是我的DATASET是NULL，所以用不到。本来应该是有资料的。。。！！！
可是我又不会用VB。NET，SENIOR跟我讲用DATACOMMAND和SQLCOMMAND。。。。

海星1988

这里有个vb.net的问题，希望有人可以帮我解答！

我写了这样的code在vb 6.0 里 ：

Dim cnA As New ADODB.Connection
Dim rsA As New ADODB.Recordset
cnA.Open AdoConStr
SQL = "select distinct EmpNo from UserProfile order by EmpNo"
rsA.ActiveConnection = cnA
rsA.Open SQL, , adOpenDynamic, adLockOptimistic, adCmdText
  Do While Not rsA.EOF
     cboEmpNo.AddItem rsA!EmpNo
     rsA.MoveNext
  Loop
rsA.Close
cnA.Close

而现在需要把这code转换去vb.net, 我把它又改成了以下coding ：

Dim cnA As New ADODB.Connection
Dim rsA As New ADODB.Recordset
Dim SQL As String
cnA.Open(AdoConStr)
SQL = "select distinct EmpNo from UserProfile order by EmpNo"
rsA.ActiveConnection = cnA
rsA.Open(sql, , ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockOptimistic)

   Do While Not rsA.EOF            
          cboEmpNo.Items.Add(rsA!EmpNo)
          rsA.MoveNext()
   Loop
rsA.Close()
cnA.Close()

红色的那段一直有＂曲线＂ -- got error