Hay un total de 3030 Preguntas. | << >> |
Pregunta: | 7501 - EXTRAER NOMBRES Y NUMERO DE TABLAS |
Autor: | Miguel Esquef |
Trabajo en un proyecto que accede a una base de datos acces(creada mediante el mismo proyecto)ahora cuando en un momento dado nesecito verificar cuantas tablas hay y los nombres de las mismas el valor que me devuelve la propiedad "DATA.TableDefs(Ix).Name y value" no es correcto por ejemplo si tengo 7 tablas me devuelve 12 y los nombres los cargo en un combo y me da nombres como (ysAccessObjects-MSysObjects-MSysQueries-MSysACEs-MSysRelationships)además del nombre de las tablas supongo que estos objetos que son 5 los considera tablas por alguna razón que no entiendo aún pero yo necesito los nombres de las tablas y la cantidad nada más como hago por favor desde ya muchas gracias ojala me haya explicado suficientemente bien.
miguel |
Respuesta: | Jim Adam mi |
en un bucle
dim tablassistema as byte tablassistema = 0 Dim fld as DAO.field for each fld in db.fields if lcase(left$(fld.name,4)) = "msys" then tablassistema = tablassistema +1 end if next TotalMisTablas = bd.fields.count -tablassistema espero te sirva [email protected] |
Pregunta: | 7504 - CONECTARSE A CRYSTAL 7 DESDE VB 6 USANDO ADO |
Autor: | Antonio |
Alguien sabe como conectar dinámicamente un control Crystal 7 a SQL 7 en VB 6 sin ODBCs, es decir usando una cadena de conexión? me han dicho que el control crystal soporta ADO....
Espero que alguien que tuviese codigo para hacer esto o conoce del tema, me pueda ayudar... Gracias y Saludos. |
Respuesta: | Mauricio Solano G. |
Hola amigo. La forma en que lo hago es un poco larga pero muy útil.
Creas el reporte en Crystal. Luego puedes invocarlo desde VB en un sub. Algo así: 'rpt es el nombre del ActiveX de Crystal With rpt .Connect = TuObjetoDeBaseDeDatos.ConnectionString .ReportFileName = App.Path & "\Reporte.rpt" .WindowTitle = "El título que quieras" .SelectionFormula = SQL 'SQL es una variable string que 'contiene un SQL que quisieras 'para restringir la información que quieres 'mostrar en el reporte. 'Las siguientes 5 líneas son sobre la ubicación del preview del informe .WindowLeft = 1 .Destination = 0 .WindowTop = 2 .WindowWidth = 790 .WindowHeight = 560 'Ejecuta el reporte .Action = 1 End With La idea principal es que Connect = BaseDeDatos.ConnectionString te proporciona una conexión dinámica al poder cambiar la dirección de la base de datos cuando lo desees. Yo personalmente me conecto a la base de datos mediante un archivo DSN, el cual me facilita también cambiar la dirección del servidor sin afectar el ejecutable. Espero te sirva de algo. |
Respuesta: | Guillermo Molina |
para utilizar ADO con crystal tenes que utilizar que definir los reportes como active data (solamente definiciones de campos). es otro concepto y no vas a poder ver el preview de ellos pero es más rapido para la impresion en el sitio de seagate software hay ejemplos de ellos si no los encontras escribime y te los mando |
Pregunta: | 7526 - LLAMAR A UNA AYUDA EN FORMATO HTML |
Autor: | Pepe Martinez González |
Cómo puedo hacer para que al pulsar un boton en una aplicación VB6, pueda visualizar una ayuda de tipo HTML
Gracias |
Respuesta: | J.M. Lopez |
Para abrir cualquier tipo de archivo con el programa que este asociado, tienes que utilizar la funcion:
Shell(nombre_de_archivo) Pero si lo que quieres es ver el archivo HTML desde dentro del programa, puedes utilizar un control como "MS HTML Object Library" (que me parece que viene incluido con las ultimas versiones del IE) |
Pregunta: | 7536 - CREAR MENSAJES HTML CON MAPI |
Autor: | Jorge Espartero |
Necesito saber como puedo crear una mensaje de correo en formato HTML utilizando los controles MAPI de Visual Basic 6. |
Respuesta: | José Ariel Limandri |
utiliza este codgo de ejemplo
With MAPIMessages1 .SessionID = MAPISession1.SessionID .Compose .MSGTYPE = "text/html;" .MsgNoteText = "<HTML><BODY><B>Hola</B> que tal</BODY></HTML>" .RecipAddress = "[email protected]" .Send End With en el notestext no te olvides <HTML> Y <BODY> porque sino no anda |
Pregunta: | 7545 - OUTLOOK Y EXCHANGE |
Autor: | Daniel Pazos |
Tengo instalados el MOutlook y MExchange, este como programa de correo predeterminado. Estoy realizando un programa en VB6.0 para que solamente me envie y reciba el correo del Outlook, pero al ejecutarlo se abre el MExchange. ¿Como debo de hacer para que el programa ejecute solamente el correo del Outlook? |
Respuesta: | Jose Reynaldo Chavarria Quiñonez |
Debes Hacer el MSOutlook El programa de Correo Predeterminado. Esto lo puedes hacer desde las opciones del Internet Explorer en el control Panel |
Pregunta: | 7546 - ERROR 429 EN VB6 |
Autor: | pedro felix Desalzo |
Tengo un MDI que llama a un secundario.
en el secundario tengo dos controles, un ADODC Y un Datagrid atado al ADODC. Debido a que me daba error 430 (No permitía automatización) tuve que definir en el formload el connection y el rocordsource. Ahora me da error 429. Al leer este error en el Help no me indica realmente que me sucede. Pido ayuda. Desde ya gracias |
Respuesta: | William Basabe |
hola pedro, yo creo tener la solución de tu problema y lo mas seguro es que este sea la conexion de adodc con la base de datos al que la conectas. trabaja con la propiedad ConnectionString del Adodc, si tienes problemas con esto esbribeme con confianza. |
Respuesta: | Jim Miñano |
estos errores aparecen cuando aún no se reconoce el control de enlace adatos o le falta un refresh a este
prueba haciéndole un refresh en el formload antes de culaquier instrucción. Suerte |
Pregunta: | 7564 - ELIMINAR EL F8 DEL SISTEMA DE WINDOWS |
Autor: | Randall Mora |
El proyecto es una aplicación que Elimine desde el arranque del equipo que el usuario presione la tecla F8 para entrar a modo de prueba de fallos.
Gracias. |
Respuesta: | kikonmx |
Lo que puedes hacer es mediante tu programa editar el archivo MsDos.sys ( win95 en adelante ) y agregar inmediatamente después de [Options] la opción BootDelay = 0 |
Pregunta: | 7615 - NO PUEDO TRABAJAR CON BALANZAS ELECTRONICAS EN VB 6.0 |
Autor: | gino Bustamante Díaz |
Hola:
necesito trabajar con unas balanzas electronicas las cuales me pueden enviar el peso al Comm1 se que se usa el control Mscomm pero lo probe y me salieron solo caracteres especiales no se si debo configurar de alguna forma especial la captura, cabe señalar que el programa con el cual probe es el vbterm.vbp ya que con este leo desde un Scanner recolector de dato y ahi funciona bien, pero al parecer con las balanzas no me funciona por favor si alguien ha trabajado en esto o sabe como hacerlo agradeceria su ayuda. Atte |
Respuesta: | Luis B. |
Hola Gino
Todas las apreciaciones q te han dado estan muy bien sobre todo la segunda, pero tambien debes tener en cuenta algo q ciertos equipos estan programados para recibir ciertos comando para q este te devuelva algo... Yo hice algo parecido hace poco para balanzas electronicas digitales...y tuve q enviarle un caracter cada vez q queria obtener el valor de la Balanza, Cualquier cosa conectate conmigo y con gusto te lo dare.... |
Respuesta: | Cesar A. Ojeda L. |
Epale Gino.
Tengo un programa que trabaja con dos indicadores digitales por puerto serial, estas usando bien el Mscomm pero verifica que estan las balanzas y el mscomm en el mismo protocolo es decir que los puertos seriales esten en 8Bits y 9600 Bauds. Si necesitas algo enviame un email. |
Respuesta: | Enzo Díaz González |
Gino, junto con saludarte voy a tratar de ayudarte, según lo que explicas es muy probable que los caracteres especiales que mencionas se deban a que la velocidad de comunicación o la paridad o los bits de parada (en gral. la configuración del puerto) no están en sincronía con la balanza, es decir, la balanza pude estar transmitiendo a 9600 bps y el puerto estar configurado para recibir datos a 3600.
Lo ideal sería consultar el manual de la balanza o llamar al fabricante para averiguar esto. Espero haberte ayudado. Saludos |
Pregunta: | 7616 - COMO CONTROLAR LA COLA DE IMPRESIóN DE UNA RED |
Autor: | Arnaldo González Ponce |
Hola:
Si me pueden ayudar, muchas gracias. Necesito saber cómo y si se puede controlar la cola de impresión de una red desde mi programa, saber que cliente imprimió, a que impresora, y cuantas hojas imprimió. Si no se puede todo esto, respondanme solo que se pueda por favor De antemano muchas gracias.... |
Respuesta: | hugo maldonado trejo |
oye yo yambien ando buscando lo mismo, si tu tienes instalado NT o windows 2000 te recomiendo esta pagina http://oksoft.webhostme.com/ parece que hay viene algo de lo que buscas, si tu ya encontraste otra informacion te agradeceria que me la mandaras, yo necesito controlar el puerto lpt1 en win98 gracias |
Pregunta: | 7634 - COMBOBOX EN EL DATAGRID |
Autor: | Carlos Bayas Cabanilla |
Hola soy un fiel seguidor de su pagina y sobre todo me gusta programar en Visual Basic, pero hasta ahora no he encontrado la solucion a un pequeño problema que tengo respecto al Data Grid. Lo que deseo hacer es que en la primera columna del grid colocar un pequeño combobox el cual ya se colocar entrando en las propiedades del datagrid y colocando button pero no se como llenarlo con los datos que estan ingresados en la base por ejemplo quiero que salga algo asi:
codigo descripcion valor precio uni total aqui el combobox los demas datos en el momento en el que escojo la opcion del combobox apareceran automaticamente. Sin mas que decirles les agradezco y los felicito por su pagina. |
Respuesta: | Alexander Cioffi |
Saludos....
A continuación te escribo el codigo necesario para desplegar un combo en un datagrid. Recuerda sustituir los nombres de los objetos al igual que los nombres de los campos, ya que te coloque la referencia del nombre en mayúscula. ------------- '''En el Datagrid'' Private Sub Datagrid1_RowColChange(LastRow As Variant, ByVal LastCol As Integer) moverCombos End Sub ------------- Private Sub Datagrid1_Scroll(Cancel As Integer) moverCombos End Sub ------------- '''En el Combo''' Private Sub combo1_Click() datagrid1.Columns("NOMBRE DEL CAMPO").Value = combo1.List(combo1.ListIndex) end sub ------------ '''Procedure movercombos'''' Public Sub moverCombos() On Error GoTo Error_Handler If Datagrid1.Visible Then Datagrid1.ZOrder Datagrid1.SetFocus End If Dim gridCol As MSDataGridLib.Column Set gridCol = Datagrid1.Columns(Datagrid1.Col) If gridCol.Caption = "CAPTION DEL CAMPO" Then combo1.Move Datagrid1.Left + gridCol.Left, Datagrid1.Top + Datagrid1.RowTop(Datagrid1.Row), gridCol.Width combo1.ZOrder combo1.SetFocus combo1.Text = gridCol.Text Exit Sub End If Error_Handler: End Sub Espero que este codigo te sea util para continuar con tu proyecto, si necesitas aclarar dudas puedes escribirme al email: [email protected] Saludos.- Alexander Cioffi |
|< << 93 94 95 96 97 98 99 100 101 102 103 >> >| |