sh2007
چهارشنبه 23 بهمن 1387, 13:00 عصر
با سلام خدمت اهل فن
يه برنامه نوشتم براي ذخيره ركوردها هنگامي كه دكمه ثبت را انجام مي دهم توي پايگاه داده بجاي يك ركورد دو ركورد ثبت مي شود با توجه به اينكه مبتدي مي باشم دوستان راهنمائي كنند ممنون مي شوم ضمنا كدها به شرح زير است :
در كمند كليك
Arr.Add(TextBox1.Text)
Arr.Add(TextBox2.Text)
Cmd.CommandText = "insert into Person(Name,Family)Values(@Name,@Family)"
Cmd.Parameters.Clear()
Cmd.Parameters.Add("@Name", SqlDbType.NVarChar).Value = Arr(0).ToString()
Cmd.Parameters.Add("@Family", SqlDbType.NVarChar).Value = Arr(1).ToString()
Insert(Cmd)
DataGridView1.Refresh()
MsgBox(" ")
در ساب روتين اينسرت
Private Sub Insert(ByVal Cmd As SqlClient.SqlCommand)
Cnn.Open()
Cmd.ExecuteNonQuery()
Cnn.Close()
End Sub
ضمنا از لحاظ اتصال كانكشن و كمندها مشكي ندارم
ممنون
يه برنامه نوشتم براي ذخيره ركوردها هنگامي كه دكمه ثبت را انجام مي دهم توي پايگاه داده بجاي يك ركورد دو ركورد ثبت مي شود با توجه به اينكه مبتدي مي باشم دوستان راهنمائي كنند ممنون مي شوم ضمنا كدها به شرح زير است :
در كمند كليك
Arr.Add(TextBox1.Text)
Arr.Add(TextBox2.Text)
Cmd.CommandText = "insert into Person(Name,Family)Values(@Name,@Family)"
Cmd.Parameters.Clear()
Cmd.Parameters.Add("@Name", SqlDbType.NVarChar).Value = Arr(0).ToString()
Cmd.Parameters.Add("@Family", SqlDbType.NVarChar).Value = Arr(1).ToString()
Insert(Cmd)
DataGridView1.Refresh()
MsgBox(" ")
در ساب روتين اينسرت
Private Sub Insert(ByVal Cmd As SqlClient.SqlCommand)
Cnn.Open()
Cmd.ExecuteNonQuery()
Cnn.Close()
End Sub
ضمنا از لحاظ اتصال كانكشن و كمندها مشكي ندارم
ممنون