PREGUNTAS CONTESTADAS - Visual Basic

 Hay un total de 3030 Preguntas.<<  >> 

    Pregunta:  2474 - COMO ACTUALIZAR INFORMES DEL DATAREPORT
Autor:  Miguel Angel Biondini
Necesito saber como se debe hacer para que los informes hechos con el DataReport de visual 6 se actualizen cuando se modifican los datos de la base a la cual estan ligados los campos.
He probado de distintas maneras y solo se me actualiza si salgo de la aplicación y vuelvo a entrar. Gracias.
  Respuesta:  Alberto Garcia Monteagudo
Creo que lo que necesitas es un UNLOAD DEL DATAENVIROMENT.
YO TENGO ESTE CODIGO Y ME FUNCIONA AL 100%.PRUEBALO!!!

Screen.MousePointer = vbHourglass
Load dteEntornoDatos 'LLAMAMOS AL DATAENVIROMENT1
Screen.MousePointer = vbDefault
rptTitulo.Show vbModal 'MOSTRAMOS EL REPORTE

Unload dteEntornoDatos ' DESACTIVAMOS EL DATAENVIROMENT1

ESPERO QUE TE SIRVA.
SALUDOS
  Respuesta:  Pdro Enrique Ayala Lafée
Private Sub Datareport1_Terminate()
' Cerramos el recordset en el evento terminate del reporte
' Previa verificación del estado de éste para evitar errores
' en tiempo de ejecución
With DataEnvironment1.rsCommand1
If .State = adStateOpen Then
.Close
End If
End With
End Sub

Yo utilice este sistema y no me funciono, si sabes de otro te lo agradesco, Gracias.
  Respuesta:  jesus angel
espero se siga nutriedo esta pagina con preguntas y soluciones es muy util aqui esta el verdadero codigo para que funcione tu datareport.

este codigo lo vi en el foro, era el mismo problema que tu tienes, yo lo aplique en una aplicacion y funciona muy bien, seguro te servira, lo que tienes que hacer es meter este codigo en tu datareport nada mas.

Private Sub Datareport1_Terminate()
' Cerramos el recordset en el evento terminate del reporte
' Previa verificación del estado de éste para evitar errores
' en tiempo de ejecución
With DataEnvironment1.rsCommand1
If .State = adStateOpen Then
.Close
End If
End With
End Sub
'Nota: rsCommand1 es el recordset del objeto Command asociado al reporte.
  Respuesta:  Roberto Carlos Zuñiga Lara
Bueno amigo mi consejo seria que hagas para el data report una consulta SQL, que se ejecute cada vez que quieres ver el reporte y de esa manera los datos se actualizaran, por ejemplo:

"Select * from Cliente Where Cliente.Codigo LIKE =' * Pe"

algo asi es con lo que tendras que probar, si tienes mas preguntas, responde a mi correo y te enviare un archivo pequeño, bye
espero te ayude.
  Respuesta:  Wilfredo Patricio
Debes realizar un refresh en el rscommand de la conexion, para refrescar los datos

    Pregunta:  2481 - DLL EN VB6 CON OCX
Autor:  Rodrigo Goncalves
Estoy desarrollando un componente (Activex Dll) en VB6 para leer el puerto de comunicaciones y dentro de la dll necesito usar el activex MSComm. Todo bien, ya que lo uso con createobject dentro de la clase y accedo a todos los metodos sin problemas. El problema es que no se como puedo levantar el evento OnComm() que dispara este ocx cuando lee caracteres del puerto. Si control no esta insertado en ningun form, puedo igual hacer que dispare el evento OnComm y poder ejecutar codigo mio ahi?
Muchas Gracias
  Respuesta:  Luis Miguel Caballero
Sí. Puedes levantar cualquier evento usando RaiseEvent. En este caso, para lograr ejecutar el evento OnComm, tendrías que escribir RaiseEvent OnComm.

    Pregunta:  2487 - CONTROLES ADODC
