PREGUNTAS CONTESTADAS - Velneo

 Hay un total de 3030 Preguntas.<<  >> 

    Pregunta:  7308 - WORKSPACE EN SQLSERVER
Autor:  Alejandro Salazar Chaves
Desarrolle una aplicacion para un hospital la cual consiste en guardar datos principalmente en una tabla en Sql 7.0. Resulta que cuando probaron el sistema en un ambiente multiusuario cuando dos o más por ejemplo iban a insertan en la tabla a la vez el programa se cae y en la base de datos se pierden o borran datos. Quiero saber si se pueden utilizar el workspace en SQl pues sólo he encontrado ejemplos de su uso en access. Así podré controlar las transaciones de los usuarios.

Les agradezco su pronta respuesta!
  Respuesta:  Héctor Niño
Veo que utilizas DAO para el acceso a datos, yo utilizo ADO para conectarme a Sql Server 7 con procesos almacenados en un entorno multiusuario usando VB6 (sp4) y Crystal Reports 8 y no he tenido problemas como el que describes, ADO tambien permite controlar las transacciones a traves del metodo BeginTrans de la conexion abierta.
pd. Puedo enviarte una aplicacion sencilla para probar las inserciones en entorno multiusuario usando ADO y que te sirviera como punto de referencia, solo enviame tu mail para preparte el codigo.
Saludos

    Pregunta:  7335 - MONITOREAR DESDE VB (MAPI) CUANDO LLEGUE UN MAIL EN OUTLOOK
Autor:  Joel Ruiz Rosas
Hola:
Deseo saber como monitorear un mail que llega a Outlook desde una aplicacion que se esta ejecutando en VB
  Respuesta:  Xavi
Este es un codigo que yo utilice de prueba para ello...

MAPISession1.SignOn
MAPIMessages1.SessionID = MAPISession1.SessionID
call Mostrar

Private Sub Mostrar()
Dim i As Integer
Dim ii As Integer
MAPIMessages1.FetchUnreadOnly = True
MAPIMessages1.Fetch
For i = ii To MAPIMessages1.MsgCount - 1
MAPIMessages1.MsgIndex = i
ListaCorreos.AddItem MAPIMessages1.MsgSubject
Next i
If ListaCorreos.ListCount > 0 Then
Label6.Caption = "Hay " & ListaCorreos.ListCount & " correos pendientes de leer."
Else
Label6.Caption = "No hay correos pendientes de leer."
End If
End Sub

ListaCorreos es un Listbox...

Espero que te sirva.

    Pregunta:  7375 - VISUAL BASIC CON PARADOX
Autor:  Ivan Alexis
Me gustaria saber como hacer una conexion (Preferiblemente a mano,es decir, sin data environment,controles Data ni similares) en Visual Basic a una serie de tablas grabadas en formato Paradox (.DB). Muchas Gracias...
  Respuesta:  José Antonio Guillén Martínez
Puedes conectar a cualquier base de datos utilizando el sistema ADO, si no sabes como utilizarlo, ponte en contacto conmigo y te enviaré un ejemplo.

    Pregunta:  7376 - FILTER EN RECORDSETS ADO: AND Y OR
Autor:  Freddy Salas
Al usar condiciones concatenadas por AND y OR en un filter, me bota un mensaje de error acerca de argumentos incorrectos.

NO GENERA ERROR cuando la expresion usa solo un tipo de operador:

rs.filter="expresion1 AND expresion2 AND..."

rs.filter="expresion1 OR expresion2 OR ..."

SI PRESENTA ERROR cuando la expresion una operadores AND y OR combinados:

rs.filter="(expresion1 AND expresion2) OR expresion3

¿¿¿Cual es el problema y como podria corregirlo???
  Respuesta:  Armando Diaz de Leon
No se exactamente que desees hacer con el filter, pero lo que puedes hacer es crear un recordset a partir de la conexion de tu base de datos (ADO) junto con una sentencia SQL donde des las opciones que quieras para filtrar, puedes ocupar el siguiente codigo de ejemplo como referencia

Dim rs as recordset
set rs = new recordset
rs.open "select (campos) from (Tablas) where (opciones para filtrar)....", conexion, adStatic, (readonly o dinamica)

