M
mike11d11
Can anyone Tell me why this code doesnt let me bind a Textbox field to
the Account# column in my SQL table. It says "Cannot bind to the
property or column ACCOUNT# on the DataSource.
Parameter name: dataMember" I've been looking around and some people
have been using the currency manager. If this is a solution could
someone show me how I can add it to my code to make my binding work
correctly. thanks
Public Class Form1
Dim ConnString As String = "Data Source=CBR10602911;Initial
Catalog=AccuLogic;Persist Security Info=True;User
ID=AccuLogic;Password=acculogic"
Dim ObjConn As New ADODB.Connection
Dim ObjRS As New ADODB.Recordset
Dim strRequest As String = "SELECT * FROM dbo.[WorkList]"
Public Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
With ObjConn
.ConnectionTimeout = 30
.CommandTimeout = 30
.Provider = "SQLOLEDB"
.ConnectionString = ConnString
End With
ObjConn.Open()
ObjRS.Open(strRequest, ObjConn,
ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockReadOnly)
ObjRS.MoveFirst()
Me.TextBox1.Text = ObjRS.Fields.Item(0).Value.ToString
Me.TextBox1.DataBindings.Add("Text", ObjRS, "ACCOUNT#")
End Sub
End Class
the Account# column in my SQL table. It says "Cannot bind to the
property or column ACCOUNT# on the DataSource.
Parameter name: dataMember" I've been looking around and some people
have been using the currency manager. If this is a solution could
someone show me how I can add it to my code to make my binding work
correctly. thanks
Public Class Form1
Dim ConnString As String = "Data Source=CBR10602911;Initial
Catalog=AccuLogic;Persist Security Info=True;User
ID=AccuLogic;Password=acculogic"
Dim ObjConn As New ADODB.Connection
Dim ObjRS As New ADODB.Recordset
Dim strRequest As String = "SELECT * FROM dbo.[WorkList]"
Public Sub Button1_Click(ByVal sender As System.Object, ByVal e As
System.EventArgs) Handles Button1.Click
With ObjConn
.ConnectionTimeout = 30
.CommandTimeout = 30
.Provider = "SQLOLEDB"
.ConnectionString = ConnString
End With
ObjConn.Open()
ObjRS.Open(strRequest, ObjConn,
ADODB.CursorTypeEnum.adOpenDynamic, ADODB.LockTypeEnum.adLockReadOnly)
ObjRS.MoveFirst()
Me.TextBox1.Text = ObjRS.Fields.Item(0).Value.ToString
Me.TextBox1.DataBindings.Add("Text", ObjRS, "ACCOUNT#")
End Sub
End Class