Missing SET keyword

Jeg vil gerne have sat en update sammen, der skal opdatere i 2 tabeller. Sådan som jeg troede den skulle være:

SQLstmt = "UPDATE pub p, ad a SET a.ad_type = '" & Ann_type & "', p.prmethod = '" & Pr_sted & "',p.ready = '" & Status & "' WHERE  p.adno = a.adno AND a.ADNO =" & ADNO
'SQLstmt = SQLstmt & "VALUES ('" & Request.Form("ddtbl_ad_type") & "', '" & Request.Form("ddtbl_prmethod") & "','" & Request.Form("ddtbl_ready") & "')"


giver mig følgende fejl:
UPDATE pub p, ad a SET a.ad_type = 'D', p.prmethod = '2',p.ready = 'E' WHERE p.adno = a.adno AND a.ADNO =230230
Microsoft OLE DB Provider for ODBC Drivers error '80004005'

[Oracle][ODBC][Ora]ORA-00971: missing SET keyword