y obtendras un registro con los datos filtrados

    Pregunta:  7384 - CREACIóN DE VARIABLES EN PROYECTOS ACTIVEX (COMPONENTES DLL)
Autor:  Ruth Lady Arias Rodriguez
Estoy realizando un proyecto para pensiones en Visual Basic 6.0, con componentes ActiveX. Mi pregunta es la siguiente: utilizo variables globales en las componentes, pero siempre que creo una componente tengo que crear la variable como nueva dentro del proyecto ActiveX. ¿Cómo hago para crear una sola variable y hacer referencia a ella en todos los proyectos ActiveX?
  Respuesta:  Jhonny Fonseca
Pon todos lo componentes DLL Activex (*.cls), en un solo proyecto, al igual que los OCX Activex (*.ctl); no puedes usar una variable global para todo un grupo de proyectos, recuerda que al compilarlo se crean archivos OCX,DDL y EXE separados

Una vez que esten en un solo proyecto, pasa los valores u objetos atravez de funciones

    Pregunta:  7409 - EDITAR IMáGENES EN VB 6.0 DESDE ACCES´97
Autor:  Sergio Espino
Hola:
Tengo una duda concreta que es la siguiente:
¿ como relaciono una foto desde una base Acces 97 para ser editada en una aplicación VB ?.
En mi intento hice lo siguiente:
1) Cree un campo "foto" de tipo Objeto OLE dentro de una tabla Acces llamada datos_cli.
2) En VB generé un formulario para capturar un objeto OLE que debería ser la foto cargada en el campo de la tabla Acces.

El código para editar es el siguiente:

Dim dbsclientes As Database
Dim rstClientes As Recordset
Set dbsclientes = OpenDatabase("c:\mi visual basic\clientes.mdb")
Set rstClientes = dbsclientes.OpenRecordset("datos_cli", dbOpenTable)
With rstClientes
.Index = "CEDULA"
.Seek "=", ABMClientes.txtCédula
ABMClientes.txtNombre = !Nombre
ABMClientes.txtEdad = !Edad

'*************************
ABMClientes.OLE1 = !foto ´
'*************************

' El programa al ejecutarse da error aqui, y dice que NO 'COINCIDEN LOS TIPOS, lo cual no lo entiendo ya que ambos 'son mapas de bits, o sea, el que está declarado en la base 'de datos(foto) y el campo del formulario(ABMClietes.OLE1)

End With
rstClientes.Close
dbsclientes.Close
  Respuesta:  cesar Burgos
Estimado sergio:
creo que la solucion es almacenando el nombre de la imagen (foto1.bmp) con formato jpg, bmp, o el que soporta el picture o image y para visualizar lo cargas al objeto que desees, y tienes mas dudas avisame para enviarte un ejemplo.

    Pregunta:  7468 - MANEJO DE RELOJES
Autor:  Fernado Duckwen Rau
Necesito informacion de como graficar informacion que entra por los ports de una pc.
O sea una vez leido como puedo graficarlo en un reloj analogico el valor.
Por ejemplo si realizo la lectura de un horno y la temperatura es de 100 ºc y quiero graficarlo ¿Qué hago?
  Respuesta:  J RC
Para la lectura de los datos por el puerto serie, debes utilizar un control Serial, que tiene entre entre sus propiedades una en la que se almacenan los datos que entran, y un evento DataArrival que notifica la entrada de datos.
EL valor recibido puedes visulizarlo en un control label, con la fuente que mejor te venga.

    Pregunta:  7476 - RUN TIME ERRORS
Autor:  Alejandro Parente
Hola que tal...como puedo solucionar el problema de que me sale un Error en tiempo de ejecución Nro. 5 \" llamada a procedimiento Invalida\"

si lo corro desde visual apretando F5, todo bien..el problema es cuando hago el exe.

les agradeceria mucho su ayuda....
  Respuesta:  Alejandro Romero Mansilla
El problema esta en que en alguna parte del codigo estas haciendo un llamado a funcion o procedimiento que no existe mas y es muy probable que el codigo que hace esta llamado tambien no lo estes utilizando.

