PREGUNTAS CONTESTADAS - Visual Basic

 Hay un total de 3030 Preguntas.<<  >> 

    Pregunta:  610 - HERENCIA EN VB
Autor:  Cesar Iman Namuche
Quiero hacer un Formulario base, apartir del cual se van a crear mas formularios.

Cuando yo actualizo el formulario base no se reflejan los cambios en los formularios creados, apartir de este.

Ejemplo, en PowerBuilder creao un window(clase) y heredo apartir de alli todos mis windows, cuando yo actualizo mi clase automaticamente se refleja en mis otros windows creados apartir de este...

Como lo haria en Visual Basic...

Gracias..

  Respuesta:  Armando Bronca
En realidad el termino de herencia en vb es muy subjetivo la herencia como tal no existe..
  Respuesta:  Jorge Rodriguez
Al hacer un formulario cualquera y agregarlo a tu proyecto se esta convietiendo en un objeto nuevo que se puede heredar, dicho formulario lo pueder tener en /n/ proyectos y al actualizarlo automaticamente se reflejan estos cambios en todos tus proyectos.

Para que en tiempo de ejecución puedas crear /n/ veces un formulario primero declaras una variable con ese tipo de dato y luego la activas.

Ejemplo

Dim MiNvoFor as New ForBase ´Hereda a MiNvoFor el formulario ForBase

MiNvoFor.Show ´Activa el nuevo formulario

Nota, para controlarlo recurre a las colecciones de objetos.

    Pregunta:  621 - FILTRAR INFORMACION PARA CRYSTAL REPORTS
Autor:  Gerardo Portillo
Ya tengo mi sistema completo, solo me hace falta la generación de reportes, quiero hacerlos con Crystal Reports pero no puedo filtrar la información del usuario que obtengo desde mis formularios. Ya los puedo generar desde el crystal reports pero cuando hago la llamada desde mi sistema me genera el mismo reporte que tengo creado, ya intenté con SQl pero tampoco me hace caso. Quisiera alguna ayuda para poder decirle al control CrystalReport1 que mis cajas de texto y mis dbcombos tienen las especificaciones del reporte a generar. Soy principiante con Crystal reports. Agradezco cualquier ayuda. De antemano Gracias.
  Respuesta:  Cristina Ripoll
Hola,

Las respuestas anteriores son correctas, pero si al grabar el listado de Crystal le has dicho que guarde los datos con el informe, siempre te imprimirá el mismo listado... aunque intentes filtrar con la propiedad "Selectionformula"

La solución es abrir el listado con el crystal reports e irte al menú: "Archivo" --> "Opciones del informe" y desmarcar la opción "Guardar datos con informe"

Bueno, espero que te sirva.
  Respuesta:  Eric Del Valle
Dim dFr As String
´ como seguramente lo vas a copiar y pegar
´ por eso estoy incluyendo los comentarios ya hechos con el apóstrofe

´ crNotas=Control de Crystal Report (CrystalReport1)
´ FechaDeHoy=Función creada por mi devuelve una cadena, ejem: 28 de marzo de 1968

crNotas.WindowTitle = "Notas de fecha: " & FechaDeHoy ´ título de la ventana
crNotas.DiscardSavedData = True ´ no grabar datos

´ txtConsulta.Text = Contiene la información que el
´ usuario va a ir tecleando para armar la consulta interactiva
´ así no lo sometes a tus campos, sino a varios datos
´ dependiendo del campo que seleccionen y evaluando cada acción

dFr = txtConsulta.Text
´ intente hacerlo con CDATE(txtConsulta.Text)
´ pero a la hora de pasarselo a crystal
´ cuando pones una fecha como 12/08/2000
´ si pongo day(cdate(txtConsulta.Text)), me devuelve 8
´ y no como lo maneja Crystal, que es 08
´ por eso el rollo de abajo, right, left y mid mm/dd/aaaa

txtSqlR = txtSqlR & "date(" & Right(dFr, 4) & "," & Left(dFr, 2) & "," & Mid(dFr, 4, 2) & ") "
crNotas.SelectionFormula = Trim(txtSqlR)

