• Lunes 23 de Diciembre de 2024, 00:35

Mostrar Mensajes

Esta sección te permite ver todos los posts escritos por este usuario. Ten en cuenta que sólo puedes ver los posts escritos en zonas a las que tienes acceso en este momento.


Mensajes - Brroz

Páginas: 1 ... 9 10 [11] 12 13 ... 43
251
Visual Basic 6.0 e inferiores / Re: Como Pueso Compartir Carpetas?
« en: Martes 2 de Noviembre de 2004, 16:29 »
Radical, lo siento pero me parece que eso no es lo que busca el druida...

Yo no sé cuál puede ser la solución a este asunto, pero seguro que el api proporciona algún método... si me entero, lo posteo.

Suerte.

252
Visual Basic 6.0 e inferiores / Re: Buscar Un Fichero Para Macro Excel
« en: Martes 2 de Noviembre de 2004, 16:23 »
Hola basicname.

Declara la función del api de windows GetOpenFileName y utilízala en una llamada que devuelva un nombre de archivo seleccionado en el cuadro de diálogo correspondiente.

Si tienes dudas sobre el uso de la función api, utiliza la herramienta de búsqueda en este mismo foro, que me consta hay un tema al respecto.

Suerte.

253
Visual Basic 6.0 e inferiores / Re: Detectar Dispositivos
« en: Martes 2 de Noviembre de 2004, 15:01 »
Hola scorpion25acv.

Échale un vistazo a esto http://foros.solocodigo.com/index.php?showtopic=6517

Supongo que te servirá.

Abur.

254
Visual Basic 6.0 e inferiores / Re: Error De Sintaxis Insert Into
« en: Martes 2 de Noviembre de 2004, 12:12 »
Hola.

Así al vuelo me he fijado en esto: antes del FROM te sobra una coma.

Código: Text
  1.  
  2. ... CausasNoEntregadosMASIVOS.Total, FROM ...
  3.  
  4.  

... y debería ser:

Código: Text
  1.  
  2. ... CausasNoEntregadosMASIVOS.Total FROM ...
  3.  
  4.  

Por otro lado, y viendo los nombres de campo, me atrevería a decir como comentario y aún a riesgo de parecer un enteradillo, creo que el diseño de la base de datos deja un poco que desear... los nombres de los campos parecen corresponder con valores que deberían estar en campos de sus correspondientes tablas de maestros. A lo mejor no y me paso de listo.

Suerte.

255
Visual Basic 6.0 e inferiores / Re: Ayuda Con Codigo Para Exportar
« en: Martes 2 de Noviembre de 2004, 12:02 »
Hola.

Supongo que tu problema es que la variable que se asigna a un objeto Range debe ser una matriz dimensionada como el rango.

Chao.

256
Visual Basic 6.0 e inferiores / Re: Imagenes En Access A Fichero
« en: Martes 2 de Noviembre de 2004, 11:57 »
Hola civinet.

Si no he comprendido mal, dices que determinada aplicación exporta imágenes a un campo binario de una tabla access... bien, pues es posible que los datos almacenados en el campo, por motivos de economía del tamaño de la bd u otros, no corresponda con la estructura de un archivo bmp. Informate de la estructura de estos archivos (encabezado con tamaño del mapa de bits, profundidad de color, etc, y mapa de bits propiamente dicho). Tal vez la aplicación esté guardando únicamente el mapa de bits y no los datos que describen este mapa, con lo que al escribir la información que lees de la bd en un archivo en disco, no obtienes realmente un archivo BMP, deberías escribir previamente un encabezado para la información.

Tal vez los tiros vayan por ahí en tu problema... espero haberme explicado bien.

Suerte.

257
Visual Basic 6.0 e inferiores / Re: Error En Codigo Por Favor Ayuda
« en: Martes 2 de Noviembre de 2004, 11:50 »
Hola.

No indicas cuál es el error que te aparece, imagino que será porque no redimensionas el rango (.Resize), de todas formas, cúrate en salud y recorre el recordset dando valor a las celdas de igual forma que haces con los nombres de campo.

Suerte, abur.

258
Visual Basic 6.0 e inferiores / Re: Calculo Entre Fecha Y Fecha, ¿quien Sabe?
« en: Martes 2 de Noviembre de 2004, 11:45 »
Hola.

Utiliza la función DateDiff.

Por ejemplo, diferencia en días entre dos fechas:
Código: Text
  1.  
  2. MsgBox DateDiff("d",Format("01/10/04","dd/mm/yy"), Format("4/11/04","dd/mm/yy"))
  3.  
  4.  

Abur.

259
Visual Basic 6.0 e inferiores / Re: Sentencia Sql
« en: Martes 2 de Noviembre de 2004, 11:40 »
Hola ___

Te ocurre lo siguiente:
Mediante esta sentencia SQL insertas en una tabla valores agrupados de otra tabla... Fíjate en esto: los campos que 'cascan' son los que no cuentan con ninguna función de agregado (Suma , Cuenta , Máximo, etc.) y además no se encuentran entre los campos por los que agrupas.

