PREGUNTAS CONTESTADAS - Visual Basic

 Hay un total de 3030 Preguntas.<<  >> 

    Pregunta:  4703 - PROBLEMAS CON WINDOWS 2000
Autor:  Antonio Luyo
Tengo un Programa desarrollado en Visual Basic 6.0, este programa se ejecuta muy bien en sistemas operativos Win9x, pero cuando lo ejecuto en Windows 2000 llega un determinado momento donde el teclado se desabilita(no se cuelga) todo funciona normalmente ( el mouse, el windows) solamente que el teclado no responde; no se que puede estar mal, he compilado el programa en Windows 2000 y sigue igual.
El Programa usa mucho el "sendkeys" no se si este será el problema ( no creo ).
No se si es el Windows 2000 o el Visual Basic 6.0 que no funciona para windows.
Por favor espero su ayuda lo mas rapido posible, Gracias.
  Respuesta:  Ubeimar Alonso Vergara Gallo
Lo que pasa con Windows 2000 es que trae una serie de comandos que se ejecutan despues de dejar cierto tiempo presionada una tecla.
Lo mas posible es que al usar SendKeys estes simulando uno de esos comandos.
Prueba por ejemplo dejando presionado Shift por unos 10 segundos y te daras cuenta de que te hablo.
Revisa tu codigo para ver que no tenga algo similar...

    Pregunta:  4709 - IMPRESION DRAFT CON DATEREPORT CON VB6
Autor:  JOSE MANJARRES
COMO PUEDO IMPRIMIR EN FUENTE DRAFT 12 O 10 CPI EN VB6, YA QUE LAS FUENTES QUE ACTUALMENTE UTILIZO EN MIS REPORTES SON DEMASIADO LENTAS.

YO OBSERVO QUE ESTA FUENTE ESTA DISPONIBLE EN MICROSOFT WORD, PERO NO ESTA DISPONIBLE EN EL DATAREPORT.

AGRADEZCO SI ALGUIEN SABE LA RESPUESTA
  Respuesta:  Yolvi Herrera
Imposible, el datareport es un reporteador objeto, tambien tuve ese problema, la unica forma de imprimir en modo draft es utilizando el objeto printer, para eso puedes revisar el manuel de ayuda, pero la configuracion es mas o menos la siguiente:

printer.printquality=vbprqdraft
printer.font="draft"
printer.print "mensaje de impresion 1"
printer.print "mensaje de impresion 2"
printer.print "mensaje de impresion 3"
printer.print "mensaje de impresion 4"
printer.enddoc

Esta rutina para que te sea efectiva tienes que crear una funcion que te deveuelva los valores conforme los ingresas, esto dentro de un for next.
Un favor si tuvieses paginas de consultas de programacion me las envias please, Gracias

    Pregunta:  4712 - URGE: CONSEGUIR RAPIDEZ CON ADO Y SQL-SERVER 7
Autor:  ameli cn
Gracias por leerlo.
Tengo un gran problema y es que tengo una aplicacion VB en la que accedo a una base de datos en Sql-Server 7 a traves de ADO y los accesos son muy muy lentos. Que puedo hacer hay algo para optimizarlo en SQL-Server 7 o que hago mal, yo abro una conexion para toda la aplicacion y la utilizo en los accesos de esta forma:

Global G_Conex_Config As New ADODB.Connection
Dim reg As New ADODB.Recordset

G_Conex_Config.Open "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;PWD=;Initial Catalog=nombre_base_datos;Data Source=nombre_servidor", , , -1
.
.
.
reg.Open "Select * from empresas", G_Conex_Config, adOpenDynamic, adLockOptimistic, -1

Muchas gracias por vuestra atención
  Respuesta:  Javier Gonzalez