crNotas.PrintReport

´Para que entiendas un poquito más, de como quedaría la cadena txtSqlR
´ten mucho cuidado con los espacios.

txtSqlR="{mitabla.nombre}=´ERIC´ AND {mitabla.ciudad}=´XALAPA´ OR {mitabla.fecha}=date(1968,03/28)"
´checa que en la fecha lleva el formato aaaa/mm/dd = 1968,03,28
  Respuesta:  Rodrigo Treviño
Hola: me imagino que para rellenar tus Textbox y DBGrid utilizas una consulta con parametros, si es asi, sobre una consulta igual pero sin parametros crea el reporte, al estar en cristal report te mostrara todos los registros, pero desde VB le suministras los parametros de seleccion algo asi
dim xref as string
xref = "{cr.nref} =" & nref.Text
Menu!crep.SelectionFormula = xref
cr.nref es el nombre del campo de cristal al que quieres que se aplique la seleccion nref.text es el campo en VB que contiene el valor que se utilizara para la seleccion Menu!crep es la ubicacion y el nombre del control de cristal report.
aqui te aclaro que solo es necesario cargar uno en todo el proyecto, ya que esta disponible para cualquier form.

Saludos y si requieres mas informacion mandame un Mail

  Respuesta:  Javier Sepúlveda
Hola para poder imprimir informes con el Crystal Report, pero solo informacion que tu necesitas, tienes que utilizar SelectionFormula. Para filtrar solo aquella informacion que necesitas imprimir.
Informe1.SelectionFormula = "{CLIENTES.CODCLIENTE} = " & CHR$(39) & "999" & CHR$(39)
Informe1.PrintReport
Este ejemplo imprimiria un informe llamado Informe1 cuyo codigo de cliente sea igual a 999.

Si tienes alguna duda o si quieres que esto te lo aclare o te envíe algún ejemplo, mandame un e-mail.

  Respuesta:  Enrique Canellada
Hasta donde yo se, que es poco, si estas trabajando con el Activex de Crystal y un control data de VB5, no se te hara efectiva la migracion de informacion del data (con tu consulta SQL perfecta) si no tienes en tu sistema una serie de DLL´s, en concreto la PDBBND.DLL se encarga de comunicar el data con el crystalreports1

    Pregunta:  627 - REPRODUCIR SONIDOS *.PCM EN VB 5.0
Autor:  Juan Antonio
Hola tengo un varios sonidos en formato *.pcm pero no se de que manera, o con que control puedo hacerlos sonar con visual basic 5.0. Gracias
  Respuesta:  Dani
la respuesta es muy simple

el formato PCM el la manera como guarda el sonido un ordenador, no es informáticamente dicho un formato de sonido.

Por eso convertir un archivo *.pcm as tan sencillo como abrirlo desde cualquier editor de sonido (Cool Edit96, Awave, Sound forge...) i volverlo a salvar como *.wav con lo cual el problema está solucionado.

Voy a dar un trico pero no sé si funcionará bien: son tan similares el formato wav con el psm (de hecho sólo canvia la cabecera) que me atravería a decirte que sólo con canviar la extensión pcm por wav seguramente ya te funcionaría.

    Pregunta:  644 - COMPATIBILIDAD ENTRE ORACLE Y VB
Autor:  Rodrigo Pedrero
Necesito saber técnicas y código sobre como puedo leer Bases de datos Oracles (Developer 2000) con Visual Basic 5.0
  Respuesta:  Augusto Fioretti
Para hacer consultas entre VB y Oracle se debe establecer una conexión ODBC con la base de datos a través del servidor Oracle. Luego existen los procedimientos almacenados en Oracle que se deben ejecutar desde VB y posteriormente mostrarlos o llenar objetos con la información obtenida.

Existen librerias de dominio publico y ejemplos en VB Empresarial que muestran estos casos de buena forma.

Si aun mantienes dudas escribeme a mi correo y te podre envia algunos módulos.bas que te ayudaran.

  Respuesta:  FER
