BUSCAR EN PREGUNTAS Y RESPUESTAS

 Se han encontrado 2654 coincidencias.<<  >> 

Visual Basic
    Pregunta:  70 - LEER DATOS DEL PUERTO PARALELO CON VISUAL BASIC 4
Autor:  Pachi
Estoy tratando de hacer una tarjeta de adquisici贸n de datos a trav茅s del puerto paralelo, en realidad, har铆a una doble funci贸n ya que necesitar铆a leer y escribir datos en el puerto paralelo bajo Windows 95, programando en Visual Basic 4. El caso es que no se como leer ni escribir los datos ni si se puede o no insertar c贸digo en ensamblador.
  Respuesta:  CX-Rom CX-Team
Primero que nada VB no nos deja accesar a los puertos con alguna funcion, se debe escribir una dll en c++ y cargarla desde VB y asi utilizar desde VB

Codigo de c++

#include <conio.h>

' Esta funcion retorna nada solo se escribe el numero del puerto
' Si se quiere escribir en el LPT1 888 o 3F8h
EXPORT lectura(int)
{
int regData;
regData = _outp(int);
}

'Esta funcion retorna el dato leido del puerto especificado en la funcion
' en este caso el puerto en la variable se puede poner en Hex o Dec
EXPORT Escritura(int Puerto)
{
int regData;
regData = _inp(int);
}

Estas dos funciones tienen que ser exportadas en el archivo de cabezare hay que ponerlas para exportar y generar la dll y insertarla de la misma manera que se usa la API de Windows solo que hay que poner la direccion completa del fichero o en dado caso colocarla en la carpeta de SYstem

Y ya tienes la funcion para poder escibir o leer desde el puerto paralelo o cuialquier puerto fisico

Dudas a mi mail
  Respuesta:  Jose Antonio Sanchez
A mi me pasa el mismo caso.
Y la unica soluci贸n que he encontrado es crear una dll en c++ y llamarla desde Visual Basic, la llamada desde Visual Basic es mas bien facil, mirando las ayudas lo encontraras, pero crear la dll en C++ es algo mas complicado.
  Respuesta:  Carlos
El a帽o pasado me consegu铆 unos archivos VBX para manejar el puerto paralelo. Nunca los he usado. Quien los desee puede escribirme.
Atte. Carlos
  Respuesta:  Fabio
si necesitas leer y escribir por el puerto paralelo desde vb4 la solucion es la siguiente:
tenes que bajarte de internet dos archivos .dll segun el windows que uses. si es para win 95 o superior el archivo es inpout32.dll y para win 3.1 el archivo es inpout16.dll.
luego copias este archivo en el sistem de windows
Cuando bajes estos archivos .dll seguramente tambien encontraras un .bas con la declaracion de estas bibliotecas.este .bas tenes que cargarlo en tu programa (insertar modulo) y luego solo utilizas las sentencias out y inp como en qbasic.
una buena direccion para buscar es www.lvr.com funciona porque yo cree mi propio adquisidor de datos.
si tenes algun problema o necesitas mas informacion sobre esto escribime y te contesto.

    Pregunta:  81 - C脫MO PUEDO SOLUCIONAR LOS PROBLEMAS DE INSTALACI脫N EN VB
Autor:  Pablo
Instale en 4 equipos un sistema hecho en Visual Basic 4.0 empresarial sin ning煤n problema, despu茅s modifique el sistema, desinstale la versi贸n anterior y al hacer la nueva instalaci贸n, me tira para fuera con el siguiente mensaje:
"Ocurri贸 un error inesperado, se cerrara el programa"
Parece que al desinstalar la primera versi贸n se eliminaron archivos de Windows o algo por el estilo
  Respuesta:  Willson Santos Solares
La RESPUESTA ES MUCHO MAS SENCILLA YA QUE LO QUE TENES QUE HACES ES INSTALAR EL DATA ACCES COMPONETS MAS RECIENTE EN TU COMPUTADORA DE DESARROLLO Y COMPILAR FULL Y HACER NUEVAMENTE EL INSTALADOR
  Respuesta:  Miriam Sanchez Salas
Hola
Espero que te ayude esta respuesta
Utiliza el Kit de instalaci贸n Setup Wizard que viene en Visual Basic,y lo instalas en las m谩quinas que quieras, despues cuando te pidan una actualizaci贸n generas el nuevo ejecutable y lo actualizas en las maquinas anteriores sin volver a instalar
  Respuesta:  Francisco Javier Rodrigue
