Leo; me puedes ayudar
Publicado por sol (5 intervenciones) el 25/10/2001 18:35:30
no me puede resultar, estoy por darme vencida, que estoy haciendo mal o no se puede hacer
If (Eval("DLookUp(""[codigo_proveedor_prod]"",""[Tbl_DetalleOrdenComp]"",""[codigo_proveedor_prod] = 'Forms![Subformulario_DetalleOrdenComp].form![codigo_proveedor_prod]' "") Is Not Null")) Then
'Forms!Frm_OrdenComp![Subformulario_DetalleOrdenComp].Form![codigo_proveedor_prod].
'& Forms!CompañíasEnvíos!IdCompañíaEnvíos
Beep
MsgBox "El Artículo que ha introducido es existente"
End If
If (Eval("DLookUp(""[codigo_proveedor_prod]"",""[Tbl_DetalleOrdenComp]"",""[codigo_proveedor_prod] = 'Forms![Subformulario_DetalleOrdenComp].form![codigo_proveedor_prod]' "") Is Not Null")) Then
'Forms!Frm_OrdenComp![Subformulario_DetalleOrdenComp].Form![codigo_proveedor_prod].
'& Forms!CompañíasEnvíos!IdCompañíaEnvíos
Beep
MsgBox "El Artículo que ha introducido es existente"
End If
Valora esta pregunta
0