Saludos Super!!
De tu pregunta sobre oracle y visual Basic, decirte que yo he usado oracle y vb.En concreto, he usado visual basic 5.0 professional y oracle 7 en un servidor unix.
Para ello, fue necesario calgar los controladores de oracle 7 para windows.En concreto me refiero al control odbc que proporciona oracle en su paquete. Posteriormente, solo tendras que utilizar los recursos de bases de datos del vb, que viene explicado en los libros en pantalla de vb. Tecnicamente, yo no he utilizado el control data para el acceso a la base de datos, pero, te recomiendo que no lo uses y utilices el recordeset.

Ante alguna duda, no dudes en preguntar.

  Respuesta:  Javi
Ya te han contestado de forma correcta, pero yo te contaré algo más.
Existe una opcion de Oracle llamada OO4O (Oracle Objects For OLE).
Si lo que pretendes realizar es algo simple y sencillo, te irá mejor con el ODBC, pero si por el contrario pretendes realizar una aplicación complicada, con muchos accesos a base de datos, te interesaria adentrarte en el mundo de OO4O. No es sencillo, pero a la larga merece la pena.

    Pregunta:  646 - LIMITAR EL NUMERO DE CARACTERES POR LINEA EN UN TEXTBOX
Autor:  Ramón
Necesito limitar el número de carácteres por línea y el número de líneas de la textbox a 132 carácteres y 60 lineas y luego leer linea por linea. No encuentro la manera de hacerlo bien he probado lo siguiente lo cual es una chapuza y no va muy bien:
Private Sub Text1_Change()
Dim NúmeroLineas As Long
Dim NúmeroCarácteres As Long
Dim N As Long
NúmeroCarácteres = Len(Text1.Text)
For N = 1 To 60
If NúmeroCarácteres = N * 132 Then
SendKeys "{ENTER}"
NúmeroLineas = NúmeroLineas + 1
End If
Next N
End Sub
Espero que se me pueda ayudar. Gracias y Buenas Fiestas!
  Respuesta:  Ismael
Prueba en el evento Keypress.
Por cada tecla diferente de "del" y "backspace" incrementa la longitud de línea. Al llegar a 132 imprime el caracter 13 y sumas uno a las líneas.
Compara si ya son 60 y no permitas otra tecla.

    Pregunta:  653 - CREAR UN FTP Y UN TELNET EN VB 5.0
Autor:  Alberto Valdes
Tengo que monitorear unos servers unix, para saber si estan funcionando, cree una shell en unix, pa cial realiza unos ping a algunos server, y devuelve la informacion en un archivo de texto, junto con el espacio utilizado en disco. al momento de tratar de recuperar esa informacion desde visual, he tenido algunos problemas, con el Winsosk de visual todo va bien pero cuando trato de recoperar el archivo, me da un erro de conexion rechazada, por otra parte con el inet puedo bajar el archivo pero solo una vez, las veces que siguenbaja el mismo archivo y no lo actualiza.

atte.

  Respuesta:  Fer
Exactamente, no se que es lo que te ocurre, pero, engo un ftp realizado en visual basic, que puede que te ayude en tu problema.
Si tienes interes, lo puedes encontrar en http://www.lanzadera.com/webfer/.
Saludos y que la fuerza te acompañe.

    Pregunta:  654 - COMO MANEJO INDICES DEL SQL SERVER EN VB5 VIA ODBC
Autor:  Freddy Najar
Estoy utilizando el SqlServer 7 como manejador de base de datos en la cual tengo indices ya declarados, lo que quiero hacer con el VB5 es poder hacer un seleccionar un .INDEX = "nombreindice";.SEEK "="val("campo") al Indice deseado, como lo normalmente lo hacia en base de datos ACCESS 97 Alguno tiene una idea como usar los indices del SQLSERVER para hacer busquedas?

GRACIAS

  Respuesta:  Antonio
