Как я могу исправить ошибку: не удалось найти устанавливаемый ISAM?
<pre> If Sender_s_AddressTextBox.Text = "" Or Sender_s_NameTextBox.Text = "" Or Sender_s_IDTextBox.Text = "" Or Sender_s_Contact_NumberTextBox.Text = "" Or Receiver_s_NameTextBox.Text = "" Or Receiver_s_IDTextBox.Text = "" Or Receiver_s_AddressTextBox.Text = "" Or Receiver_s_Contact_NumberTextBox.Text = "" Or txttotalamount.Text = "" Then MsgBox("Please complete the information needed.") ElseIf Sender_s_AddressTextBox.Text = Text And Sender_s_NameTextBox.Text = Text And Sender_s_IDTextBox.Text = Text And Sender_s_Contact_NumberTextBox.Text = Text And Receiver_s_NameTextBox.Text = Text And Receiver_s_IDTextBox.Text = Text And Receiver_s_Contact_NumberTextBox.Text = Text And Receiver_s_AddressTextBox.Text = Text And txttotalamount.Text = Text Then MsgBox("Transaction has been processed.") End If Try cmd = New OleDb.OleDbCommand With cmd .Connection = con .CommandType = CommandType.Text .CommandText = "INSERT INTO tblSender (Sender’s Name,Sender's ID, Sender's Contact Number, Sender's Address) VALUES (@Sender’s Name,@Sender's ID,@Sender's Contact Number,@Sender's Address)" .CommandText = "INSERT INTO tblReceiver (Receiver's Name, Receiver's Contact Number, Receiver's ID, Receiver's Address) VALUES (@Receiver's Name, @Receiver's Contact Number, @Receiver's ID, @Receiver's Address )" .Parameters.Add(New System.Data.OleDb.OleDbParameter("@Sender’s Name ", System.Data.OleDb.OleDbType.VarChar, 255, Me.Sender_s_NameTextBox.Text)) .Parameters.Add(New System.Data.OleDb.OleDbParameter("@Sender's ID ", System.Data.OleDb.OleDbType.VarChar, 255, Me.Sender_s_IDTextBox.Text)) .Parameters.Add(New System.Data.OleDb.OleDbParameter("@Sender's Contact Number ", System.Data.OleDb.OleDbType.VarChar, 255, Me.Sender_s_Contact_NumberTextBox.Text)) .Parameters.Add(New System.Data.OleDb.OleDbParameter("@Sender's Address ", System.Data.OleDb.OleDbType.VarChar, 255, Me.Sender_s_AddressTextBox.Text)) .Parameters.Add(New System.Data.OleDb.OleDbParameter("@Receiver's Name ", System.Data.OleDb.OleDbType.VarChar, 255, Me.Receiver_s_NameTextBox.Text)) .Parameters.Add(New System.Data.OleDb.OleDbParameter("@Receiver's ID ", System.Data.OleDb.OleDbType.VarChar, 255, Me.Receiver_s_IDTextBox.Text)) .Parameters.Add(New System.Data.OleDb.OleDbParameter("@Receiver's Contact Number ", System.Data.OleDb.OleDbType.VarChar, 255, Me.Receiver_s_Contact_NumberTextBox.Text)) .Parameters.Add(New System.Data.OleDb.OleDbParameter("@Receiver's Address ", System.Data.OleDb.OleDbType.VarChar, 255, Me.Receiver_s_AddressTextBox.Text)) ' RUN THE COMMAND cmd.Parameters("@Sender’s Name ").Value = Me.Sender_s_NameTextBox.Text cmd.Parameters("@Sender's ID ").Value = Me.Sender_s_IDTextBox.Text cmd.Parameters("@Sender's Contact Number ").Value = Me.Sender_s_Contact_NumberTextBox.Text cmd.Parameters("@Sender's Address ").Value = Me.Sender_s_AddressTextBox.Text cmd.Parameters("@Receiver's Name ").Value = Me.Receiver_s_NameTextBox.Text cmd.Parameters("@Receiver's ID ").Value = Me.Receiver_s_IDTextBox.Text cmd.Parameters("@Receiver's Contact Number ").Value = Me.Receiver_s_Contact_NumberTextBox.Text cmd.Parameters("@Receiver's Address ").Value = Me.Receiver_s_AddressTextBox.Text con = New System.Data.OleDb.OleDbConnection() con.ConnectionString = "Provider= Microsoft.ACE.OLEDB.12.0;Data Source=C:\Users\common\Documents\Database2.accdb;Integrated Security=SSPI;User Instance=True" con.Open() cmd.ExecuteNonQuery() con.Close() Exit Sub End With Catch ex As Exception MsgBox(ex.Message, MsgBoxStyle.Critical) End Try
Что я уже пробовал:
закодируй кучу кодов и ничего не получится
Richard Deeming
NB: В именах параметров не может быть пробелов или специальных символов.
Если в именах столбцов есть пробелы или специальные символы, их необходимо заключить в квадратные скобки. Однако было бы лучше переименовать ваши столбцы так, чтобы они содержали только буквенно-цифровые символы.
"INSERT INTO tblSender ([Sender’s Name], [Sender's ID], [Sender's Contact Number], [Sender's Address]) VALUES (@SendersName, @SendersID, @SendersContactNumber, @SendersAddress)"
Кроме того, вы перезаписываете текст команды сразу же после ее установки, поэтому в нее никогда ничего не будет вставлено.
tblSender
стол. Вам нужно выполнить эти две команды отдельно.