Hola!
Creo que asi debe funcionar:
Código vb:
Ver originalmyconn.Execute "INSERT INTO sin_codigo(Codigo) VALUES (" & rs2!COD_TITULAR & ")"
El insert no acepta la clausula "WHERE".
Código SQL:
Ver originalSyntax
INSERT [ INTO]
{ TABLE_NAME WITH ( < table_hint_limited > [ ...n ] )
| view_name
| rowset_function_limited
}
{ [ ( column_list ) ]
{ VALUES
( { DEFAULT | NULL | expression } [ ,...n] )
| derived_table
| execute_statement
}
}
| DEFAULT VALUES
< table_hint_limited > ::=
{ FASTFIRSTROW
| HOLDLOCK
| PAGLOCK
| READCOMMITTED
| REPEATABLEREAD
| ROWLOCK
| SERIALIZABLE
| TABLOCK
| TABLOCKX
| UPDLOCK
}
Lo que podrias hacer es un "SELECT" con el "WHERE Cedula_Titular = 1" y si se encuentra el registro, entonces haces el "INSERT"