Autor:  EX TG
Hola, quisiera saber como puedo ligar un datagrid o un dbcombo o un dblist a un control adodc, pero sin usar el control visual adodc, sino solamente ligarlo con código y delarando una variable del tipo adodc.
  Respuesta:  Grillin poldark Mandarin
puedes hacerlo con codigo.
primero tienes a agregar un referencia a
Microsoft ActiveX data objects 2.X library, eso los puedes hacer en la opcion proyecto->referencias.

segundo: luego tienes que definir tu :
coneccion, recorset o tu command
ejm.

dim cnn as new adodb.conecction
dim rs as new adodb.recordset

cnn.open "DSN=sqlserver"

rs.open cnn,"select * from penado"

...
...

asi.

    Pregunta:  2498 - COPIAR AL PORTAPAPELES REGIONES DE PANTALLA.
Autor:  Silverio Altamirano Almazán
Podrían utedes ayudarme con el siguiente problema que tengo.

Necesito copiar al portapapeles un ventana que se encuentra en cierta region de la pantalla y despues pegarla en un control Image o Picture pero no encuentro la manera de como. He encontrada alguna instrucción tal como : Clipboard y sus metodos pero no me es de utilidad ya que en ella no encentro como obtener un copiado para regiones sobre la pantalla.

O en su defecto en vez de pegarla convertir esa ventana copiada a un archivo BMP, WMF, JPG o JPEG.

La petición es que si podrian decirme como o conque instrucciones, metodos, etc. puedo solcionar dicho problema.

Su cooperacion me sera de gran utilidad ya que me encentro realizando mis residencias profesionales y esa cuestion es para aplicarla a un sistema que estoy llevando a cabo.

Por su atencion muchas gracias.
  Respuesta:  Gregorio Cobá Gala
En windows, si pulsas la tecla imprimir pantalla (prtsc/PetSis), se copia al portapapeles la imagen de todo lo que tienes en el escritorio; y si pulsas Alt+Ímprimir pantalla se copia solamente la ventana que está activa o que tienes seleccionada. Cualquiera de éstos procedimientos los puedes complementar con otro programa como el paint. Entras al paint y ejecutas edición/pegar y el contenido del portapapeles se muestra en el documento actual y después de ésto lo puedes grabar si quieres en archivo .bmp o en el que desees.

Espero que ésto te sirva para lo que quieres

    Pregunta:  2499 - PROBLEMAS CON EL OCX DE CRYSTAL REPORT
Autor:  Ramón Moreno
Tengan todos un saludo muy especial.
Compañeros tengo un gran problema con el VB5-VB6 y el Crystal Report. Cada vez que se imprime un reporte a traves de una línea de código VB5/VB6

Reporte.Action=1

se genera un error y me saca del programa, el detalle del error indica una mala operación realizada por el OCX del Crystal report.

Si se vuelve a ejecutar el programa y se intenta realizar la impresión del mismo reporte este se imprime sin problema, si se intenta imprimir otro reporte o el mismo otra vez, se vuelve a generar el error y se repite la historia, esto me tiene loco y en el trabajo la presión de los jefes me está matando y no se si tengo que cambiar de lenguaje de programación.

Si alguno de Uds. conoce de lo que les estoy hablando o les ha pasado algo parecido de una vez les doy las Gracias.
  Respuesta:  Alvaro navarro Chaves
Estimado amigo (a); he tenido problemas de este tipo y te recomiendo que no codifiques otras cosas después de enviar el evento report = 1 ya que visual basic sigue con la secuencia y da al traste con el cristas report, envia la codificación de la invocación crystal report a un módulo independiente y deja que este trabaje antes de continuar. No se si este es tu problema pero pruebalo a ver si te sirve.
  Respuesta:  HORACIO ACOSTA
Hola, se de lo que estas hablando, y recomendaría reinstalar el Visual nuevamente con todo y Crystal. Es la manera más ´salomónica´ que se me ocurre. Suerte y paciencia...
  Respuesta:  Victor Paredes
