Como envío un correo electrónico desde vb2008

Preguntas y respuestas relacionadas

Envío masivo de informes Access por mail

Me enfrento a un problema que no sé cómo resolver. Con el siguiente código: DoCmd. OpenReport nombredoc, acPreview,,, acHidden DoCmd. OutputTo acOutputReport, nombredoc, acFormatPDF, rutaneta & "informe.pdf", False,,, acExportQualityPrint DoCmd....
1 respuesta

Control imagen en formulario excel

Estoy practicando macros para excel con formularios y necesito agregarle a mi gestor de inventarios por medio del humilde formulario que armé en Visual para cargarle una foto del producto de modo tal que, cuando varíe los datos en el combobox, ¿Vayan...
1 respuesta

Como hacer para que una consulta me de un mensaje de error predeterminado ante un error de ejecución

En un formulario de access tengo un botón que me actualiza una consulta, el problema que tengo es que si dos usuarios la ejecutan al mismo tiempo me da un error, entonces lo que quisiera hacer es que cuando me de ese error, en vez de que salga el...
1 respuesta

Capturar el path con un commondDialog

Estos intentando copiar una imagen que abro con un ComondDialog. El problema es que luego quiero copiar esa imagen en un directorio distinto con la función FileCopy. Para ello necesito capturar el la ruta de la imagen y no se como. ¿Cómo puedo hacerlo?
3 respuestas

Incluir firma al enviar correos automáticos desde excel 2003

Tengo esta macro Ub enviar() Sheets("Control de alquiler").Select ufila = Range("A" & Rows.Count).End(xlUp).Row For i = 4 To ufila If Cells(i, 14) <= Cells(i, 15) Then Set parte1 = CreateObject("outlook.application") Set parte2 =...
1 respuesta

Enviar informe desde access con correo lotus

He encontrado ese código a una pregunta que contestaste anteriormente. ¿Es posible hacer eso mismo con un correo de empresa que utiliza el lotus notes? He probado cambiando el smtp. Gmail.com el correo y contraseña pero no funciona. ¿Qué hago mal?...
1 respuesta

Ayuda con código vba para Copiar y Guardar Hojas

Tengo este código para seleccionar directorio para guardar 2 hojas a copiar: Dim Titulo, Directorio As String Sub SeleccionarDirectorio() Titulo = "Selecciona la ruta de tu carpeta" On Error Resume Next 'evitaría un error en caso de no seleccionar...
1 respuesta

Anidar dos o mas funciones If

Tengo esta instrucción. Private Sub BtnRecibos_Click() If IsNull(Me.IdGto) Then MsgBox "No hay Gasto creado para ver Recibo", vbInformation, "Información" Else End If If IsNull(Me.Archivo1) Then MsgBox "El recibo solicitado" & vbCrLf & vbCrLf & " Id...
2 respuestas

No capturo datos del puerto serie

Leo, hace unos días te escribí referente a que pretendo obtener datos de un equipo, a través del puerto serie, y me diste una sugerencia, me enviaste esta sección de prueba: Private Sub Command1_Click() If Command1.Caption = "Capturar" Then...
1 respuesta
¿No es la pregunta que estabas buscando?
Puedes explorar otras preguntas del tema