M
MosheS Singer
Guest
this is the sample
Dim StringSql as string
the Sql String is: StringSql="SHAPE {select * from t1} APPEND ({select * from t2} RELATE k1 TO k2)"
the Dataset Sample is:
Dim ADLoltr As New OleDbDataAdapter
Dim DSltr As New DataSet
Dim ADLltr As New SqlClient.SqlDataAdapter
Using SqlxCConct As New SqlConnection(SQLKT)
SqlxCConct.Open()
ADLltr.SelectCommand = New SqlCommand(StringSql, SqlxCConct)
ADLltr.Fill(DSltr)
End Using
TextBox3.Text = DSltr.Tables("t1").Rows(0).Item("type").ToString()
TextBox4.Text = DSltr.Tables("t2").Rows(i).Item("shape").ToString()
Will This Work?
Continue reading...
Dim StringSql as string
the Sql String is: StringSql="SHAPE {select * from t1} APPEND ({select * from t2} RELATE k1 TO k2)"
the Dataset Sample is:
Dim ADLoltr As New OleDbDataAdapter
Dim DSltr As New DataSet
Dim ADLltr As New SqlClient.SqlDataAdapter
Using SqlxCConct As New SqlConnection(SQLKT)
SqlxCConct.Open()
ADLltr.SelectCommand = New SqlCommand(StringSql, SqlxCConct)
ADLltr.Fill(DSltr)
End Using
TextBox3.Text = DSltr.Tables("t1").Rows(0).Item("type").ToString()
TextBox4.Text = DSltr.Tables("t2").Rows(i).Item("shape").ToString()
Will This Work?
Continue reading...