Para optimizar tus consultas, deberias administrar los indices de tus tablas, NO usar un recordset para actualizar o agregar(Update, AddNew) usa instrucciones SQL (Insert into,Update set), Para crear recordset, para recorrerlos, en la consulta solo debe obtener los que necesitas, no pongas "select * from ...", ocupa mucha memoria, al crear el Recordset debe crearlo no como dynamic, ni Static, debe hacerlo como Firehose (De Solo lectura y solo avanze), crea un cursor notablemente mas rapido
  Respuesta:  Ubeimar Alonso Vergara Gallo
Lo que se puede hacer es no abrir todos los recordset en el modo adOpenDynamic, y solo se debe usar cuando lo que se quieren es actualizaciones (update) o insertar (addNew).
Para solo consulta es mejor el modo adOpenStatic.
Por otro lado es mejor omitir el ultimo parametro (-1).

El modo en que se abre un recordset influye en los tiempos de respuesta de estos.

Al abrir la conexion solo es necesario el primer parametro (ConnectionString)

PD: mil disculpas, pero no suelo marcar los acentos, espero que esté claro.

    Pregunta:  4732 - VB5 Y SAP
Autor:  Sergio Castillo Ortiz
Hola, quiero hacer un desarrollo en visual basic 5 accesando información de SAP/R3, en los componentes de VB ya tengo algunos OCX para SAP, pero no se utilizarlos ya que no tienen ayuda.

Si alguien sabe de algun lugar en la red u otro medio de consulta se los agradecere.

Gracias.
  Respuesta:  Bernardo Calderon
Sergio, debes crear en SAP una función del tipo RFC, que te entregue los datos que tú necesitas, una vez creada la exportas a Visual Basic y te entrega el código listo (solo en 16 bits) tú haces las modificaciones para 32 y listo.. al principio es un poco complicado... (como todo lo de SAP) pero luego de hacer un par de funciones se entiende la lógica y se hace más facil.. Yo tengo funciones hechas en Visual Basic y en Power Builder que conectan sistemas externos con SAP.

Saludos.
  Respuesta:  Daniel Figueroa Aguirre
Debes crear las funciones dentro de SAP y luego utilizando la OCX, SAP Logon Control conectarte a VB, aquí tienes un ejemplo, no puedo darte una dirección en internet porque no la conozco.

Function Conexion()
Conexion = True

´Conexión a SAP en modo de desarrollo

´Desarrollo
Set Connection = frmEntry.controlSAP.NewConnection ´R/3 Logon

Connection.System = "sun98"
Connection.ApplicationServer = "/H/129.1.1.11"
Connection.SystemNumber = 0
Connection.User = "Aclaveria"
Connection.Password = "JessicaP"
Connection.Client = "100"
Connection.Language = "S"
If Connection.Logon(0, True) Then
Else
MsgBox " Conexión Erronea " + Chr(10) + "Favor chequear su conexión a SAP O" + Chr(10) + "Contactarse con Administrador de Sistema"
Conexion = False
Exit Function
End If
End Function

Function BuscaClienteSAP(cmb As ComboBox) As Double
Dim CodCliente As Double
Dim DesCliente As String
Dim SapFuncion As Object
Dim Material As Object
Dim Tabla As Object

Dim objRfcReadTable As Object

If Not Conexion() Then
Exit Function
End If
Dim rfc As Object
Set SapFuncion = CreateObject("SAP.Functions")
Set SapFuncion.Connection = Connection
Set rfc = SapFuncion.Add("Z_RFCSGV_LEER_CLIENTES_AWP") ´Función desarrollada en SAP Z_RFCSGV_LEER_CLIENTES_AWP

´If Anular(NomCliente, "") <> "" Then
´rfc.Exports("TEXTO") = Anular(NomCliente, "")

    Pregunta:  4739 - BLOQUEAR EL CLICK DERECHO DEL MOUSE
Autor:  Shagrath Veltz
Estoy desarrollando una aplicación, pero en ciertos momentos me es necesario inhabilitar el click derecho del mouse quisiera saber Como hacerlo.

Agradezco la ayuda que me puedan prestar.
  Respuesta:  Juan Palma
