ohmygood

Puedes poner esta función en un modulo: Public Function emailvalido(validar As String) If InStr(1, validar, "@") > 0 Then If InStr(1, validar, ".") > 0 Then Else emailvalido = 2 Exit Function End If Else emailvalido = 2 Exit Function End If...

Supongo que ya lo tendrás solucionado pero por si acaso... if len(me.codcliente) > 0 then DoCmd.OpenReport "Clientes",acViewNormal,"", "[CodCliente] = [forms] ! [Nombre] ! [CodCliente] " else msgbox "introduzca el codigo del cliente... p favor..." end if

Prueba a instalar el microsoft photo editor que te viene con el office que te instalará un servidor ole jpg, seguramente será eso. Si no se soluciona con eso, prueba a poner otro objeto como contenedor de la imagen, por ejemplo un marco de objeto...

Dim varmax As Variant varmax = DMax("[ID]", "INDEX_ACTUACIO") varmax = varmax + 1 referencia = varmax docmd.setwarnings false docmd.runsql "update INDEX_ACTUACIO set ID = " & varmax docmd.setwarnings true

Aunque no es mucho, algo te hará el poner las tablas como ocultas, o definirlas como de sistema, al intentar importar desde el otro según cómo no se puede... o ponerle una contraseña de base de datos de inicio o crear un mde... etc... Haz las pruebas...

Supongamos que ese campo se llama código En el formulario, en el evento form_current pones: if me.recordset.newrecord = true then codigo = nz(dlast("codigo","nombre_tabla")+1,1) end if

Es posible que sea por una de estas causas: -> Que abras el outlook antes de abrir el access y surge el error. -> Que tengas imágenes insertadas, quizás el formato de la imagen te esté dando problemas o el servidor ole, etc... -> Que tengas nombres...

Si no te funciona repite la pregunta porque al responderte yo se ha ido del tablón público... Prueba con algo similar a esto... if variable > 0 then me.campo = cuenta([variable]) else me.campo = 0 end if

Acabo de leer tu pregunta y me ha parecido sumamente extraño, lo he probado y aquí funciona bien, utilizando access 2002. ¿El error de donde viene? Pues la verdad que no lo sé. Es muy extraño, quizás alguna incompatibilidad de idiomas, o alguna...

Siento decirte que no es posible, o por lo menos yo no pude con ello cuando lo intenté.