Hello guys,
What seems to be the syntax error on this command.... It says Syntax error in strSql = ........
Private Sub Command6_Click()
Dim cn As ADODB.Connection
'Purpose: Create a new query using ADO.
Dim strSql As String
Set cn = CurrentProject.Connection
strSql = "Update into EnglishAppAnswers( AppAnswer ) VALUES( CStr(Form_SubForm_exam.Ans1.Value) );"
cn.Execute strSql
DoCmd.GoToRecord , , acNext
End Sub
Thanks.....
What seems to be the syntax error on this command.... It says Syntax error in strSql = ........
Private Sub Command6_Click()
Dim cn As ADODB.Connection
'Purpose: Create a new query using ADO.
Dim strSql As String
Set cn = CurrentProject.Connection
strSql = "Update into EnglishAppAnswers( AppAnswer ) VALUES( CStr(Form_SubForm_exam.Ans1.Value) );"
cn.Execute strSql
DoCmd.GoToRecord , , acNext
End Sub
Thanks.....