arman_Delta2002
چهارشنبه 04 دی 1387, 13:05 عصر
سلام من یک هفته دارم با این چند خط کد سر کله میزنم و الی راه حلی رو پیدا نکردم لطفاً کمک کنید
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim sqlConnectionString As String
Dim sqlTransaction As SqlTransaction
Try
sqlConnectionString = "Database=DB;Data Source=(Local);" & _
"Integrated Security=SSPI"
SqlConnection1.ConnectionString = sqlConnectionString
SqlConnection1.Open()
SqlDataAdapter1.InsertCommand.CommandText = "INSERT INTO T1 (aaa) VALUES ('دارايي ثابت')"
sqlTransaction = SqlConnection1.BeginTransaction
SqlDataAdapter1.InsertCommand.Transaction = sqlTransaction
SqlDataAdapter1.InsertCommand.ExecuteNonQuery()
sqlTransaction.Save("This Point")
sqlTransaction.Rollback("This Point")
sqlTransaction.Commit()
SqlDataAdapter1.InsertCommand.Dispose()
SqlConnection1.Close()
Catch sqlException As System.Data.SqlClient.SqlException
MsgBox(sqlException.ToString())
Catch exception As System.Exception
MsgBox(exception.ToString())
End Try
End Sub
این خط خطا داره SqlDataAdapter1.InsertCommand.ExecuteNonQuery() :عصبانی++:
نام بانک اطلاعاتی من Db و نام تیبل من T1 که دارای فیلد های aaa از نوع رشته ای و ID کلیدی میباشد و بانک اطلاعاتی SQLSever2000 است . متشکر .
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim sqlConnectionString As String
Dim sqlTransaction As SqlTransaction
Try
sqlConnectionString = "Database=DB;Data Source=(Local);" & _
"Integrated Security=SSPI"
SqlConnection1.ConnectionString = sqlConnectionString
SqlConnection1.Open()
SqlDataAdapter1.InsertCommand.CommandText = "INSERT INTO T1 (aaa) VALUES ('دارايي ثابت')"
sqlTransaction = SqlConnection1.BeginTransaction
SqlDataAdapter1.InsertCommand.Transaction = sqlTransaction
SqlDataAdapter1.InsertCommand.ExecuteNonQuery()
sqlTransaction.Save("This Point")
sqlTransaction.Rollback("This Point")
sqlTransaction.Commit()
SqlDataAdapter1.InsertCommand.Dispose()
SqlConnection1.Close()
Catch sqlException As System.Data.SqlClient.SqlException
MsgBox(sqlException.ToString())
Catch exception As System.Exception
MsgBox(exception.ToString())
End Try
End Sub
این خط خطا داره SqlDataAdapter1.InsertCommand.ExecuteNonQuery() :عصبانی++:
نام بانک اطلاعاتی من Db و نام تیبل من T1 که دارای فیلد های aaa از نوع رشته ای و ID کلیدی میباشد و بانک اطلاعاتی SQLSever2000 است . متشکر .