Hay un total de 3030 Preguntas. | << >> |
Pregunta: | 13529 - CORREO... CON MAPI |
Autor: | Manuel Castro Vera |
El problema es el sgt: Tengo un modulo que manda correos desde una base de datos. Este modulo al crear los correos muy bien, tanto asi que los genera en la bandeja de salida del MS Outlook, pero aparte de de poner los datos en los respectivos campo: a quien, titulo, cuerpo, atachado..etc Al ver el mensaje de correo creado cuando trato de ver el correo hacia quien va dirigido me sale un campo de TIPO DE CORREO con el correo de destinatario. El problema es que yo en ningun momento pongo este dato en ese campo, ni siquiera existe este campo en la MAPI. Cuando hice un correo desde el MS Outlook este campo tenia el valor de SMTP, el cual si enviava este correo. Este modulo me funciona bien en las plataformas W98 con MS Outlook 2000; W2000 con Outlook express... pero en el W2000 con MS Outlook con Exchange me sale este problema. Quisiera saber si hay que configurar algo para que este problema no suceda. |
Respuesta: | ARTURO LORCA |
AQUI ESTA LA SOLUCION: Function digito(CadenA As String) As Boolean On Error GoTo BSS_ErrorHandler If CadenA <> Empty And Val(CadenA) <> 0 Then For I = 1 To Len(CadenA) If (Mid(CadenA, I, 1)) = "-" Or (Mid(CadenA, I, 1)) = "." Then Else CadenaLimpiA = CadenaLimpiA + Mid(CadenA, I, 1) End If Next CadenA = CadenaLimpiA DiG = (Mid(CadenaLimpiA, (Len(CadenaLimpiA)), 1)) If Asc(DiG) <= 47 Or Asc(DiG) >= 58 Then If DiG = "K" Or DiG = "k" Then DiG = "10" Else DiG = "12" End If End If CadenaLimpiA = Empty For I = 1 To (Len(CadenA) - 1) CadenaLimpiA = CadenaLimpiA + (Mid(CadenA, I, 1)) Next CadenA = Empty I = Empty I = (Len(CadenaLimpiA)) Z = 2 While I <> 0 If Z <> 8 Then CadenA = Val(CadenA) + (Val((Mid(CadenaLimpiA, I, 1))) * Z) Z = Z + 1 Else Z = 2 CadenA = Val(CadenA) + (Val((Mid(CadenaLimpiA, I, 1))) * Z) Z = Z + 1 End If I = I - 1 Wend Z = 11 - (Val(CadenA) - Int((Val(CadenA)) / 11) * 11) XXXX = Asc(DiG) If DiG = 0 And Z = 11 Then digito = True Else If Z = DiG Then digito = True Else digito = False End If End If Else digito = False End If CadenA = Empty CadenaLimpiA = Empty Exit Function BSS_ErrorHandler: If Err.Number > 0 Then ProjectErrorHandler "(Form) frmprofesor::Function digito" Resume Next End Function |
Pregunta: | 13558 - ERROR MéTODO ACTION CON CRYSTAL |
Autor: | Francisco González |
Hola: Estoy haciendo una aplicación en VB6.0 y utilizo Crystal 5.0 par los informes. Pero en algunos informes (no en todos) detecto este error: "Error en el método 'Action' del objeto 'CrystalCtrl'. No se cual es la causa de este error, ni como solucionarlo. He cambiado este método por el de 'PrintReport' pero me produce el error en ese nuevo método. Además, el Crystal se me queda abierto y no se como cerrar la aplicación crystal. Gracias por vuestra colaboración. |
Respuesta: | Mariano García Mattío |
El método Action es el que inicia el componente de crystal report y cualquier error que se produzca con el reporte se indicará como un error producido en el método citado, en otras palabras el error puede estar en una formula u otro componente, lo conveniente es abrir el reporte con el editor y depurarlo alli, si suplantas alguna formula en tiempo de ejecución deberás probarla con el editor. |
Pregunta: | 13564 - ABORTAR IMPRESION DE TODOS DOCUMENTOS EN COLA DE IMPRESION |
Autor: | jorge gallego |
Me gustaria conocer cómo se puede abortar la impresion de todos documentos que existan actualmente en cola de impresión y no sólo del último documento que se ha enviado. Se que desde la impresión actual se pueden purgar los documentos, pero desde código no sé cómo hacerlo. Gracias majos y majas |
Respuesta: | JA IME |
Esta pregunta esta en boga. Con la funcion prnjobs puede abortar todos los documentos que esten en la cola de impresion, menos el que esta en proceso. Si no recuerdo es prnjobs -x -p <nombre de la impresorsa> No recuerdo pero es mas o menos: cscript://H cscripr/S antes debes de correr el script. Todo esto esta en microsoft. o escribes prnjobs el google y aparece una lista completa. Aghora si me colaboras: Yo no he podido por programa eliminar o reseteart o abortar la impresion que esta en curso |
Respuesta: | Daniel Guevara |
Bueno no se si te sirva de mucho o ya lo sepas, yo utilizo en algunas rutinas el killdoc del objeto print que me elimina el documento de la cola de impresion |
Pregunta: | 13567 - ACCESO A LA COLA DE IMPRESIóN DESDE VB6. |
Autor: | Diego Cabrerizo |
Saludos a todos los de la lista. Mi pregunta es la siguiente. ¿Como puedo saber si un documento a sido enviado a la cola de impresión de Windows desde Visual Basic 6?. Gracias y un saludo. |
Respuesta: | Luis Ruiz |
Utiliza el objeto Printer de la coleccion Printers. Con esto puedes monitorizar la cola de impresión. Tengo un programita que hace esto (no lo he hecho yo, lo saque de algun sitio de internet). Saludos |
Pregunta: | 13568 - TYPE MISSMACH EN PACKING |
Autor: | Pedro Descalzo |
En algunos puestos de trabajo al desempaquetar mi proyecto todo anda muy bien. En otros me da el error Type missmach y me cancela la instalación. Salgo de la dificultad instalando manualmente mediante el regsvr32 las DDL y OCX que van en el paquete. No me doy cuenta cuál es el problema. Gracias.- |
Respuesta: | julio peraza noda |
cambia la configuracion regional: donde dd/mm/aa ----pon dd/mm/aaaa donde h/mm/ss/tt ---- pon hh/mm/ss |
Pregunta: | 13589 - IMAGENES EN INFORMES |
Autor: | Serafin Salazar |
Hola, me gustaria saber si existe alguna forma de mostrar imagenes de una base de datos access en un DataReport desde Visual Basic. Gracias.......... |
Respuesta: | Sergio Amescua |
Hay un Programa especial para realizar informes, No se si ya lo conoscas o mal interprete tu pregunta, Es parecido a microsoft Word, Ahi tu diseñas el informe y puede ser enviado a pantalla o Impresora, Le das prescentación En el Menu Insertar, (Como Word) Te da la Opcion Insertar Imagen. Espero haberte sido de Utilidad. |
Pregunta: | 13595 - COMO MANEJAR INFORMACION EN RED |
Autor: | Genaro Morataya |
Tengo mi primera aplicacion con VB5. Cuando corre en W95,W98,WME, no hay problema. Cuando corre en una red NT, las cosas se complican. Yo abro una base asi: Set MydbResulta=workspaces(0).opendatabase("resultados",true), la lleno de la informacion que pide un usuario y la presento con Crystal. Cuando Dos usuarios al mismo tiempo piden su informacion particular, el resultado es una mezcla de la informacion de ambos. Podria alguien ayudarme?, estoy por reventar pues no encuentro una solucion efectiva. Gracias de antemano! |
Respuesta: | caribbeansoft |
Bueno no se que es lo que te ocurre en realidad, pero si tu quieres que tu sistema trabaje en modo multiusuario, es decir que más de un usuario pueda estar conectado a la base de datos entonces utiliza conexiones ADO contra una base de datos en una carpeta compartida en la red o alojada en un servidor SQL-Server...Dime en realidad cual es el problema que tienes, Solo un usuario puede conectarse a la vez? o Es que al estar más de uno hay mezcla de datos? |
Pregunta: | 13596 - PLC Y VISUAL BASIC |
Autor: | Cristian Rojas I |
Hola a todos... alguien sabe trabajar con visual basic y plc (Control Logico programable) Sistema de Automatizacion para empresas... la idea es capturar datos de un plc (Allen Brandley) desde visual basic.... Gracias a todos...... |
Respuesta: | Ana María Pérez Soto |
No he trabajado con los de Allen Brandley pero si con lo de OMRON. Necesitas la versión profesional de Visual basic en la que viene el control mscomm, que es el de comunicación por el puerto seríe. Además con los autómatas te tiene que venir el protocolo de comunicación entre el PLC y el PC, en OMRON es a través de Hostlink. No se si te habre sido de gran ayuda. Suerte |
Pregunta: | 13599 - DESHABILITAR LAS TECLAS TAB Y LA DE INICO |
Autor: | williams flores heredia |
Hola mi pregunta es como se deshabilitan las teclas tab y la de inicio gracias por leer mi pregunta. saludos |
Respuesta: | Jose A. |
Hola williams. La forma que sé de deshabilitar la tecla de inicio (la tecla "Tab" no he conseguido que me responda, lo siento), es capturándola cuando se ha pulsado, me explico: para este ejemplo, has de poner la Propiedad "KEYPREVIEW" del Formulario a True, esto hace que cualquier pulsación sea controlada por el Formulario antes que por ningún control que éste contenga. Una vez establecida la propiedad anterior, ejecuta el siguiente código: Select Case KeyCode Case vbKeyHome MsgBox "Ha pulsado la telca Inicio" End Select Bien, si en vez de escribir un mensaje para el usuario como hago aquí, escribes lo siguiente: KeyCode = 0 el buffer de teclado se quedará vacío como si no hubieras pulsado nada, esto significa que siempre que se pulse la Tecla "Inicio" en ese formulario no ocurrirá nada, está desactivada. Siento no haber podido conseguir el mismo efecto con la tecla Tab, pero seguiré investigando. Espero haberte ayudado, un Saludo. |
Pregunta: | 13622 - CAMBIAR EL PASSWORD DE BD ACCESS |
Autor: | Cesar Vallejo |
Como puedo cambiar el password de Access97 desde Visual Basic |
Respuesta: | Luis Fernando Melo |
Dim wrk As Workspace Dim usr As User 'Debes conectar el WRK a tu archivo de grupo .mdw con credenciales 'que te permitan realizar el cambio 'crea el usuario set usr = wrk.Users("nombre de usuario") usr.NewPassword "Contraseña actual", "Nueva contraseña" ..... ..... ... |
|< << 133 134 135 136 137 138 139 140 141 142 143 >> >| |