Hola, yo he tenido el mismo problema una ves, la solucion fue volver a instalar Visual Basic, pero ahi no termino mi problema..... resulta que los programas que habia hecho anterior a la reinstalacion de visual basic no funcionaban como corresponde..... asi que lo que hice es vover a compilar los fuentes y cambiar la manera de distribuir los programas. Ahora mando el .EXE, las bases de datos y instalo las librerias de Visual basic que vienen el las revistas PC USERS.
Despues de hacer todo eso pude volver a imprimir sin ningun problema.

PD: En mi caso el error se produjo al querer instalar nuevas aplicaciones para visual basic. ¿vos instalaste algo nuevo antes de que se produsca el error?

    Pregunta:  2503 - COMO CREAR CON VB5 PROCEDIMIENTOS ALMACENADOS DE SQL SERVER
Autor:  Luis Godoy Miranda
Hola ! Estoy realizando una aplicacion Cliente/Servidor con SQL Server 6.5, quisiera saber como puedo Crear procedimiento almacenados con paso de parametros
yaque el servidor de base de datos que retirado de donde trabajo y no puedo realizarlo si alguien me puede ayudar por favor se los agradeceria.
nota si es posible un ejemplo.
  Respuesta:  Isidro Almaguer De La Rosa
especifica un poco como tienes actualmente tu base de datos, ya que dices que te retiraron el servidor,
¿En donde esta tu base de datos?

usas DAO(Access) ADO(Servidor) u ODBC(servidor), depende de como este tu BD es como pudieras crear tus procedimientos.

Se un poco mas especifico?...

Si tienes dudas puedes escribirme al correo que te proporciono

    Pregunta:  2517 - COMO SABER LA HORA DEL SERVIDOR NT DESDE MI APLICACION CLIEN
Autor:  enzo aranibar
Ayuda. como hacer para obtener la hora del servidor Nt desde mi aplicacion cliente
  Respuesta:  Freddy Espinoza Villamur
Lo más fácil y sencillo es que hagas lo siguiente:

private sub xxxxx()
dim vRe as Long
vRe = Shell("\\delta\access\newtime.bat", vbHide)
end sub

Dónde el archivo "newtime.bat" contiene lo siguiente:

@ECHO OFF
net time \\ASTERIX /set /YES

Te recuerdo que:
"ASTERIX" es el Servidor NT
"DELTA" es un cliente de la Red NT

Bueno, espero que ayude este solución planteada... atte. y adios.
  Respuesta:  Hugo Araya Holvoet
Podrías hacer una pequeña aplicación en el servidor con el control Winsock y cuando lo llames te entregue la hora y otras informaciónes.
  Respuesta:  Miguel Francisco Conde De Santis
Que tal,
Yo resolvi un problema equivalente desarrollando un objeto com que corría en el servidor, era un objeto ActiveX DLL que poseia un metodo donde pasaba el parametro de la información que deseava saber del servidor y este me retornava el valor en una propiedad, lo utize para cosas como la hora del servidor, la lista de IP y adaptadores de red que tenía, etc... desde mi aplicación cliente lo llamava con la función createobject indicando el nombre del servidor:
CreateObject(Objeto, Nombre Servidor)

Si necesitas un ejemplo eviame tu email y te lo anexo.
  Respuesta:  Fabián Andrés Sierra Carvajal
Si estas usando NT como servidor de bases de datos, basta con que preguntes la hora al motor de bases de datos, con GetDate o algo así en MS SQL Server o Now en Access.

    Pregunta:  2529 - LISTA DE TAREAS Y CTRL+ALT+SUPR
Autor:  Paul Maluenda Quezada
He visto los trucos para bloquear y detectar Ctrl+Alt+Supr, y tambien para hacer invisible un programa en la lista de tareas que aparece cuando se pulsa esta combinacion de teclas. Pero solo funcionan en Windows 95. ¿Existe algun equivalente para Windows NT?

Muchas gracias.
Felicitaciones por la pagina. Es la mejor de todas.
  Respuesta:  Luis Miguel Caballero