Lo que te aconsejo es que no utilices el F5, usa el Ctrl + F5 que efectua una corrida mas completa tal como lo hace el compilador que te genera el exe.

Saludos

    Pregunta:  7482 - MOSTRAR UNA APLICACION OCULTA AL LLAMAR NUEVAMENTE AL EXE
Autor:  Ivan Alexis
Hola,me gustaria saber como hacer para q si ejecuto una aplicacion,y ya hay una instancia previa de la aplicacion ejecutandose,pero esta esta oculta,q en vez de ejecutarse de nuevo la aplicacion,lo q ocurra sea q se me haga visible la instancia q tenia oculta.Muchas Gracias
  Respuesta:  AP Soft
Existe una forma de hacer lo que precisas, pero que sólo enfoca aplicaciones NO MINIMIZADAS. Para probar, crea un proyecto nuevo, inserta el código que incluyo a continuación, y compila el proyecto.
Después, ejecutalo sucesivamente dos veces.
Existen medios para MAXIMIZAR una Aplicación minimizada mediante el uso de la API de Windows. Si precisas información, enviame un E-Mail a [email protected]

Private Sub Form_Load()
' Si ves la ayuda correspondiente a la instrucción
' "AppActivate", dice que en el caso de existir dos
' aplicaciones en ejecución con el mismo título, se
' activa arbitrariamente una u otra. En la práctica,
' lo que sucede SIEMPRE que yo lo he probado, es que
' se intenta activar la segunda instancia, lo que en
' este caso, en que AppActivate se incluye en el pro-
' cedimiento _Load, provoca un error de tiempo de eje-
' cución. Por ésta razón, el formulario carece de pro-
' piedad "Caption" -que da el título a la aplicación
' en ejecución- y sólo se cumplimenta ésta en el su-
' puesto de que no haya otra instancia previa.
' ATENCION. "AppActivate" NO MAXIMIZA una ventana mi-
' nimizada. Sólo la enfoca.
If App.PrevInstance Then
' Existe una instancia previa en ejecución. Enfoco di-
' cha instancia...
AppActivate "Primera instancia de la Aplicación"
' ...y descargo ésta segunda.
Unload Me
Else
' No hay instancia previa. Cumplimento título de la
' Aplicación.
Me.Caption = "Primera instancia de la Aplicación"
End If
End Sub
  Respuesta:  Ariel Hualpa
Lo que debes hacer es preguntar durante la carga si ya hay una instancia de tu programa corriendo, para ello usa App.PrevInstance. Esto te responde con True si tu programa ya esta corriendo y false caso contrario. Luego lo unico que tienes que hacer es poner la propiedad visible de tu form a True si quieres que se vea.

Si quieres un ejemplo escribeme.

    Pregunta:  7485 - MSCHART (TíTULOS ENCIMA DE LAS SERIES)
Autor:  pelos pelos
Tengo un control MSChart con unas estadísticas,en donde tengo 3 series por cada artículo que muestro, estas series (o columnas) son Cantidad,Precio,total), lo que deseo poner es el total en número encima de cada serie y no lo consigo poner ni sé si se puede. Si alguien me puede echar una mano se lo agradezco.
Un saludo.
  Respuesta:  Pablo Coatl
Saludos.
Espero que te haya entendido, creo que lo que quieres es colocar rotulos de datos sobre las columnas de la gráfica; como lo hace Excel con sus Gráficas. Si es así entonces lo que debes hacer es utilizar:

MSChart1.Plot.SeriesCollection(h%).DataPoints(-1).DataPointLabel.LocationType = VtChLabelLocationTypeOutside
MSChart1.Plot.SeriesCollection(h%).DataPoints(-1).DataPointLabel.Component = 1
MSChart1.Plot.SeriesCollection(h%).DataPoints(-1).DataPointLabel.VtFont.Size = 8

'donde (h%) es el indice de la serie a graficar.

Estas ordenes estableceran los rotulos de datos sobre tus series.
Espero que te sirva esta.
Hasta luego!

|<  <<  92 93 94 95 96 97 98 99 100 101 102  >>  >|