mohammadsaleh
پنج شنبه 13 آذر 1393, 08:46 صبح
سلام دوستان. من تازه شروع به كار با وي بي دات نت كردم و مشكلي دارم كه اگر دوستان كمكم كنند كه حلش كنم ازشون ممنونم:
من قصد دارم اطلاعاتي كه از طريق سرور ارسال ميشود را در بانك اكسس ذخيره كنم. اطلاعات طبق دستور زير از سرور به صورت ديتاست ارسال ميشود و در ديتاگريد مشاهده ميشود
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim rowinPage As Integer = 5
Dim startRow As Integer = 1
Dim location As Integer = 2
'location =>
'Receive = 1,
'Send = 2,
'RecybcleBin = 4,
If Not String.IsNullOrEmpty(TextBoxSignature.Text) Then
Dim message As New PARSGREEN.API_MsgService.MsgService()
Dim ds As DataSet = message.GetMessagePageing(TextBoxSignature.Text, location, CheckBox1.Checked, rowinPage, startRow)
Dim tableMesaage As DataTable = ds.Tables(0)
DataGridView1.DataSource = tableMesaage
End If
End Sub
ولي من قصد دارم انچه در ديتاگريد ويو مشاهده ميشود در بانك اكسس ذخيره شود.
ممنون خواهم شد به سئوال دوم هم پاسخ بدهيد.
اگر بخواهم مقدار يكي از ستونها و رديف ها را با كليك كردن ببينم چه دستوري بايد بنويسم
من قصد دارم اطلاعاتي كه از طريق سرور ارسال ميشود را در بانك اكسس ذخيره كنم. اطلاعات طبق دستور زير از سرور به صورت ديتاست ارسال ميشود و در ديتاگريد مشاهده ميشود
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim rowinPage As Integer = 5
Dim startRow As Integer = 1
Dim location As Integer = 2
'location =>
'Receive = 1,
'Send = 2,
'RecybcleBin = 4,
If Not String.IsNullOrEmpty(TextBoxSignature.Text) Then
Dim message As New PARSGREEN.API_MsgService.MsgService()
Dim ds As DataSet = message.GetMessagePageing(TextBoxSignature.Text, location, CheckBox1.Checked, rowinPage, startRow)
Dim tableMesaage As DataTable = ds.Tables(0)
DataGridView1.DataSource = tableMesaage
End If
End Sub
ولي من قصد دارم انچه در ديتاگريد ويو مشاهده ميشود در بانك اكسس ذخيره شود.
ممنون خواهم شد به سئوال دوم هم پاسخ بدهيد.
اگر بخواهم مقدار يكي از ستونها و رديف ها را با كليك كردن ببينم چه دستوري بايد بنويسم