En vez de intentar deshabilitar el botón derecho, sería más fácil detectar que botón está pulsando el usuario y ejecutar el código correspondiente solo si pulsa el botón derecho. En el evento MouseDown puede poner el siguiente código:

If Button = 1 Then
'Pon aquí tu código
End If

El código solo se ejecutará si se pulsa el botón izquierdo.
  Respuesta:  José Luis Pineda Flores.
Dependiendo del botón usado o de si se han presionado las teclas MAYÚS, CTRL o ALT. Para proporcionar estas opciones, use los argumentos button y shift con los procedimientos de evento MouseDown y MouseUp. En “Detección de los estados de MAYÚS, CTRL y ALT”, más adelante en este mismo tema, se describen las técnicas para utilizar el argumento shift.
Los eventos MouseDown, MouseUp y MouseMove utilizan el argumento button para determinar qué botón o botones del mouse están presionados. El argumento button es un argumento de campo de bits en el que cada bit representa un estado o una condición. Estos valores se expresan como enteros. Los tres bits menos significativos (inferiores) representan los botones primario, secundario y central del mouse, como se muestra en la figura 11.4.
Figura 11.4 Cómo representan los bits el estado del mouse


El valor predeterminado de cada bit es 0 (False). Si no hay presionado ningún botón, el valor binario de los tres bits es 000. Si presiona el botón primario, el valor binario o patrón cambia a 001. El valor del bit del botón primario cambia de 0 (False) a 1 (True).
El argumento button utiliza un valor decimal o una constante para representar estos patrones binarios. En la siguiente tabla se muestran los valores binarios de los bits, el decimal equivalente y la constante de Visual Basic:
Valor binario Valor decimal Constante Significado

001 1 vbLeftButton Se ha presionado el botón primario.
010 2 vbRightButton Se ha presionado el botón secundario.
100 4 vbMiddleButton Se ha presionado el botón central.

Nota Visual Basic proporciona constantes que representan los valores binarios de los argumentos button y shift. Estas constantes pueden usarse indistintamente con sus valores decima

    Pregunta:  4740 - ACTUALIZAR DATAREPORT
Autor:  César P.
Tengo creado los reportes conectados al dataenvironment, hago una consulta con parametros
y me muestra los datos,pero cuando le doy nuevos parametros el datareport me sigue mostrando los datos anteriores
Que debo hacer para actualizar el datareport ?

Cualquier ayuda es bienvenida...
  Respuesta:  German Alzate
viejito tiene que poner lo siguiente en el metodo initialize del datareport

supongamos que tenemos un datareport llamado "dtr_resultado" y un dataenvirontment llamado "dte_resultado" y copiamos el siguiente codigo en el metodo initialze del datareport

Private Sub DataReport_Initialize()
' checamos si la conexion se encuentra abierta
If dte_resultado.rscomando1.State = 0 Then
dte_resultado.rscomando1.Open
End If
dte_resultado.rscomando1.Requery
'cerramos la conexion
dte_resultado.rscomando1.Close
'refrescamos los datos del report
dtr_resultado.Refresh
End Sub
  Respuesta:  Miquel Garcia
Prueba con el evento Refresh o Requery del DataEnvironment antes de visualizar los resultados.
Te tiene que funcionar.

    Pregunta:  4741 - CONECTAR VB CON POSTGRESS DE LINUX
Autor:  victor martinez
Necesito conectarme con postgress de linux y visual basic, esta coneccion se debe realizar a travez de un odbc que permita actualizar datos utilizando ADO.
Me podria ayudar alguien
  Respuesta:  Luis Eduardo Cañedo Ugalde