Espero que te sirva de ayuda.
La contestaci贸n de Francisco Javier est谩 en el archivo pr03.txt
  Respuesta:  Luis Perez
Ese problema me es conocido porque me tuvo mucho tiempo ocupado. Un amigo me di贸 la clave. Su respuesta, que te env铆o 铆ntegra fue la siguiente:
El error se produce cuando se va ha instalar una aplicaci贸n realizada con Visual Basic 4.0 y que utiliza el Kit de instalaci贸n Setup Wizard que viene con esta versi贸n de Visual Basic, y en ordenadores que tiene instalados aplicaciones como ie 3.01, Office 97,... la explicaci贸n la vas ha encontrar m谩s abajo en un articulo que se public贸 en la Knowlegde Base de Microsoft. Yo he pasado por esto tambi茅n y a煤n sabiendo el problema y c贸mo dice Microsoft que hay que corregir la mejor soluci贸n que he visto y la he comprobado, es instalar Visual Basic 5.0 Profesional o Empresarial, porque el Setup Wizard de esta versi贸n ya es algo mejor que la versi贸n 4.0.
El articulo al que hace referencia Luis est谩 en el archivo pr03.txt
  Respuesta:  Jose Hernandez
Un compa帽ero y yo tuvimos el mismo problema al tratar de instalar un sistema. El problema ocurre porque las maquinas donde estas tratando de instalar tu programa tienen una version del Olepro32.dll 5.X y no tienen la version del Oleout32.dll 2.20.XXX instalado. Esto sucedo cuando instalas una aplicacion de Office 97, Internet Explorer 3.0, o VB 5.0 en esa maquina. Lo que puedes hacer es copiar el Oleout32.dll y el Olepro32.dll de una maquina donde puedas instalar tu sistema y si funcione.

Si sigues teniendo problemas, escribeme.

    Pregunta:  91 - VISUALIZAR EL RES. DE UNA APLICACI脫N DOS EN UNA VENTANA WIN
Autor:  Ram贸n
Hay muchos programas en Windows 3.11, que hacen llamadas a aplicaciones de texto del DOS, y que en vez de abrir una ventana del DOS, visualizan resultado de la aplicaci贸n en una ventana de texto propia. Me gustar铆a saber como puedo hacer esto en VB 3.0 Profesional. Gracias.
  Respuesta:  Alonso Salazar
Esto lo puedes hacer redireccionando la salida de la instrucci贸n a un archivo, por ejemplo si quieres hacer un DIR *.EXE de algun directorio puedes hacer lo siguiente
-> DIR *.EXE >TEXTO.TXT
Lo anterior te direccionara la salida a un archivo llamado TEXTO.TXT, luego lo 煤nico que haces en VB es abrir el archivo, leerlo y mostrarlo en el control que prefieras, igual puedes hacer con cualquier otro comando.

    Pregunta:  92 - COMO UTILIZAR UN INFORME DE ACCESS EN VB 5.
Autor:  Alexis
Les escribo porque tengo un problema al cual le estoy dando vueltas y no logro salir de el, he creado unos reportes en el manejador de base de datos MS ACCESS, pero esos reportes (informes) de ACCESS (la data tambi茅n est谩 en Access)los necesito imprimir desde Visual Basic 5.0. He estado leyendo los Helps de ambos programas pero no he encontrado como levantar informes, VB50 me permite levantar Tablas y Consultas pero no Informes; en ACCESS me dicen que lo haga con "DoCmd", pero VB50, no lo reconoce.
Si podr铆an solucionarme el problema les agradecer茅 mucho.
  Respuesta:  nabina nabina
Dim strRuta As String
dim objAccess as Object