A ver si me explico un poco mejor.  Agrupas por los campos 'oficina' y 'servicio', seleccionas las sumas de una serie de campos para cada intervalo de agrupación (por cada cambio de oficina y de servicio, la suma de los registros agrupados) y ¿qué pasa con el resto de los campos?, ¿qué valor debe mostrarse para cada registro? La respuesta a esta pregunta es el origen del problema...

Para solucionar este tema añade una función de agregado a cada uno de los campos que no la tienen. Por ejemplo usa la función FIRST(Nombre_Campo) para que el valor que se muestre sea el del primer registro. Con esto seguro que se soluciona el problema.

Chao.

260
Visual Basic 6.0 e inferiores / Hasta Noviembre
« en: Viernes 1 de Octubre de 2004, 18:32 »
Mu Güenas a todos los foreros...

Despues de un verano muy liado metido en proyectos de locos, me tomo un respiro de un mes ¡Hoy empiezo las vacaciones...! que ganas que tenía, leche. A ver si a la vuelto puedo participar un poco más en el foro que ya hacía mucho.

Saludetes para tod@s.

261
Visual Basic 6.0 e inferiores / Re: Sobre Restringir Entradas En Los Textbox
« en: Viernes 1 de Octubre de 2004, 18:28 »
Hola supra.

Creo que lo más simple es controlar el evento KeyPress del control. Fíjate en el ejemplo para controlar la entrada de números en un TextBox:

Código: Text
  1.  
  2. Private Sub Text1_KeyPress(KeyAscii As Integer)
  3.  
  4.     If KeyAscii <> 8 _
  5.     and (KeyAscii < 48 Or KeyAscii > 57) _
  6.     And KeyAscii <> 44 Then KeyAscii = 0
  7.  
  8. End Sub
  9.  
  10.  

Abur

262
Visual Basic 6.0 e inferiores / Re: Puerto Paralelo Y Vb
« en: Viernes 1 de Octubre de 2004, 18:21 »
Kai Nabinski.

Mira, el puerto paralelo lo puedes abrir como un archivo en el disco utilizando el canal correspondiente. Si lees del puerto (abriéndolo como INPUT) verás que el programa se detiene en la instrucción de lectura correspondiente (READ, INPUT, etc.) a la espera de recibir datos, por lo que si quieres realizar mientras tanto otros procesos deberás idear una aplicación que controle distintos procesos (mira algo sobre la función del Api OpenProcess).

Hala, si quieres ya tienes una linea en la que probar e investigar. Chau.

263
Visual Basic 6.0 e inferiores / Re: Sonido Al Presionar La Tecla ínter
« en: Viernes 1 de Octubre de 2004, 18:15 »
Pasa Yovana...

Seguramente tengas programado el evento KeyDown del Form o de los textbox con un 'SendKeys' cuando KeyCode = 13. Si esto es así, lo que tienes que hacer es añadir en el correspondiente evento KeyPress que corresponda un KeyAscii = 0. Me explico:

Código: Text
  1.  
  2. Private Sub Form_KeyPress(KeyAscii As integer)
  3.     If KeyAscii = 13 Then KeyAscii = 0
  4. End Sub
  5.  
  6.  

Espero que esto te arregle el tema. Abur.

264
Visual Basic 6.0 e inferiores / Re: Impresora De Tickets Usb
« en: Viernes 1 de Octubre de 2004, 18:12 »
Kai enjofre...

¿No puedes utilizar el objeto Printer y olvidarte de escribir en el puerto?

Abur.

267
Visual Basic 6.0 e inferiores / Re: Convertir Archivos
« en: Miércoles 23 de Junio de 2004, 13:42 »
Hola rodolfo.

En este mismo foro hay varios ejemplos de cómo crear una hoja de excel y rellenar los datos... aplica el cuento recorriendo el correspondiente recordset.

Suerte.

268
Visual Basic 6.0 e inferiores / Re: Error Al Mandar Correo
« en: Miércoles 23 de Junio de 2004, 13:41 »
Hola acanalis

Cuando te interese puedes utilizar el outlook.

http://foros.solocodigo.com/index.php?showtopic=9352

Suerte.

269
Visual Basic 6.0 e inferiores / Re: Adjuntar Archivo A Outlook
« en: Miércoles 23 de Junio de 2004, 13:39 »
Hola rodolfo.