En SQL Server no necesitas utilizar los índices directamente, ya que es el propio sistema el que escoge el más adecuado, si existe. Lo único que debes hacer es "Select * from [tabla o vista] where [campo]=´Valor´". Existe también una forma de hacer un índice predeterminado, que es "Select ... index=´Nombre de Indice´"

    Pregunta:  659 - ESCRIBIR CODIGO AL CARGAR UN CONTROL CREADO
Autor:  Iñigo Jimenez
¿Como puedo hacer, para que cuando un usuario de mi control "pegue" el ocx en el Form contenedor este escriba directamente una línea de código como hacen los asistentes de V.B. en la pantalla de codigo?
Por ejemplo como esto:
´¡ADVERTENCIA! NO QUITAR O MODIFICAR LAS SIGUIENTES LINEAS CON COMENTARIOS!
´MappingInfo=UserControl,UserControl,-1,Line
ESTARIA SUPER AGRADECIDO SI ALGUIEN CONTESTASE A ESTO.
  Respuesta:  Ignacio Canovaca Fernández
Todos los formularios de VB se pueden abrir en formato Ascii. Prueba a abrir alguno y verás que en la parte final se encuentra todo el codigo que tienen. Si los abres mediante las instrucciones OPEN ... AS #x for Input/Output... puedes añadir alli todo el código y los comentario que quieras.
  Respuesta:  Pedro A. Pelaez Jiménez (
Los asistentes de visual no son controles, son formularios prediseñados, por lo que lo más facil es prediseñar un formulario con tu codigo y ponerlo en el directorio de los wizards, para que sea accesible desde la opción agregar formulario. También podrías crear una extensión para visual que haga las veces de asistente y para personalizar más el resultado podría modificar el texto del archivo frm que sirve de base al asistente.

Nunca he esperimentado con esto pero si he trasteado bastante por los asistentes.
Espero haberte ayudado...

Un saludo de PSF.

    Pregunta:  666 - SQL SERVER
Autor:  Pedro Plaza
Soy un programador que trabaja en Visual Basic y Access pero recientemente hemos adquirido un paquete Microsoft en el que viene SQLServer y mis preguntas son las siguientes:
1) Cual sería la manera más facil de migrar nuestras bases de datos de Access a SQLServer.
2) Si tenemos que reestructurar el codigo para poder acceder a SQLServer(trabajamos con DAO).

Gracias.

  Respuesta:  Octavio Carreño
Hola yo tambien tuve el mismo problema con respecto tu pregunta (1), busca en esta direccion http://officeupdate.microsoft.com/downloadCatalog/dldAccess.htm , aqui en contraras un complemento que se llama "Microssoft SQL Server Upsizing tool for Access 97", espero que te ayude
  Respuesta:  Marco Reyes
Para migrar los datos a SQL Server, debes crear primero la base en SQLServer y despues conectarte directamente de Access con SQLServer con ODBC, una vez conectado puedes Exportar/Importar las tablas a tu nueva base de datos.

Con respecto al codigo, para conectarte a SQl Server puedes utilizar los mismos comandos que as utilizado solo tienes que incorporar la propiedad ´connect´ en el OpenDatabase (por ejemplo), o si utilizabas el control data, tambien tienes que utilizar la propiedad ´connect´.
No es dificil, y puedes seguir utilizando todos los comandos como ´Dynaset,OpenRecordset,etc´.

espero que te sirva, si quieres puedo enviarte codigo como ejemplo.

ChaoP.

    Pregunta:  676 - LISTA DE ORDENADORES QUE CONFORMAN UNA RED
Autor:  Domingo Rodríguez Maroto
Estoy intentando hacer un programa de copias de seguridad en RED y para lo cual necesito saber la lista de ordenadores que conforman la red pero no sé como hacerlo. Lo que necesito es algo así como un DriveList ó un FileList pero de los ordenadores conectados a la red.
Gracias de antemano y un saludo
  Respuesta:  HOOVER ANTONIO LOPEZ RIVERA
Aqui te va un algoritmo que te recupera el nombre de los usuarios en una red solo necesitas agregar los nombres de los equipos en un treeview u otro objeto y anexarle el
recurso compartido ej:
la funcion te devuelve
pc1
pc2
pc3
simplemente agregale \\pc1 + el recurso compartido
\\pc\c\mis documentos Etc..

