그물 및 SQL을 사용하여 액세스 데이터베이스에 데이터를 삽입하려고하면 아래 코드가 실행될 때 오류 메시지가 나타나고 con.open()이 강조 표시됩니다. 나는 왜 그것이 작동하지 않는지 이해하지 못한다. 당신이 다른 고급 SQL 문에 구문 오류를 볼 때 기본 데이터베이스에 대한 예약 된 키워드를 찾아,VB.NET SQL ACCESS INSERT 문
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles AddBut.Click
Dim dbProvider = "Provider=Microsoft.ACE.OLEDB.12.0; Data Source= c:\Databse\Company_db.accdb"
Dim dbSource = "Data Source= C:\Databse\Company_db.accdb"
Dim empNum As String
Dim empFname As String
Dim empLname As String
Dim empDept As String
Dim empStat As String
Dim empYears As String
empNum = eNumText.Text
empFname = empFnameText.Text
empLname = empLnameText.Text
empDept = Deptd.Text
empStat = Statd.Text
empYears = yearstext.Text
Dim sql = "INSERT INTO tbl_empinfo (EmpID, FirstName, LastName, Department, Status, Years " & _
") " & _
"Values(empNum, empFname, empLname, empDept, empStat, empYears)"
con.ConnectionString = dbProvider & dbSource
Using cmd = New OleDb.OleDbCommand(sql, con)
con.Open()
cmd.Parameters.AddWithValue("EmpID", empNum)
cmd.Parameters.AddWithValue("FirstName", empFname)
cmd.Parameters.AddWithValue("LastName", empLname)
cmd.Parameters.AddWithValue("Department", empDept)
cmd.Parameters.AddWithValue("Status", empStat)
cmd.Parameters.AddWithValue("Years", empYears)
cmd.ExecuteNonQuery()
End Using
con.Close()
End Sub
C : \ Databse \가 잘못 입력 했습니까? 아마도 C : \ Database \ – Fionnuala
@Remou는 정말로 정확하게 내 폴더 이름입니다. ( – user3476579