set objAccess = CreateObject(\"Access.Application\")

strRuta = \"c:\\AcessListados\\listados.mdb\"
objAccess.OpenCurrentDatabase(strRuta)
objAccess.DoCmd.OpenReport(\"NombreListado\", acViewPreview)
objAccess.DoCmd.Maximize
objAccess.Application.Visible = True
objAccess.CloseCurrentDatabase()
set objAccess = Nothing

Eso te servir谩
  Respuesta:  Jes煤s Dorta
Prueba este c贸digo, aunque es para VB 4.0 y Acces 97 no deber铆as tener problemas con VB 5.0
Dim objAccess As Ogject
麓Modo de presentar la informaci贸n.
麓Ser铆a interesante meterlo en un m贸dulo de
麓constantes. Para el ejemplo vale as铆
Const acViewDesing=0 麓Modo dise帽o
Const acViewNormal=1 麓Modo impresi贸n directa
Const acViewPreview=2 麓Modo preview

麓Creamos el objeto
Set objAccess=CreateObject("access.application.8")

麓Abrimos la BB.DD que nos interesa
objAccess.OpenCurrentDatabase "TuBaseDatos.mdb"

麓Lanzamos el informe que nos interesa.
麓El formato del m茅todo es:
麓Aplication.DoCmd.OpenReport,,,
objAccess.DoCmd.OpenReport "NombreInforme",acViewPreview

麓Hacemos visible la ventana access
objAccess.Visible=True

MsgBox "Haga clic en aceptar para cerrar Access"

  Respuesta:  Juan Carlos Gilarranz
Esto lo he cogido de las consultas mas frecuentes de Microsoft.
Una posible alternativa ser铆a utilizar un Formulario de Access para almacenar la variable que se desea pasar desde Visual Basic, es decir, la que contendr谩 el t铆tulo del informe. Una vez abierto dicho Formulario, se abrir铆a el Informe, el cual podr铆a acceder a la variable del Formulario e imprimir con el t铆tulo correspondiente. Para hacer esto se deber谩 crear un Formulario en Access y en el evento 麓Al abrir麓 se debe introducir :
stitulo = openargs
donde stitulo es una variable del formulario que contendr谩 el t铆tulo pasado desde Visual Basic. Al abrir el formulario, como 煤ltimo par谩metro se le indicar铆a este valor. El c贸digo de Access seria:
OpenForm Formulario1,0,,,,2, mititulo
donde mititulo ser铆a la variable de Visual Basic. Una vez abierto el Formulario en Access que ya contiene el t铆tulo pasado desde Visual Basic, el segundo paso ser铆a abrir el informe en Access, en cuyo evento 麓Al activar麓 deber铆a tener el siguiente c贸digo:
Me!texto10.caption = stitulo
donde texto10 es el objeto de encabezado de p谩gina del informe y donde se asigna el valor de la variable del Formulario. El c贸digo de Access para abrir el informe seria :
OpenReport Informe1,2
Como 煤ltimo paso, se debe cerrar el Formulario para que al imprimir el informe una segunda vez, no se mantenga el valor anterior de la variable. El c贸digo de Access seria:
Close 2,Formulario1
En Visual Basic, deber谩 crear un proyecto nuevo y en el Formulario incluir un TextBox y un CommandButton. En el evento Click del bot贸n introduzca el siguiente c贸digo de Visual Basic:
Dim mititulo As String
Text1.LinkTimeout = 600
Text1.LinkTopic = "MSACCESS|SYSTEM"
Text1.LinkMode = 2聽 麓Establece un enlace DDE manual con Access 2.0
mititulo = "Titulo de prueba"
Text1.LinkExecute "[OpenForm Formulario1,0,,,,2," & mititulo & "]"
Text1.LinkExecute "[OpenReport Informe1,2]"
Text1.LinkExecute "[Close 2,Formulario1]"
Text1.LinkMode = 0 麓Termina la conexi贸n DDE con Access 2.0
Para probar el proyecto, deber谩 cargar Access 2.0 con la Base de datos que contenga el Formulario y el Informe abierta.

    Pregunta:  94 - SALVAPANTALLAS DE POWER POINT EN VISUAL BASIC
Autor:  Jol茅
Soy un principiante en esto de la programaci贸n en Visual Basic y me han encargado que haga una especie de salvapantallas con una presentaci贸n de Power Point. La idea es que esta presentaci贸n con el visor de Power Point se vea en un ordenador como si de un salvapantallas se tratase, de forma que, cuando alguien tocase una tecla o el rat贸n se parase la ejecuci贸n y se viese el escritorio o la pantalla de ordenador como siempre. Hacer que se pare al tocar una tecla o el rat贸n no creo que sea dif铆cil, pero no s茅 c贸mo hacer que con un Timer (al pasar 30 segundos, por ejemplo) se vuelva a cargar el salvapantallas.
驴Hay que convertirlo a .scr como los salvapantallas de Windows o hay una manera m&谩s f谩cil?
  Respuesta:  Diego Fernando Gutierrez
bedes hacer el ejecutable .EXE y renombrarlo desde el dos a .SCR

c:\ren misalvapantallas.EXE misalvapantallas.SCR

luego colocar el archivo en la carpeta

c:\windows\system o c:\windows\system32

de esta manera el windows reconoce el nuevo protector de pantallas.

en el proyecto de visual basic debes hacer una linea de codigo.
en el form_load de el proyecto salva pantallas debes colocar:

sub form_load
if app.previnstance = true then end
end sub

app.previnstance valida si la aplicacion que esta cargando ya fue abierta, esto con el fin de que pasados los 30 segundos no se buelba a abrir.
esta linea de codigo es importante ya que el windows abre el protector tantas veces como se acabe el tiempo de espera.

espero te sirva de algo, alguna pregunta escribeme
  Respuesta:  Ram贸n Gonz谩lez
Creo que la soluci贸n m谩s sencilla es hacer un salvapantallas normal para windows, los 麓.SCR麓, luego es windows el que se encarga de ejecutar el salvapantallas seg煤n el tiempo que le pongas en el 麓Panel de Control麓.
Para hacer esto en windows 3.x solo tienes que crear un ejecutable normal en Visual Basic, pero poniendo como t铆tulo de la aplicaci贸n:
SCRNSAVE : el nombre de tu salvapantallas
despu茅s cambias la extensi贸n de tu programa, de

    Pregunta:  99 - COMO COPIAR UN ARRAY BIDIMENSIONAL EN OTRO
Autor:  Moises
¿C贸mo puedo copiar un array bidimensional en otro en Visual Basic 4.0?
En C se hace con la funci贸n STRCPY, 驴Hay alguna similar en Visual Basic 4.0?
  Respuesta:  Paul Guerra
Lo mejor es utilizar la API CopyMemory si la matriz no contiene datos din谩micos (una matriz de string, o una matriz de una estructura que contiene un string o un object, por ejemplo). De lo contrario hay que copiarla a mano, usando un For...Next o similar.
  Respuesta:  Mauricio Y Carlos -
Nosotros usamos un vector cuyos elementos a su vez son un vector, luego se puede copiar recorriendo una dimensi贸n sola...
  Respuesta:  CAON
CREO QUE NO HAY UNA FUNCION ASI PERO SI ES COMO YO PIENSO LO PODRIAS HACER CON EL SIGUIENTE CODIGO:
PARA:
DATOS(X,Y)
DATOS2(X,Y)

FOR A=0 TO X
FOR B=0 TO Y
DATOS2(A,B)=DATOS(A,B)
NEXT
NEXT

SE SUPONE QUE DATOS ES EL ARRAY QUE TU TIENES Y DATOS2 ES EL ARRAY AL QUE QUIERES COPIAR LOS DATOS...
ESPERO QUE TE SIRVA....
CHAO.......

    Pregunta:  128 - COMUNICACI贸N CON EL PUETO SERIE
Autor:  MiguelA
Hola.
Os mando esta pregunta por que ya no se donde buscar.
Estoy programando en visual basic 4.0 16 b/32 b y en mi aplicaci贸n debo comunicarme con el puerto serie necesito saber que instrucciones API del tipo COMMEVENT o similar se utilizan para saber el estado de la l铆nea del puerto serie. Osea CTS, RTS.... yo necesito saber no solo si ha cambiado el valor de la l铆nea en cuesti贸n sino el valor l贸gico que contiene. Me han dicho que hay una instrucci贸n API que lo indica pero no la encuentro.
Si la conoc茅is o sabeis como hacerlo os pido que me lo dig谩is muchas gracias.
  Respuesta:  Ferran
Utiliza los OnCommevent para capturar los eventos (es un m茅todo del control MSComm),los otros valores, simplemente son propiedades de este control(ya sabes como obtener el valor). VB al ser a nivel alto, no deja acceder a los valores internos del puerto(accesos al sistema). No te compliques con las APIS.Me gustaria conocer tus opiniones sobre el tema, ya que uso mucho los puertos en mis programas. No dudes en contactar.
  Respuesta:  Jesus Calderon
Al instalar VB se crea el subdirectorio vb\samples, en este subdirectorio encontraras 2 ejemplos que te ayudaran a resolver este problemas los cua les son:
vb\samples\vbterm.vbp
vb\samples\dialer.vbp
Solo cambia en las propiedades del MsComm1 al puerto que quieras leer , ya sea el Comm1, Comm2, etc..
El RThreshold=1 para que puedas leer el puerto.

    Pregunta:  133 - VISUAL BASIC Y WINDOWS NT
Autor:  Federico
Estoy buscando alg煤n ejemplo o documentaci贸n de como hacer un Servicio de NT (aplicaci贸n que no necesita LOGIN de usuario en la m谩quina para que funcione) en Visual Basic. Hasta el momento he encontrado documentaci贸n de como hacerlo en Visual C++, pero al intentar pasarlo a Visual Basic ha sido inutil, porque hay ciertas llamadas al API de Windows que no me acaban de funcionar. Por eso agradezco cualquier comentario, ejemplo o lo que sea, para poder hacer la tarea que tengo entre manos. Muchas Gracias.
  Respuesta:  Douglas Gonz谩lez
Te informo que Microsoft tiene a disposici贸n un control que se llama ntsvc.ocx que le permite a un programa en VB trabajar con un servicio en NT, controlando los eventos de Start, Stop, Pause y Continue. Claro esta Microsoft recomienda que los Servicios en NT no sean creados desde VB.
  Respuesta:  InCaSaS
Creo entender que tu problema es que no sabes que usuario esta conectado a tu NT. Si es as铆, en este sencillo ejemplillo puedes ver como sacar el susodicho. No Obstante, Si no es este tu problema, explicamele mas a fondo para poderte dar una solucion.
麓Declaramos API, la cual nos devolver谩 el Usuario que esta conectado a la Maquina en la Actualidad.
Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" (ByVal lpbuffer As String, nSize As Long) As Long

麓Declaramos Variables que nos Sacaran el Usuario que est谩 conectado.
Dim sBuffer As String
Dim lSize As Long

麓Inicializamos Variables.
sBuffer = Space$(255)
lSize = Len(sBuffer)

麓En La Variable sBuffer nos Devolvera el Usuario. Muy Importante: Debes quitar los chr$(0) de mas que te devuelva.
Call GetUserName(sBuffer, lSize)
Si puedes, echa un ojillo a mi URL: http://www.geocities.com/BourbonStreet/Delta/3637/index.html
  Respuesta:  MFS
Existe una aplicacion que viene con el WindowsNT ResourceKit (Creo) y que se llama SRVANY.EXE que permite convertir cualquier aplicacion VB en un servicio de WindowsNT.
Esta aplicacion se encarga del dialogo con el Control de Servicios de NT y arranca el ejecutable que le digas. Tiene una pega : Cuando detienes el servicio, este no termina de forma ordenada sino que lo hace con un TerminateProcess.

    Pregunta:  136 - PROBLEMAS CON EL CONTROL DE ACCESO REMOTO rdoResultset
Autor:  Romell
Me encuentro trabajando en Windows NT con Microsoft Visual Basic 4.0 edici贸n enterprice y Microsoft SQL Server 6.5, accesado datos desde un cliente al servidor por un acceso remoto y ODBC.
El problema se presenta cuando deseo utilizar las filosof铆a de Transacciones con un objeto de acceso remoto (rdoResultset), ya que este no parece soportar o implementar dicha filosof铆a, y no le presta atenci贸n.
驴 A qu茅 se debe esto ?
驴 C贸mo lo puedo resolver ?
  Respuesta:  InCaSaS
Sin la parte de c贸digo fuente correspondiente, me resulta imposible el poder darte una soluci贸n. Aparte, imaginaremos que est谩s trabajando con VB5. Si es as铆, de VB4 a VB5 hay algunas peque帽as diferencias. Si quieres, me envias esa porci贸n de c贸digo para poder verla y corregirla
Echale, si puedes, un ojillo a mi JomPeich: http://www.geocities.com/BourbonStreet/Delta/3637/index.html

    Pregunta:  137 - TRANSMITIR AUDIO POR TELEFONO EN VB5
Autor:  Mauricio
Como puedo en Visual Basic 5 transmitir audio (.wav u otro) pro telefono.
Desde ya muchas gracias
  Respuesta:  Daniel Sastre Hernandez
He encontrado en el disco del Vbasic5 lo siguiente:
son dos programas que te mando con el c贸digo en formato.zip
Estos programas aparecen en el directorio cd vbasic5
tools
unsupprt
voice
muchas gracias por todo y espero que te sirvan.
Por problemas de capacidad, no podemos poner los archivos en el servidor, si los desean solo tienen que pedirlos.

|<  <<  115 116 117 118 119 120 121 122 123 124 125  >>  >|