************************************************************
Private Sub Nombre_PCs()
Dim Ruta_Bat As String
Dim Ruta_txt As String
Dim Cadena_Bat As String
Dim Numeroarchivo As Integer
Dim Rshell As Long
Dim Linea As String
Dim Pos As Integer
Dim Equipos As String
Dim Nombre_Equipos As Variant
Dim Encontrado As Boolean
On Error Resume Next
Numeroarchivo = FreeFile
Ruta_txt = "c:\Temp.txt" '//cambiar la unidad dependiendo del equipo "C:\ o D:\ etc.."
Ruta_Bat = "c:\Temp.bat" '//cambiar la unidad dependiendo del equipo "C:\ o D:\ etc.."
Pos = 0
Encontrado = False
ReDim Nombre_Equipos(0 To 0)
If Dir(Ruta_Bat, vbArchive) = "" Then
Open Ruta_Bat For Binary As #Numeroarchivo
Cadena_Bat$ = "c:\windows\net view >c:\temp.txt" '//cambiar la unidad dependiendo del equipo "C:\ o D:\ etc.."
Put #Numeroarchivo, , Cadena_Bat$
Close #Numeroarchivo
End If
Rshell = Shell(Ruta_Bat, vbHide)
Open Ruta_txt For Binary As #Numeroarchivo
While Not EOF(Numeroarchivo)
Line Input #Numeroarchivo, cdna$
Pos = InStr(1, cdna$, "\")
If Pos > 0 Then
Equipos = Equipos & Trim(Mid(cdna$, 1, 17))
If Not Encontrado Then Encontrado = True
End If
W
  Respuesta:  José María Pascual García
creas una pagina con una Lista y un command cuyo código es:
´
´ frmListaRecursos.frm
´
´ Este programa muestra una lista de los
´ recursos disponibles en la red
´
Option Explicit

´ Función para copiar en una cadena el contenido
´ cuya dirección se nos facilita en un Long
Private Declare Function lstrcpy Lib "kernel32" _
Alias "lstrcpyA" (ByVal lpString1 As String, _
ByVal lpString2 As Long) As Long

´ Esta función es la encarga de enumerar
´ los recursos partiendo de la Raiz dada, que
´ se utilizará según el valor dado en Uso
Private Sub EnumeraRecursos(Raiz As String, Uso As Long)
´ Identificador de la enumeración
Dim IdEnumeracion As Long
´ para iniciar y obtener datos de la enumeración
Dim DatosRecurso As NETRESOURCE2
Dim DatosInicio As NETRESOURCE
´ Otras variables locales
Dim Espacios As String
Dim Codigo As Long, Cadena As String

´ Preparamos espacio en la cadena
Cadena = String(256, 0)

´ Si no se ha facilitado un punto de inicio
If Raiz = "" Then
´ comenzamos enumerando todo
Codigo = WNetOpenEnum(RESOURCE_GLOBALNET, _
RESOURCETYPE_ANY, 0, ByVal 0, _
IdEnumeracion)
Else ´ en caso contrario
´ si se facilita un proveedor
If Uso = RESOURCEDISPLAYTYPE_PROVIDER Then
´ lo asignamos a lpProvider
DatosInicio.lpProvider = Raiz
Else ´ en caso contrario es un recurso
DatosInicio.lpRemoteName = Raiz
E
  Respuesta:  Gorka Oiarzabal
No entiendo muy bien lo que quieres hacer, pero prueba a hacer un filelist, pero que esté direccionado al escritorio y a entorno de red. Si esto te funciona, no tienes mas que configurar la vista de entorno de red, para que en vez de aparecer el nombre del equipo, aparezca la descripción.

De esta manera sabrás con mayor detalle qué equipos tienes.

Otra solución podría pasar por utilizar Telnet, pero ahí no se cómo va.

Si me entero de algo te lo contaré

|<  <<  9 10 11 12 13 14 15 16 17 18 19  >>  >|