PREGUNTAS CONTESTADAS - Visual Basic

 Hay un total de 3030 Preguntas.<<  >> 

    Pregunta:  28631 - EDITOR ID3 PARA MP3
Autor:  Albert Roura Morillas
Estoy haciendo una base de datos con Visual Basic 6.0 para archivos MP3, quisiera poder editar la información que en el WinAmp se denomina Editor ID3, para que saliera el título, artista, año, etc..

¿Se puede hacer directamente desde Visual Basic o necesita un ActiveX?¿Cómo podría hacerlo?
  Respuesta:  J RC
Para hacer lo ke tu kieres hay dos formas. Una primera sería utilizando un ActiveX (por ejemplo un reproductor MP3), que seguramente podría darte esos datos ke tú kieres. La otra sería buscar en internet la estructura de un fichero MP3, abrirlo desde Visual Basic en modo binario, y acceder a las posiciones donde es encuentran esos datos que tú buscas.

    Pregunta:  28634 - MASCARA EN DATAGRID
Autor:  Robinson gallego
Como hago para colocar una mascara o formato de fecha en la columna de un datagrid.
  Respuesta:  Ric Sierra
Usa la funcion Format(variable_tipo_fecha, "dd/MMM/yyyy")

    Pregunta:  28671 - COMANDO EJECUTAR WIN2000
Autor:  Marcelo Barría
Hola, quisiera saber cómo utilizar el comando Ejecutar de windows desde visual basic 6, para poder abrir un recurso compartido: Ejemplo: al colocar en la ventana de Ejecutar... le entrego: \\equipo1\rec_1 y abre el recurso o niega el acceso, además cómo puedo rescatar el error al tener acceso denegado.
  Respuesta:  Roberto S. Gutiérrez Sáez
estimado
con respecto a capturar el error coloca en tu rutina al comienzo la siguiente instruccion.

ON ERROR GOTO [Aqui va el Nombre de la etiqueta]

y al final de todas las instrucciones en la rutina

EXIT [Procedimiento] depende si es una Function, Sub, Etc...
[Nombre de la etiqueta]:
MsgBox Err.Description
END [Procedimiento] depende si es una Function, Sub, Etc...

UN EJEMPLO:

Private Sub Cmd_Guardar_Click()
On Error GoTo ERRORIFICO
Select Case
Case End Select
Exit Sub
E_SQL:
MsgBox Err.Description
End Sub
  Respuesta:  Roberto S. Gutiérrez Sáez
estimado
con respecto a capturar el error coloca en tu rutina al comienzo la siguiente instruccion.

ON ERROR GOTO [Aqui va el Nombre de la etiqueta]

y al final de todas las instrucciones en la rutina

EXIT [Procedimiento] depende si es una Function, Sub, Etc...
[Nombre de la etiqueta]:
MsgBox Err.Description
END [Procedimiento] depende si es una Function, Sub, Etc...

UN EJEMPLO:

Private Sub Cmd_Guardar_Click()
On Error GoTo ERRORIFICO
Select Case
Case End Select
Exit Sub
E_SQL:
MsgBox Err.Description
End Sub

    Pregunta:  28696 - PROBLEMAS DE PASO DE VB5 A VB6
Autor:  Bernardo Lopez
Hola, quisiera que alguien me hechara un cable con un problema.
Tengo una aplicacion echa con VB5 que utiliza un control llamado <spread20.vbx> es una rejillas. Al abrir la aplicacion con VB6 me lo pide, podria sustituir todas las rejillas por un datagrid pero me seria bastante problematico.

¿que puedo hacer?¿Como puedo conseguir este control?

Desde ahora, muchas gracias
  Respuesta:  Mauricio Leyzaola
Ese control es del Spread de Far Point y la versión debe de ser la 2.0, yo tengo la versión 3.0 y la utilizo con VB6 (muy bueno por cierto). Si quieres más información puedes ver www.fpoint.com.

Saludos.

    Pregunta:  28700 - REFRESCAR DATOS DE UN COMBO
Autor:  Diego Martínez Consuegra
Hola amigos, estoy haciendo una base de datos en la cual tengo un formulario con varias tablas enlazadas, tengo un formulario principal y luego dentro de ese formulario variso dbgrid, el problema que me encuentro es que cuando digo data1.refresh, si he puesto datos en los combo no me graba nada, toda la información está perdida, en cambio si en los tres combos que tengo puestos no señalo ninguna opción me guarda todos los datos correctamente.

Si alguien sabe como solucionarlo agradecería que me enviarias una respuesta, Gracias
  Respuesta:  Diego Martínez Consuegra