Bajate el controlador ODBC para postgres de "ftp://ftp.postgresql.org/pub/odbc/index.html" e instalalo.
Despues colo configura tu ODBC eligiendo el controlador postgres, direccionandolo hacia tu servidor postgresql, en el puerto que este sirviendo generalmente el 5432, a la base de datos que quieras accesar, con el usuario autorizado y la clave del mismo.
Ten cuidado en configurar en avanzada la opciòn para ver las tablas del sistema, sino te marcarà errores al tratar de conectarse.
Tambièn ten cuidado de configurar el archivo pg_hba.conf del servidor pgsql para que tu màquina windows tenga permiso de acceso a las bases de datos de postgresql.
Hecho esto en VB se hace lo usual para una base de datos cualquiera, se crea la coneccion direccionada al ODBC de postgres, el recorset y trabaja como si estubieras conectandote a acces.
La primer conexiòn al servidor se hace lenta, pero despues de que lo encuentra ya trabaja normal.

    Pregunta:  4746 - COMO IMPRIMIR CON UN ORDEN DATOS DEL BUFFER IMPRESORA
Autor:  Manuel Gómez Zamorano
Vera tengo VB5, CLIPPER y WORD´97.
Pues bien yo recorro un DBF registro a registro (y lo recorro ordenadamente) y por cada registro de estos lo tengo que combinar con un documento WORD (que lo combino)(es un registro un documento WORD diferente) , despues lo mando a imprimir con objeto.printout y luego cierro el objeto. El problema esta en que en el buffer de la impresora (red NOVEL) se amontonan desordenadamente y por tanto se imprimen desordenadamente.
Gracias de antemano.
  Respuesta:  rafael Morales Lara
El problema que tienes no es de clipper ni de vb.
el problema lo tienes en la configuracion novell, tienes que entrar en configuracion de novel y no mandar a la cola de impresion, sino que ese usuario imprima directamente

    Pregunta:  4748 - MEJORA EN REALIZAR CONSULTAS EN AS400 CON VBASIC
Autor:  Angel Arcentales
Saludos..
Estoy trabajando en una red con Nt y AS400 y me enlazo a los datos atravez de ODBC con Visual Basic. Pero al realizar una consulta en una tabla cualquiera el tiempo de respuesta es muy lento y a veces en leer un solo registro demora cerca de 5 minutos en una tabla de tan solo 10 registro.
Entonces, si alguien sabe como poder optimizar el tiempo de respuesta de las consultas SQL en el AS400 al ser realizadas desde Visual Basic, le agradeceria mucho.
  Respuesta:  adan garrido
Mira mi cuate, para hacer la conexion con as400 la tienes que realizar lo siguiente :
1) conectar as400 con client acces
2) leer tablas de as400 con client acees
3) conectar visual basic con client acces
4) leer datos de client acces

son los cuatro pasos basicos para conectarte, y tu transferencia es un poco mas rapida !.

    Pregunta:  4764 - PROBLEMAS CON DAO350.DLL
Autor:  Ernesto Blanco Ruiz
He realizado una instalación que accede a bases de datos de Windows 97 mediante DAO. El problema me aparece a la hora de instalar el programa en la maquina remota ya que origina un error al autoregistrar el archivo dao350.dll y al entrar en el programa, no se realiza el link a la base de datos. Esto ocurre en una minoria de ordenadores. ¿Sabe alguien a que es debido y como se puede solucionar?. Se que se puede registrar un archivo mediante la ejecucion de Regsvr32.exe pero es bastante complicado decirle a un cliente nuestro que ejecute esa aplacion, ¿sabe alguien como se puede realizar de manera mas sencilla incluso automaticamente? ¿Necesito incluir la libreria dao2535.tlb y registrarlo?
Gracias a todos.
  Respuesta:  Enzo Díaz
Primero que todo es necesario saber en referencias a que librería de acceso a datos se esta haciendo referencia (valga la redundancia).
De todas formas lo más recomendable es instalar mdac_typ.exe (viene con VB y con sus SP) antes de instalar tu aplicación, esto registra los motores de acceso a datos indistintamente si es DAO o ADO.
Esto debería resolver el problema.

|<  <<  69 70 71 72 73 74 75 76 77 78 79  >>  >|