Hay un total de 3030 Preguntas. | << >> |
Pregunta: | 19198 - VB Y WORD |
Autor: | Sergio |
Tengo un problema que no puedo solucionar, quiero que desde mi aplicacion en VB6, hacer un procedimiento para "exportar" determinada informacion a un documento de Word. Es decir que desde mi aplicacion, de manera transparente para el ususario al seleccionar la informacion deseada, y por ej al hacer click en un boton, esta info se pegue en un nuevo documento de Word, si es posible utilizando una determinada plantilla.
Desde ya gracias por la ayuda |
Respuesta: | Fatima Medina Leal |
Este es un pequeño ejemplo de como sacar informes en Word através de Visual Basic.
Si tienes cualquier duda no dudes en preguntarmela. Descargar |
Pregunta: | 19202 - ERROR 430 EN TIEMPO DE EJECUCION |
Autor: | Abner Sanchez |
Utilize el empaquetador de VB6 y no me resuelve todos mis problemas cuando quiero instalar el proyecto exe estandar en otra computadora, me marca el error 430 en tiempo de ejecucion ("este objeto no admite automatizacion o la interfaz esperada")
Nota: Ya resolvi el error 429, estoy seguro que el error 430 lo genera ADO ya que es el unico componente ActiveX que utilizo. |
Respuesta: | Fredy Ramirez |
No estoy seguro, pero si trabajas con base de datos Acces 2000 y utilizas el nuevo proveedor 4.0 para acceder a estas, es probable que necesites instalar el archivo mdac_typ.exe (Que viene con el Service Pack 5 de VB) en el computador en el que deseas instalar la aplicacion.
Puedes hacer la prueba utilizando acces 97 y el proveedor 3.51 |
Pregunta: | 19225 - EJECUTANDO CODIGO VB DESDE EXCEL |
Autor: | Tatiana Villarreal |
Hola...
Estoy creando una aplicacion en Visual Basic 6.0, desde la cual abro un archivo Excel existente que el usuario debera seleccionar del cuadro de dialogo Abrir. Al abrir mi archivo Excel, creo desde visual una barra de Menu (MenuBar), temporal que sustituye la activa. Necesito asignarle una funcion o Sub o lo que sea, a la propiedad OnAction, pero la macro que se ejecutaría no puede estar almacenada en Excel, sino en mi aplicacion Visual Basic. Como puedo leer desde excel, codigo VB, cuando hago click sobre mi barra? Intente importar el modulo con las funciones, y lo hace perfectamente, pero no puedo guardar luego el libro de trabajo (WorkBook), sin que se me guarde el modulo de macros tambien.... Gracias de antemano, por la Ayuda!!!!!!!!! |
Respuesta: | Eduardo Cifuentes |
Hola...
El tema que has tocado es muy interesante... ¿Estás guardando en la sección correcta del módulo?. ¿Revisaste los comandos que utilizaste?. Tienes que recordar que no es lo mismo Visual de Office que Visual Basic... Revisalo de nuevo....después si lo deceas mandame un email.... |
Pregunta: | 19231 - ERROR 20532 CANNOT FIND DATABASE DLL CON CRYSTAL 8.5 Y VB6 |
Autor: | Natalia Silvoso |
Estoy usando crystal 8.5 con V.Basic 6
Tengo un proyecto que llama a un reporte, el cual saca los datos de una tabla Access(del mismo dir que el reporte). Genero los instalables de VB y funciona en maquinas con NT, pero cuando lo instalo en una maquina con W98 pareciera que va a abrir el reporte pero dice: Error 20532 Cannot find Database Dll. Alguien sabe de que dll se trata?? O como generar un instalable desde crystal? |
Respuesta: | Karen Molinet |
yo tenia el mismo problema ,se soluciona de la siguiente manera:
copia estas librerias a c:\windows\system de tu pc cliente p2ssql.dll p2ctdao.dll p2irdao.dll p2bdao.dll p2sodbc.dll estas librerias las copias en pc cliente , y se soluciona el problema ¡¡¡ recuerda instalar el crystl32.ocx suerte¡¡¡¡ |
Respuesta: | Carlos Muñoz Muñoz |
ESE ERROR ME SALIA CON WIN98 Y SE SOLUCIONO REGISTRANDO EL ARCHIVO DBNETLIB.DLL.
YA LUEGO LO INCUIMOS EN EL INSTALADOR DEL INSTALL SHIELD |
Pregunta: | 19235 - IMPRIMIR INFORME DE ACCES2000 |
Autor: | Badtoy |
Que instrucciones debo seguir para visualizar e imprimir un informe hecho en Access 2000, desde una aplicación hecha con VB6?
Gracias |
Respuesta: | Daniel Guevara |
Bueno la verdad no lo he hecho desde visual basic 60 con Access 2000
lo he hecho desde visual 5 con access 97 espero que re sirva, rescate una rutinita que tenia Private Sub Command1_Click() On Error GoTo meserr Dim aplicAccess As New Access.Application Dim mconsulta As String If Option1.Value = True Then mconsulta = "((CITAS.fecha) = #0" & Calendar1.Value & "#)" ' mconsulta = "((CITAS.fecha) = #2/7/99#)" Else mconsulta = "(((CITAS.fecha) = #" & Calendar1.Value & "#) And ((IPS.CIPS) = " & DBCombo1.BoundText & "))" End If Set aplicAccess = CreateObject("Access.Application.8") aplicAccess.OpenCurrentDatabase (directorio) aplicAccess.DoCmd.OpenReport "CITAS POR PROFESIONAL REPO", acPreview, "", mconsulta Dim MBD As Database Dim MRE As String Set MBD = OpenDatabase(directorio) MRE = MBD.QueryDefs("CITAS POR IPS POR FECHA").SQL aplicAccess.DoCmd.Maximize On Error GoTo 0 Exit Sub meserr: MsgBox ("NO PUEDO REALIZR EL INFORME EN EL MOMENTO" & Err.Description) End Sub |
Pregunta: | 19243 - INSTALADORES ANTI-PIRATAS EN DISQUETE |
Autor: | Carlos Ugaz |
Quiera que alguien me explique como y en que programa puedo generar instaladores para un programa en Visual Basic 6.0, el detalle radica en cada instalador tenga un numero determinado de instalaciones permitidas.
Además las copias piratas de los disquetes de instalación no deben ejecutarse y deben emitir un “mensaje de error por copia pirata” o “copia no autorizada”. Gracias. |
Respuesta: | César Gerez |
Todo sistema de anti-pirateo que no utilice llave física por puerto, es totalmente vulnerable por cualquier principiante avanzado. Aún así, lo más facíl es crear un archivo que cuente el número de instalaciones en el diskett, compilado en un punto exe y desde este llame al setup del vedadero instalador. Como en forma un poco ingenua, el setup de instalación debe estar renombrado como un archivo de cualqueier otra cosa que al momento de ejecutarse se renombra de forma correcta y luego vuelve a renombrase en el proceso. Asi siempre que examines el diskett no se notará nada raro.
Por otra parte, podes fabricar una llave física muy simple, que por ser eléctronica le complica a los aficionados del pirateo y distribuirla junto con tu aplicación. Una tercera, es que la instalación pida una clave nva. cada vez que se ejecute por primera vez en la PC dando un mensaje como "Clave xxxx, ingrese su correspondencia..." Donde xxxx es un número que tu tengas la corespondecia y se la des via telefonica o por lo que se te ocurra. XXXX, cambia cada vez que se ejecuta ese disquett, asi por mas que se lo copien, te tienen que llamar porque la correspondencia anterior ya no sirve. Estas Son solo algunas ideas, si te sirven, pedimelas específicamente que debe hacer y que nesecitas (compilador, editor, otros). No pidas todo de todo, porque no quiero enseñar desde cero. Además, cualquier buen Hacker te lo virla, asi que esto no es descubrir la pólvora. BYE César |
Pregunta: | 19270 - COMO CREAR UN RECORSET DE VISUAL BASIC HACIA EXCEL |
Autor: | Jesus Mata |
Hola:
Gracias por ver mi pregunta. Estoy haciendo un programa de importación de datos de una hoja de Excel hacia una Base de Datos SQL server 7.0 para ello estoy utilizando Visual Basic 6.0, esta operación ya la habia hecho pero con Access y jalaba perfectamente nada mas que era con la version VB 5.0, ahora que lo tengo que hacer con VB 6.0 me truena el programa en un recordset y me manda el error type mismatch, para que te des una mejor idea de lo que hablo checa este pedaso de codigo.Grasias ojala me puedas ayudar. Public Sub ImportarXLS() Dim strImportar As String Dim dbstemp As Database Dim ws As Workspace Dim tbl As DAO.TableDef Dim otra As Database Dim Importa As Recordset Dim nomtbl As String Dim tblTem As String Dim nvaBD As ADODB.Connection nomtbl = frmImportador.txtRuta.Text Set ws = DBEngine.CreateWorkspace("ODBCWorkspace", "admin", "") Set dbstemp = OpenDatabase(nomtbl, False, 0, "Excel 5.0;") Set otra = dbstemp For Each tbl In otra.TableDefs tblTem = tbl.Name Next Set Importa = dbstemp.OpenRecordset(tblTem, dbOpenDynaset) ' abre la hoja de Excel ' aqui truena********** para mas aclaraciones por favor escribeme. |
Respuesta: | Javier Perez |
Lo que ocurre es que estás mezclando ADODB con DAO. Al abrir la base de datos mediante "OpenDatabase" estás obteniendo una referencia de tipo DAO, pero te encuentras con el problema de que la variable "Importa", que está declarada de tipo "Recordset", corresponde a un recordset de tipo ADODB, ya que tienes referencias ADODB en tu programa. Como "dbstemp.OpenRecordset" genera un recordset de ADO, obtienes el error de tipos incompatibles. Tienes dos posibilidades: o cambias toda la gestión de datos para hacer uso únicamente de ADODB o especificas en cada caso si la variable es de tipo DAO o ADODB al declararla.
|
Pregunta: | 19289 - DETERMINAR SI UN DISKETTE ESTA PROTEGIDO CONTRA ESCRITURA |
Autor: | Alcides Frank Pimienta Florez |
Hola amigos, yo otra vez.
Estoy utilizando funciones de la API de Windows para escribir en un archivo .ini (writeprivatestring) y necesito saber la manera de averiguar si un diskette està o no protegido contra escritura. Agradezco las soluciones que me puedan brindar. |
Respuesta: | Claudio Romero |
El siguiente codigo esta en un boton y probado en Visual Basic 5.
Private Sub Command1_Click() 'Tambien se puede utilizar la API GetLastError(), chequeando el 'valor ERROR_WRITE_PROTECT O ERROR_NOT_READY 'Si quieres puedes poner esto en una funcion que devuela V o F. On Error GoTo ControlError Open "a:\PRUEBA" For Append Access Write As #1 Write #1, "Hola" Close #1 'Si pudo escribir es que no esta protegido, entonces borra la prueba Kill "a:\prueba" On Error GoTo 0 ' Desactiva la detección de errores. Exit Sub ControlError: MsgBox (Error(Err.Number)) Exit Sub End Sub |
Pregunta: | 19293 - SOCKET - API DE WINSOCK |
Autor: | Juan |
estoy haciendo un programa, que usa winsock, todo funciona bien hasta que la cantidad de conexiones crece mucho, entonces pense en cambiar la ocx por las API de winsock, pero no encontre ejemplos validos, alguien tiene algo que me pueda ayudar?
Juan Carlos |
Respuesta: | Taufpate |
Por la largada de la respuesta esta aqui: resp19293.txt. |
Respuesta: | viktor muñoz |
Saludos :
Ya probaste con un OCX de un sniffer ??? Echale un vistazo. |
Pregunta: | 19302 - ¿COMO PUEDO SOBREESCRIBIR UN ARCHIVO .TXT CON VB? |
Autor: | german fernandez |
Me gustaría saber si hay alguna forma de sobreescribir la información de un archivo txt para evitarme el tener que borrar y crearlo de nuevo. Gracias |
Respuesta: | juanfra garcia |
Hay 400 millones de forma de hacerlo, directamente con open y borrando la información o de la forma mas simple y con menos código quizas. Con un richtextbox por ejem.
richtextbox1.openfile "ruta y nombre del archivo txt" 'lo habrimos richtextbox1.SelStart =0 'seleccionamos desde richtextbox1.SelLength = len(richtextbox1.text) 'hasta richtextbox1.seltext ="" 'borramos richtextbox1.savefile "ruta y nombre del archivo txt" ' y lo volvemos a guardar como ya te digo., hay otras quizas mas recomendables., pero no menos fáciles. saludos |
|< << 165 166 167 168 169 170 171 172 173 174 175 >> >| |