여러 명령을 VB에서 함께 실행

Question

VB 프로젝트에서 작업 중입니다. 이 하나의 테이블에 일부 레코드를 저장하고 한 이벤트에서 다른 테이블의 일부 레코드를 업데이트하거나 클릭해야합니다.이 같은 일을하고 있어요.

 Conn.Execute "insert into DailyStock(serial,category,model,datee,opnstock,supply,phystk,totalsale,ssale,nsale,totalstock)values(" & txtserial.Text & ",'" & CboCategory.Text & "','" & CboModel.Text & "','" & DTPicker1 & "'," & txtopnstock.Text & "," & txtsupply.Text & "," & txtphystk.Text & "," & txttsale.Text & "," & txtssale.Text & "," & txtnsale.Text & "," & txtstock.Text & ") ; update Menu set phystk=" & txtstock & " where ItemName='" & CboModel & "'" 
     MsgBox ("Data Saved Successfully") 

하지만 .. 내가 잘못 곳 받고 있지 않다 "SQL 문을 후 발견 자"와 같은 오류를 제공합니다 .. 당신은 MS Access에서 한 번에 하나의 문을 실행할 수 있습니다 나에게

Answer 1

도와주세요 . ";" SQL 문 다음에 나오는 문자입니다.

Conn.Execute "insert into DailyStock(serial,category,model,datee,"_ 
& "opnstock,supply,phystk,totalsale,ssale,nsale,totalstock)values(" _ 
& txtserial.Text & ",'" & CboCategory.Text & "','" _ 
& CboModel.Text & "','" & DTPicker1 & "'," & txtopnstock.Text _ 
& "," & txtsupply.Text & "," & txtphystk.Text & "," & txttsale.Text & "," _ 
& txtssale.Text & "," & txtnsale.Text & "," & txtstock.Text & ") " 

Conn.Execute "update Menu set phystk=" & txtstock _ 
& " where ItemName='" & CboModel & "'"