He encontrado la solución, para realizar esto inserto un Textbox al lado y lo hago no visible, y en el código del combo lostfocus le digo que el texto del textbox es igual al texto del combo, y el textbox es el que está enlazado a la base de datos, luego en el form_load coloco la instrución contraria, o sea, el combobox.text = textbox.text

    Pregunta:  28710 - COMO CAMBIARLE EL COLOR A UN TABSTRIP
Autor:  Rodrigo Hermosilla Puebla
Quiero cambiarle el color a un tabstrip, alguien me puede ayudar por favor???
  Respuesta:  Rafael H. Yzarra M:
Al parecer, en tu versión de Visual Basic, el TabStrip no cuenta con la propiedad que cambia el color de dicho objeto. Sin embargo, no sería problematico el recurrir a una estrategia la cual, yo aplico con mucha frecuencia:

1ero: Tomo un objeto Frame y lo coloco en cada uno de los Tabs que defina en dicho TabStrip. Lo hago de manera tal, que cubra la superficie de dicho objeto en toda su extensión rectangular (sin considerar las 'pestañas' o Tabs definidos).

2ndo: dado que al Frame si le puedo alterar su color a través de la propiedad BACKCOLOR, defino entonces el color de cada uno de los Tabs que coloque.

El presente método ofrece las siguientes ventajas:

V1: Puedo definir previamente el grupo de objetos que conformarán cada sector del TabStrip que pretendo diseñar.
V2: Si deseo hacer correciones o modificaciones importantes (como borrar o desplazar todo el contenido), solo tengo que mover el Frame.

La única desventaja existente es:

Desv: Es problemático al colocar un MSFlexGrid o un DataGrid ya que, el Frame no acepta dicho objeto en su contenido.

Espero que te sea útil el presente consejo.

    Pregunta:  28718 - ORDERNAR CONSULTA SOBRE UN CAMPO CALCULADO
Autor:  Jordi Adell
Hola !

Tengo un problema con una consulta SQL. No se como ordernar una consulta sobre un campo calculado que es la suma de 2 consultas.

He probado con ORDER BY "la suma de las 2 consultas" (Error)

He probado con asignando un alias sobre el campo y luego ORDER BY Alias (Solicita valor para Alias o genera Error)

LA estructura es

SELECT Campo1, (consulta1 + consulta2) As Vtas FROM ....

La Consulta1 selecciona las Facturas año 99 y la Consulta2 selecciona las Facturas año 00.

El Recordset que se obtiene tiene 2 columnas:

Num CLIENTE - VTAS
-------------------------
1 300
2 400
3 200
...

Lo que me interesa es saber como puedo ordenar la columna VTAS ya que se obtiene a partir de la suma de 2 consultas.

Aqui va el SQL (Reducido)

SELECT TOP 10 CliCod, (SELECT Sum(Importe) FROM Fac99 WHERE FacCli = CliCod) + (SELECT Sum(Importe) FROM Fac00 WHERE FacCli = CliCod) AS VTAS FROM CLIENTES ORDER BY VTAS