Este código serviría para hacer un envío básico de un mensaje con Outlook.
Código: Text
  1.  
  2. Public Function MailTo(Byval Dest As String, Byval Subject As String, Byval Body As String, Optional Byval Adjunto As String) As Boolean
  3.    On Error Goto Err_MailTo
  4.  
  5.    Dim objOLMAIL As Object
  6.    Dim objMAIL As Object
  7.    Dim objATCH As Object
  8.    Dim objDEST As Object  
  9.  
  10.    Set objOLMAIL = CreateObject("Outlook.Application")
  11.    Set objMAIL = objOLMAIL.CreateItem(0)
  12.    objMAIL.Subject = Subject
  13.    objMAIL.Body = Body
  14.  
  15.    Set objDEST = objMAIL.Recipients
  16.    objDEST.Add Dest
  17.    If Not objDEST.ResolveAll Then
  18.         MsgBox "Error en destinatario de correo " & Dest & "."
  19.         GoTo Exit_MailTo
  20.    End If
  21.  
  22.    If Adjunto <> "" Then
  23.       Set objATCH = objMAIL.Attachments
  24.       objATCH.Add Adjunto
  25.    End If
  26.  
  27.    objMAIL.Send
  28.  
  29.    MailTo = True  
  30.  
  31. Exit_MailTo:
  32.    Set ObjDEST = Nothing
  33.    Set ObjATCH = Nothing
  34.    Set objMAIL = Nothing
  35.    Set objOLMAIL = NOthing
  36.    Exit Function
  37.  
  38. Err_MailTo:
  39.    MsgBox Err.Description
  40.    Resume Exit_MailTo
  41.  
  42. End Function
  43.  
  44.  

Suerte.

270
Visual Basic 6.0 e inferiores / Re: Corrector Ortografico En Vb6
« en: Miércoles 23 de Junio de 2004, 13:22 »
Hola Ariel.

Hombre... si te funciona el código con un textbox, utiliza el mismo código con el resto de los textbox. Crea una función con el código de la corrección ortográfica. Pásale como argumento por referencia el TextBox que quieras corregir y listo.

Suerte.

271
Visual Basic 6.0 e inferiores / Re: Combobox Con 2 Columnas
« en: Miércoles 23 de Junio de 2004, 12:49 »
Hola joja_2.

Puedes utilizar un comboBox de Microsoft Forms 2.0 Object Library que viene a ser como los combos de access.

Suerte.

272
Visual Basic 6.0 e inferiores / Re: Cambiar Backcolor Control Sstab
« en: Miércoles 23 de Junio de 2004, 12:45 »
Hola Jose Arriaga.

Busca información sobre subclasificación aplicada a controles... tal vez consigas lo que buscas.

Suerte.

273
Visual Basic 6.0 e inferiores / Re: Problemas Con La Intruccion Open
« en: Miércoles 23 de Junio de 2004, 12:41 »
Kaixo JONMI.

¡Podría ocurrir que el equipo no tenga un segundo puerto serie! Pero seguramente sea otra cosa... je
¿Tienes la impresora conectada al segundo puerto serie del pc o al paralelo? Si la respuesta es al paralelo, cambia 'COM2' por 'LPT1'... Tal vez sí o tal vez no.
Podría deberse a alguna de las muchas combinaciones posibles, pero resumiendo...
a ver si es que los equipos tienen enchufada la impresora a puertos distintos

Pero como podría ser que el problema fuese otro, te recomendaría probar a abrir el puerto sin especificar ningún parámetro:
Código: Text
  1.  
  2. OPEN "COM2" FOR ...
  3.  
  4.  


Agur.

274
Visual Basic 6.0 e inferiores / Re: Independencia Logica
« en: Miércoles 23 de Junio de 2004, 12:33 »
No te envío ningún ejemplo, pero esto se puede entender de dos formas:

1- Independencia del motor/gestor de base de datos:
Puedes utilizar ADO con el correspondiente proveedor OleDb. Tan sólo habría que usar para cada proveedor la correspondiente cadena de conexión. Otra alternativa sería utilizar archivos DataLink (UDL) donde defines la conexión a la bd de forma externa, no siendo necesario recompilar nada al realizar los cambios sobre el fichero.
Supongo que independencia 100% en la práctica no será posible (dependerá de las funcionalidades de la aplicación, claro) pues por ejemplo, la sintáxis de una sentencia SQL puede variar de un motor de bd a otro.

2- Independencia del archivo (ubicación/nombre) que contiene la bd.
Evidentemente, sustituir en la cadena de conexión el nombre y ubicación de la bd por la correspondiente variable. La forma de informar esta variable queda al gusto de cada uno: recuperar del registro, un archivo de configuración, archivo UDL, menú abrir/seleccionar, etc.

Suerte.

275
Visual Basic 6.0 e inferiores / Re: Grupo De Proyectos
« en: Miércoles 23 de Junio de 2004, 12:23 »
Hola Olgabalma.

La utilidad que le encuentro a utilizar un grupo de proyectos es la posibilidad de probar uno o varios proyectos ActiveX; entre ellos y/o con EXE corriente.

La forma de utilizar un objeto de uno de los proyectos (siempre que el proyecto sea ActiveX, claro, ya que sino no se podrían crear objetos públicos) es instanciarlo como si el proyecto estuviese compilado. Previamente debes añadir la correspondiente referencia al proyecto: según sea el caso, si vas a componentes o a referencias, te aparecerán las correspondientes referencias (sin seleccionar) con el nombre que tengan tu/s proyecto/s. Selecciona y listo.

No sé si me habré explicado lo suficiente... resumiendo: añade una referencia al proyecto del que quieres utilizar un objeto como si de un ActiveX compilado se tratase.

Suerte.

Páginas: 1 ... 9 10 [11] 12 13 ... 43