Yo he usado este código siempre que lo he necesitado y corrió en W2K y WNT. No sólo desactiva el CTRL-ALT-DEL, también deshabilita el CTRL-ESC y el ALT-TAB. Así que úsalo con cuidado!!!

Private Const SPI_SCREENSAVERRUNNING = 97&
Private Declare Function SystemParametersInfo Lib "User32" Alias
"SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long,
lpvParam As Any, ByVal fuWinIni As Long) As Long

Public Sub DisableKeys(blnParam As Boolean)
Dim blnParam2 As Boolean
Call SystemParametersInfo(SPI_SCREENSAVERRUNNING, blnParam,
blnParam2, 0&)
End Sub

Para desactivar las teclas usas DisableKeys(true) y para activarlas de nuevo es DisableKeys(false)

    Pregunta:  2534 - DETERMINAR LOS USUARIOS QUE UTILIZAN UN PROGRAMA
Autor:  Mariano Laguzzi
Hola gente: Tengo como tarea realizar un programa algo dificil. El ambiente es el siguiente: Servidor Novell, y terminales windows 98, y DOS 6.22. Entonces desde una terminal windows, tengo que correr el programa que me devuelva, que usuarios, terminales o nº de conección estan usando cierto programa (pepito.exe).
Exite un programita llamado "Who", pero no corre en quipos con micro grandes, por eso quiciera hacer algo mas genérico y mas visual.

Gracias gente y no vemos..
  Respuesta:  Federico Ruete
Mira, parte de ese problema (entorno gráfico) lo solucione con el asistente de visual.
luego modifique las cosas como para guardar todo cambio en los registros con usuario y fecha
´------------------------------------------------
Private Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpbuffer As String, nSize As Long) As Long
´USUARIO-----------------------------------------
Function Usuario() As String
Dim sBuffer As String
Dim lSize As Long
sBuffer = Space$(255)
lSize = Len(sBuffer)

Call GetUserName(sBuffer, lSize)
If lSize > 0 Then
Usuario = Left$(sBuffer, lSize - 1)
If Usuario = Space$(254) Then
Usuario = vbNullString
End If
Else
Usuario = vbNullString
End If
End Function
´------------------------------------------------
para obtener mas datos del usuario, los busco en una tabla de la DB y en otra me fijo que tipo de acceso tiene a cada una de las funciones del sistema.
también obtuve buenos resultados con respecto a usuarios e identificación de terminales con el objeto Inet.ocx y las propiedades remoteport, remotehost, username, etc. deberás hacer un cliente/servidor pero solo para el caso tcp y win98. Saludos cordiales :´)
  Respuesta:  Victor Manuel Flores Monroy
Mira creo que eso es Muy Facil!! ya que me imagino que corres una aplicación que desarrollaste para DOS... bueno si es asi genera un archivo de texto que contega una sola linea y que solamente contega el numero uno cuando tu aplicacion comienza agregas un numero y lo vuelves a grabar asi solamente checas dicho archivo y listo....

Espero y te sirva si no mandame un mail y vemos como le hacemos

    Pregunta:  2537 - CAMBIAR STYLE DEL COMMBO BOX AT RUN TIME
Autor:  Pepo Ribo
El titulo lo dice todo, me hace falta alguna rutina para poder cambiar el style del commbo box de 0 a 2 y de 2 a 0 en tiempo de ejecución!

Lo dejo en vuestras manos!
  Respuesta:  Luis Miguel Caballero
Obviamente, asumo que cambiar el valor de la propiedad Style no es permitido por V.B. De ser este el caso, entonces no debe haber forma posible de hacer el cambio en run-time. Sin embargo, puedes emular un cambio creando 2 controles combo box: uno con style=0 y otro con style=2, ambos con los mismos datos e ir cambiando la propiedad Visible para hacer que sólo se vea uno a la vez. Es la forma más sencilla!

|<  <<  40 41 42 43 44 45 46 47 48 49 50  >>  >|