Con este codigo no Ordena Nada... :(

Gracias
  Respuesta:  Xime Tamame
Jordi lo que tenes que usar es la instruccion JOIN para unir todas las tablas, aqui va:
SELECT TOP 10 c.CliCod, Sum( f99.Importe ) + Sum( f00.Importe )
FROM ( CLIENTES as C LEFT JOIN Fac99 as F99 ON ( c.CliCod = F99.CliClod )) LEFT JOIN Fac00 as F00 ON ( c.CliCod = F00.CliClod )
GROUP BY c.CliCod
ORDER BY Sum( f99.Importe ) + Sum( f00.Importe )

Y ahora si te va a ordenar ya que los campos son parte de la consulta y no una subconsulta como lo que tenes vos. NO te olvides de poner la instruccion Group by, suerte!!!

    Pregunta:  28720 - COMO UTILIZO EL MSFLEXGRID PARA CAPTURAR DATOS NUMERICOS
Autor:  Arturo Quintanar
Tengo Visual basic version 6 y desearia que me ayudaran en como puedo utilizar el MsFlexgrid, para capturar datos directamente del teclado, es decir, hacer click en una celda y digitar el dato, en realidad no se si se pueda ya que por mas que consulto la ayuda del Msdn (que por desgracia esta en ingles), no me dice nada concreto en como se hace. Puede ser que yo este equivocado en darle ese uso a ese control, si existe otro, mucho agradeceria me lo hicieran notar, junto con un ejemplo.

la siguiente pregunta es, como puedo tomar el dato de una celda del control MsFlexGrid y almacenarlo en un campo de una base de datos.

Mucho agradecere la Ayuda que me puedan proporcionar, para seguir conociendo como funcionan los controles de visual Basic y lo que se puede hacer con dicho programa.
  Respuesta:  Mauricio Leyzaola
Efectivamente, el flexgrid por naturaleza no permite que se edite (quien sabe por que demonios hace Microsoft esto ¿?) pero hay muchos trucos para solucionarlo. Te envío este. Saludos.

'===================================================
'Pon este codigo en el evento Keypress del MSFlexGrid
'===================================================
Private Sub MSFlexGrid_KeyPress(KeyAscii As Integer)

With MSFlexGrid
Select Case KeyAscii

Case 8: 'IF KEY IS BACKSPACE THEN
If .Text <> "" Then .Text = _
Left$(.Text, (Len(.Text) - 1))
Case 13: 'IF KEY IS ENTER THEN
Select Case .Col
Case Is < (.Cols - 1):
SendKeys "{right}"
Case (.Cols - 1):
If (.Row + 1) = .Rows Then
.Rows = .Rows + 1
End If
SendKeys "{home}" + "{down}"
End Select
Case Else
.Text = .Text + Chr$(KeyAscii)
'write your own keyascii Validations under
'commented lines
Select Case .Col
Case 0, 1, 2:
'if (your condition(s)) then
'accept only charectors
'Else
'keyascii=0
'End If
Case Else:
End Select
End Select
End With

End Sub

    Pregunta:  28725 - MODIFICAR SETUP.LST
Autor:  Manuel Oteros
Hola

Resulta que la aplicación que estoy desarrando necesita que se cree una carpeta llamada SIMBOLOS dentro de la carpeta donde se instala la aplicación y dentro de esa carpeta tengo que copiar alrededor de unos 500 ficheros con extensión JPG que tengo creados .

Se que se tiene que modificar el fichero Setup.Lst para poder hacer que la aplicación añada estos archivos pero tengo 2 dudas que no consigo resolver .

1.- Como creo la carpeta SIMBOLOS en la carpeta donde se instala el programa

2.- Como puedo copiar los ficheros a esta carpeta .

En la seccion del setup.lst hay

[Setup1 Files]
[email protected],$(AppPath),,,2/12/02 6:43:54 PM,995328,0.0.0.0
....
....
.....

Pero no se como colocar las ordenes para poder realizar esta operaciónes

Saludos a todos y gracias
  Respuesta:  jolly bialko
Hola.

Puedes hacerlo de la siguiente forma:

[email protected],$(AppPath)BaseDFotos,,,5/7/07 3:21:00 PM,12709,0.0.0.0

yo.jpg es una foto, y quiero que se copie en una carpeta Fotos que a su vez está en una carpeta llamada BaseD donde va a estar la base de datos...

Espero haberte ayudado.
  Respuesta:  SuNcO
Como ando de vacaciones y no tengo el VB aqui te voy a decir un truco que se me ocurrio

Pon tus JPG's en un ZIP y lo agregas al proyecto para que se copie al AppPath, de ahi cuando ejecutes tu programa revise que existe el directorio que tu deseas (con el comando Dir) si no existe entonces lo creas y con el pkunzip.exe lo descomprimes (el pkunzip lo puedes ejecutar con el comando Shell)

Si no te sirve eso me envias otro mail con lo mismo y con gusto te lo resuelvo mediante el setup.lst pero ya que llegue a mi casa (en 2 dias)

    Pregunta:  28735 - CAPTURAR PANTALLA Y ENVIAR POR WINSOCK
Autor:  Jesus Ballesteros
Hola a todos de nuevo, mi pregunta es como hacer lo siguiente. Tengo que hacer una aplicacion cliente servidor mediante Winsock y necesito ver en escritorio del otro PC, como puedo hacerlo, e probado a capturarlo y mandarlo como una imagen pero es demasiado lento.

Gracias por todo.
  Respuesta:  J RC
Enviar el escritorio remoto como una imagen podría ser buena idea en una red local rápida, pero por internet es inviable. Por otro lado, aun enviando la imagen, necesitas mandar información de los elementos para que ese escritorio remoto fuera interactivo.
Lo mejor seria ke mandaras los elementos uno a uno, indicando lo ke es, lo ke hace, la posicion, etc, y dibujaras en el cliente el escritorio, de forma parecida a como lo dibuja el propio windows en local.
Es muchísimo trabajo y un desarrollo muy complejo, así que ánimo si te decides.

|<  <<  207 208 209 210 211 212 213 214 215 216 217  >>  >|