2013-09-24 6 views
0

доступа этой команды правильно для вставки одного значения,ошибки в команде вставки при вставке данных в базу данных

"INSERT INTO test (testname) values ('" & txtSelect.Text & "')" 

на самом деле я пытаюсь вставить с помощью этой команды, но не работаю ..

"INSERT INTO AdmitPt(Bedcategory, BedNo, BedCharges, PtName, PtAge, Address, PhoneNo, 
Date, BloodGroup, Doctor, Remarks) VALUES('" & CmbBedType.SelectedItem & "', '" & 
CmbBedNo.SelectedItem & "', " & txtCharges.Text & "', '" & txtPatName.Text & "', '" & 
txtPatAge.Text & "', '" & txtPatAdd.Text & "', '" & txtPhone.Text & "', '" & 
dtpDate.Value.ToShortDateString & "', '" & cmbBloodGrp.SelectedItem & "', '" & 
cmbDoctor.SelectedItem & "', " & txtRemarks.Text & ")" 

любезно исправьте меня, я делаю некоторые ошибки.

+0

Какой тип исключения он генерирует? –

+0

Вы не нуждаетесь в «окружении вставки». Но какова фактическая ошибка, которую вы получаете? –

+0

Пожалуйста, можете опубликовать полный код vb.net, который вы используете, а не только строку запроса SQL. Вам действительно было бы лучше используя параметры addwithvalue вместо того, чтобы конкатенировать ваши значения в строке.На самом деле, вам действительно рекомендуется использовать хранимую процедуру. –

ответ

0

Если вы разместили весь свой код - вы забыли выполнить команду. Add

comStudent.ExecuteNonQuery() 

перед закрытием соединения.

+0

спасибо:) проблема решена. – Qaiser

+0

благодарит Syed Mohsin и всех, кто помог мне решить проблему. :) – Qaiser

0

Вы должны использовать Text свойство SelectedItem

"INSERT INTO AdmitPt(Bedcategory, BedNo, BedCharges, PtName, PtAge, Address, PhoneNo, 
    Date, BloodGroup, Doctor, Remarks) VALUES('" & CmbBedType.SelectedItem.Text & "', '" & 
CmbBedNo.SelectedItem.Text & "', " & txtCharges.Text & "', '" & txtPatName.Text & "', '" & 
txtPatAge.Text & "', '" & txtPatAdd.Text & "', '" & txtPhone.Text & "', '" & 
dtpDate.Value.ToShortDateString() & "', '" & cmbBloodGrp.SelectedItem.Text & "', '" & 
cmbDoctor.SelectedItem.Text & "', " & txtRemarks.Text & ")" 

также ToShortDateString является метод и должен быть прописан в ToShortDateString()

+0

Syed Mohsin благодарит брата, но код, который я поделил для одного значения, тоже не работает ... не так ли? – Qaiser

+0

не генерируется исключение, но значения не выводятся в DB .. не сохраняются. 'code' – Qaiser

0

исключение не генерируется, но значения не собираются БД .. не сохраняется ..

code

Dim RegNo, BedNo, BedType, Charges, PatName, PatAge, PatAddr, Phone, CheckupDate, BloodGroup, Doctor, Remarks As String 


    RegNo = txtRegNo.Text 
    BedNo = CmbBedNo.SelectedItem.ToString() 
    BedType = CmbBedType.SelectedItem.ToString() 
    Charges = txtCharges.Text 
    PatName = txtPatName.Text 
    PatAge = txtPatAge.Text 
    PatAddr = txtPatAdd.Text 
    Phone = txtPhone.Text 
    CheckupDate = dtpDate.Value.ToShortDateString() 
    BloodGroup = cmbBloodGrp.SelectedItem.ToString() 
    Doctor = cmbDoctor.SelectedItem.ToString() 
    Remarks = txtRemarks.Text 

    conStudent.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=F:\DBProject\hspms.mdb" 
    conStudent.Open() 
    comStudent.CommandText = "INSERT INTO AdmitPt(ID, Bedcategory, BedNo, BedCharges, PtName, PtAge, Address, PhoneNo, Date, BloodGroup, Doctor, Remarks) VALUES('" & RegNo & "', '" & BedType & "', '" & BedNo & "', " & Charges & "', '" & PatName & "', '" & PatAge & "', '" & PatAddr & "', '" & Phone & "', '" & CheckupDate & "', '" & BloodGroup & "', '" & Doctor & "', " & Remarks & ")" 
    comStudent.Connection = conStudent 
    comStudent.CommandType = CommandType.Text 
    conStudent.Close() 

code

+0

Не помещайте дополнительную информацию в разделе ответов. Скорее отредактируйте исходный вопрос. –

Смежные вопросы