Amigos, no estou imprimiendo en cristal sino directo de visual basic 6, por favor se me acaba el tiempo y es lo único que me falta la idea es que al imprimir el ticket al pie de este se imprima el codigo de barras para que despues en caja se pistolee y asi terminar la transaccion, please ayudenme, buuaaaaaa.....
----- Mensaje original ---- De: gustavo venini <gustavovenini@...> Para: DesarrolloVB@... Enviado: miércoles, 30 de mayo, 2007 21:03:21 Asunto: RE: [VB] por favor necesito imprimir un codigo de barras mediante printer
Desde donde estas imprimiendo cristal ?
jose Antonio Gracia <jagrane@yahoo. es> escribió:
Yo diria que antes de imprimir el código de barras no has seleccionado el font correcto. Algo así como:
> amigos, estoy terminando un punto de venta y estoy > en la parte de > impresion de boleto, necesito que nº de ticket se > imprima al final del > boleto en barras, tengo la fuente "codebar_128" , > tengo el codigo para > trasnformar el text en barras, en la pantalla lo > muestra sin problemas > pero al imprimirlo me sale por ejemplo el ticket 11 > muestra ^11!^s, he > intentado tantas cosas y nada, por favor ayudenme, >
gracias > >
____________ _________ _________ _________ _______ LLama Gratis a cualquier PC del Mundo. Llamadas a fijos y móviles desde 1 céntimo por minuto. http://es.voice. yahoo.com
Preguntá. Respondé. Descubrí. Todo lo que querías saber, y lo que ni imaginabas, está en Yahoo! Respuestas (Beta). Probalo ya!
Gracias jose pero ya hice eso y no me muestra codigo sino simbolos y el nº de ticket por fa ayudenme
----- Mensaje reenviado ---- De: adelgadopino <adelgadopino@...> Para: DesarrolloVB@... Enviado: sábado, 26 de mayo, 2007 15:48:59 Asunto: [VB] por favor necesito imprimir un codigo de barras mediante printer
amigos, estoy terminando un punto de venta y estoy en la parte de impresion de boleto, necesito que nº de ticket se imprima al final del boleto en barras, tengo la fuente "codebar_128" , tengo el codigo para trasnformar el text en barras, en la pantalla lo muestra sin problemas pero al imprimirlo me sale por ejemplo el ticket 11 muestra ^11!^s, he intentado tantas cosas y nada, por favor ayudenme, gracias
LLama Gratis a cualquier PC del Mundo. Llamadas a fijos y móviles desde 1 céntimo por minuto. http://es.voice.yahoo.com
> amigos, estoy terminando un punto de venta y estoy > en la parte de > impresion de boleto, necesito que nº de ticket se > imprima al final del > boleto en barras, tengo la fuente "codebar_128" , > tengo el codigo para > trasnformar el text en barras, en la pantalla lo > muestra sin problemas > pero al imprimirlo me sale por ejemplo el ticket 11 > muestra ^11!^s, he > intentado tantas cosas y nada, por favor ayudenme, > gracias > >
______________________________________________ LLama Gratis a cualquier PC del Mundo. Llamadas a fijos y móviles desde 1 céntimo por minuto. http://es.voice.yahoo.com
Preguntá. Respondé. Descubrí. Todo lo que querías saber, y lo que ni imaginabas, está en Yahoo! Respuestas (Beta). Probalo ya!
Estoy haciendo una imprecion de imagen en tamaño carnet de conducir pero me pasa que la camara me da un tamaño que necesito cambiarlo o sea hacer un recize o dar otro tamaño antes de imprimir no se hay una clase que lo haga o si desde cristal report 8 lo puedo hacer no encontre hasta ahora la manera de hacerlo. Desde cristal lo imprimo como un objeto OLE que esta linkeado a una imagen.
Desde ya muchas gracias a todos
Gustavo
Preguntá. Respondé. Descubrí. Todo lo que querías saber, y lo que ni imaginabas, está en Yahoo! Respuestas (Beta). ¡Probalo ya!
Tengo un pequeño problemita, he desarrollado una pequeña aplicacion, la cual la empaquete sobre WINDOWS XP, no tengo ningun problema en las maquinas de mi empresa, todas tienen XP, pero en la recepción tengo un windows 98, en el cual lo instalo y tengo error en tiempo de ejecución. Mi prgunta es como le hago para empaquetar la aplicacion en XP, para que me soporte la aplicacion en windows
98.
Gracias saludos
Salvador Elvira
Do You Yahoo!? La mejor conexión a Internet y 2GB extra a tu correo por $100 al mes. http://net.yahoo.com.mx
__________________________________________________ Correo Yahoo! Espacio para todos tus mensajes, antivirus y antispam ¡gratis! Regístrate ya - http://correo.espanol.yahoo.com/
Lo tenes que empaquetar en windows 98 y luego te funciona en todos los superiores.
Yo lo solucione utilizando una maquina virtual con las utilidades de maquina virtual de VMware. Pero en tu caso es mas facil instalar el Visual studio en la pc que tiene win98.
Tengo un pequeño problemita, he desarrollado una pequeña aplicacion, la cual la empaquete sobre WINDOWS XP, no tengo ningun problema en las maquinas de mi empresa, todas tienen XP, pero en la recepción tengo un windows 98, en el cual lo instalo y tengo error en tiempo de ejecución. Mi prgunta es como le hago para empaquetar la aplicacion en XP, para que me soporte la aplicacion en windows 98.
Gracias saludos
Salvador Elvira
Do You Yahoo!? La mejor conexión a Internet y 2GB extra a tu correo por $100 al mes. http://net.yahoo.com.mx
A ver: 1. tienes que utilizar la herramienta de empaquetado y distrubicion de visual studio. 2. Generar el proyecto (.exe) 3. seleccionar crear paquete de dependencia, ahi asignas todo, librerías, iconos, exe... etc. 4. De ahi seleccionas la dependencia que creastes anteriormente y le indicas que vas a ejecutr un paquete de intalacion estandar. 5. sigues los pasos e indicas donde vas a colocar librería, iconos.. etc, le indicas al acceso directo del menu de inicio como comun y listo, ya lo generastes.
Con eso debe ejecutarse en cualquier plataforma se a WinNT o Win9x, ecepto 95 y Vista. que no he tenido la oportunidad de probar en esas dos.
Saludos,
gary
Salvador Elvira <scollydos@...> escribió:
Hola a todos:
Tengo un pequeño problemita, he desarrollado una pequeña aplicacion, la cual la empaquete sobre WINDOWS XP, no tengo ningun problema en las maquinas de mi empresa, todas tienen XP, pero en la recepción tengo un windows 98, en el cual lo instalo y tengo error en tiempo de ejecución. Mi prgunta es como le hago para empaquetar la aplicacion en XP, para que me soporte la aplicacion en windows 98.
Gracias saludos
Salvador Elvira
Do You Yahoo!? La mejor conexión a Internet y 2GB extra a tu correo por $100 al mes. http://net.yahoo.com.mx
__________________________________________________ Correo Yahoo! Espacio para todos tus mensajes, antivirus y antispam ¡gratis! Regístrate ya - http://correo.espanol.yahoo.com/
***********************
No virus was detected in the attachment no filename
***********-***********
Maestro, se le arreglo el programa pero se le estropeo el teclado. :-)
c.x.
-----Mensaje original-----
De: Alfredo Kaleniuszka [SMTP:alfredo.kaleniuszka@...]
Enviado el: Miercoles, 30 de Mayo de 2007 14:01
Para: DesarrolloVB@...
Asunto: [VB] Re: ayuda!! Renombrar archivo
***********************
No virus was detected in the attachment no filename
No virus was detected in the attachment no filename
***********-***********
SIIIIIIIIIIIIIIIIIIIII!!!!!!!!!!!!!!!!!!!!!!!!!!!
ERA ESOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO!!!!!!!!!!!!!!!!!
GRACIAS!!!!!!!!!!! MUCHISIMAS GRACIAS!!!!!!!!!!!! ERAN LOS ":"
GUAAAAAAAAAAAAAAAAAAAAAAAAA GRACIAAAAAAAAAAAAAAAAAAAAS!!!!!!!!!!!!!!!!!!!!
<<Archivo: ATT00022.htm>>
SIIIIIIIIIIIIIIIIIIIII!!!!!!!!!!!!!!!!!!!!!!!!!!!
ERA ESOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOO!!!!!!!!!!!!!!!!!
GRACIAS!!!!!!!!!!! MUCHISIMAS GRACIAS!!!!!!!!!!!! ERAN LOS ":"
GUAAAAAAAAAAAAAAAAAAAAAAAAA GRACIAAAAAAAAAAAAAAAAAAAAS!!!!!!!!!!!!!!!!!!!!
1) asegurate de que el directorio PRUEBA y el archivo que querés
renombrar existan
2) fijate que el archivo que querés renombrar no este abierto
3) fijate que en el nuevo nombre (nombfut) del archivo no haya
caracteres no perimitidos ("*","'","\","/",":",etc)
Cuando ponés la hora estás poniendo los ":".....
yo me inclino más por la ultima opcion, pero verificalas todas..
SALUDOS:.....
Private Sub Form_Load()
Dim var As Integer
Dim nomact As String
Dim nomfut As String
Dim I As Integer
Dim fecha As String
Dim hora As String
Dim ren As Long
d.Drive = "c:\"
Dir.Path = d.Drive & "\PRUEBA"
f.Pattern = "*.TXT"
f.Path = d.Drive & "\PRUEBA"
var = f.ListCount - 1
For I = 0 To var
nomact = f.Path & "\" & f.List(I)
fecha = Year(FileDateTime(f.Path & "\" & f.List(I))) & "-" &
Month(FileDateTime(f.Path & "\" & f.List(I))) & "-" & Day(FileDateTime
(f.Path & "\" & f.List(I)))
hora = Hour(FileDateTime(f.Path & "\" & f.List(I))) & ":" &
Minute(FileDateTime(f.Path & "\" & f.List(I))) & ":" & Second
(FileDateTime(f.Path & "\" & f.List(I)))
'On Error Resume Next
nomfut = Mid(f.List(I), 1, Len(f.List(I)) - 4)
nomfut = f.Path & "\" & nomfut & "_" & fecha & "_" & hora ".txt"
Name nomact As nomfut
'ren = MoveFile(nomact, nomfut)
Next I
End Sub
Este es mi problema: tengo un codigo en el cual quiero renombrar un archivo en la misma ubicacion, cuando quiero ejecutar el "Name nombre as nombrenuevo" me da un error en tiempo de ejecucion: Error '5' en tiempo de ejecucion: Llamada a procedimiento o argumento no validos
Ya no se que hacer, necesito urgentemente que me ayuden con esto, aqui les dejo el codigo que tengo.....
Private Sub Form_Load() Dim var As Integer Dim nomact As String Dim nomfut As String Dim I As Integer Dim fecha As String Dim hora As String Dim ren As Long d.Drive = "c:\" Dir.Path = d.Drive & "\PRUEBA" f.Pattern = "*.TXT" f.Path = d.Drive & "\PRUEBA" var = f.ListCount - 1
For I = 0 To var nomact = f.Path & "\" & f.List(I) fecha = Year(FileDateTime(f.Path & "\" & f.List(I))) & "-" & Month(FileDateTime(f.Path & "\" & f.List(I))) & "-" & Day(FileDateTime(f.Path & "\" & f.List(I))) hora = Hour(FileDateTime(f.Path & "\" & f.List(I))) & ":" & Minute(FileDateTime(f.Path & "\" & f.List(I))) & ":" & Second(FileDateTime(f.Path & "\" & f.List(I))) 'On Error Resume Next nomfut = Mid(f.List(I), 1, Len(f.List(I)) - 4) nomfut = f.Path & "\" & nomfut & "_" & fecha & "_" & hora & ".txt" Name nomact As nomfut 'ren = MoveFile(nomact, nomfut) Next I End Sub
Hola grupo como andan....
Este es mi problema: tengo un codigo en el cual quiero renombrar un
archivo en la misma ubicacion, cuando quiero ejecutar el "Name nombre
as nombrenuevo" me da un error en tiempo de ejecucion: Error '5' en
tiempo de ejecucion: Llamada a procedimiento o argumento no validos
Ya no se que hacer, necesito urgentemente que me ayuden con esto, aqui
les dejo el codigo que tengo.....
Private Sub Form_Load()
Dim var As Integer
Dim nomact As String
Dim nomfut As String
Dim I As Integer
Dim fecha As String
Dim hora As String
Dim ren As Long
d.Drive = "c:\"
Dir.Path = d.Drive & "\PRUEBA"
f.Pattern = "*.TXT"
f.Path = d.Drive & "\PRUEBA"
var = f.ListCount - 1
For I = 0 To var
nomact = f.Path & "\" & f.List(I)
fecha = Year(FileDateTime(f.Path & "\" & f.List(I))) & "-" &
Month(FileDateTime(f.Path & "\" & f.List(I))) & "-" &
Day(FileDateTime(f.Path & "\" & f.List(I)))
hora = Hour(FileDateTime(f.Path & "\" & f.List(I))) & ":" &
Minute(FileDateTime(f.Path & "\" & f.List(I))) & ":" &
Second(FileDateTime(f.Path & "\" & f.List(I)))
'On Error Resume Next
nomfut = Mid(f.List(I), 1, Len(f.List(I)) - 4)
nomfut = f.Path & "\" & nomfut & "_" & fecha & "_" & hora & ".txt"
Name nomact As nomfut
'ren = MoveFile(nomact, nomfut)
Next I
End Sub
Desde ya muchisimas gracias a todos!!!!!!!
Tengo un pequeño problemita, he desarrollado una pequeña aplicacion, la cual la empaquete sobre WINDOWS XP, no tengo ningun problema en las maquinas de mi empresa, todas tienen XP, pero en la recepción tengo un windows 98, en el cual lo instalo y tengo error en tiempo de ejecución. Mi prgunta es como le hago para empaquetar la aplicacion en XP, para que me soporte la aplicacion en windows 98.
Gracias saludos
Salvador Elvira
Do You Yahoo!? La mejor conexión a Internet y 2GB extra a tu correo por $100 al mes. http://net.yahoo.com.mx
Yo diria que antes de imprimir el código de barras no
has seleccionado el font correcto. Algo así como:
printer.font.name ="Code128"
printer.font.size=18
printer.print Codigo$
printer.font="Arial"
printer.font.size=10
Si lo haces con cristal, no puedo ayudarte.
Saludos
José A. Gracia
--- adelgadopino <adelgadopino@...> escribió:
> amigos, estoy terminando un punto de venta y estoy
> en la parte de
> impresion de boleto, necesito que nº de ticket se
> imprima al final del
> boleto en barras, tengo la fuente "codebar_128" ,
> tengo el codigo para
> trasnformar el text en barras, en la pantalla lo
> muestra sin problemas
> pero al imprimirlo me sale por ejemplo el ticket 11
> muestra ^11!^s, he
> intentado tantas cosas y nada, por favor ayudenme,
> gracias
>
>
Todos mis correos llevan un saludo y mi nombre y apellido al pie. Desconfíe de
cualquier correo que no lo lleve y de los adjuntos que pueda contener.
Visite mi página en: http://www.joseantoniogracia.com
en: http://usuarios.lycos.es/jagrane/
o en: http://personal.auna.com/jagrane/
______________________________________________
LLama Gratis a cualquier PC del Mundo.
Llamadas a fijos y móviles desde 1 céntimo por minuto.
http://es.voice.yahoo.com
Estoy haciendo una imprecion de imagen en tamaño carnet de conducir pero me pasa que la camara me da un tamaño que necesito cambiarlo o sea hacer un recize o dar otro tamaño antes de imprimir no se hay una clase que lo haga o si desde cristal report 8 lo puedo hacer no encontre hasta ahora la manera de hacerlo. Desde cristal lo imprimo como un objeto OLE que esta linkeado a una imagen.
Desde ya muchas gracias a todos
Gustavo
Preguntá. Respondé. Descubrí. Todo lo que querías saber, y lo que ni imaginabas,
está en Yahoo! Respuestas (Beta). ¡Probalo ya!
Buenas
tardes a todos. Disculpen que les pregunte sobre el tema, pero espero que con
su experiencia puedan ayudarme.
Hace
algún tiempo desarrollamos en la empresa una aplicación en VB 6.0 y SQL Server
2000.
Actualmente
estoy desarrollando una pequeña aplicación en VB 6.0, cuyas tablas estarán
ubicadas en la BD
que les comente anteriormente. Es un poco tedioso explicarles el por qué pero
resulta que los datos de la primera aplicación, deberían ser respaldados y
restaurados independientemente de los datos de la aplicación más pequeña, es
por esto que decidí crear las tablas de la segunda aplicación en un filegroup. La
pregunta es cómo hago para respaldar y restaurar los datos del segundo
filegroup sin alterar los datos del filegroup primario. Traté de hacerlo con
Enterprise Manager, por código SQL mediante el Quero Analyzer, pero no lo he
logrado todavía.
Este correo es de indole confidencial, de interes unico del destinatario, si por error ha sido recibido por favor eliminelo. Este correo fue revisado automaticamente por el sistema antivirus institucional, C.C.S.S.
Tengo dos maquinas, en red, ambas tienen MySQL 5.0 , en ambas la instancia se llama localhost, pero lo que necesito es solamente tener una de ellas donde corra el MySQL y conectarme desde las demas. Segun el manual, la instruccion para la conexion es la siguiente:
mysql -h Maquina01 -u root -p
donde Maquina01 es a la maquina donde me quiero conectar, pero siempre recibo el siguiente error:
Can't connect to mysql server on Maquina01 (10060)
Tambien me da el mismo error si en vez del nombre de la maquina coloco la IP de la Maquina01. Si yo hago ping a Maquina01 me responde sin problemas, pero nunca me puedo conectar a esa instancia del servidor.
Podrian decirme còmo puedo hacer para conectarme ?, Tiene que ver que en ambas maqunas la instancia se
llame localhost ?. Cuando estaba instalando MySQL , le puse el checkbox donde decìa que se permitia conectar desde otra maquina.
Bueno, cualquier guia que me puedan proporcionar se los agradecere. Los tutoriales y manuales que he encontrado en internet nunca hablan de esto, solamente explican que para conectarse a otra maquina solo se escribe el nombre de esa maquina, se provee el usuario y password y listo.
Saludes.
__________________________________________________ Correo Yahoo! Espacio para todos tus mensajes, antivirus y antispam ¡gratis! Regístrate ya - http://correo.espanol.yahoo.com/
hola listeros, estoy mediante un procedimiento iniciando, parando
servicios de windwos, pero no se como reiniciar un servicio, yo estoy
usando esta linea:
El_Servicio.RefreshService
pero me sale un error. A continuacion detallo el codigo del proceso
Private Sub Accion_Service(Accion As E_Accion, Name_Servicio As
String)
Dim Obj_Wmi As Object
Dim Col_Servicios As Object
Dim El_Servicio As Object
Set Obj_Wmi = GetObject("winmgmts:{impersonationLevel=impersonate}!
\\.\root\cimv2")
Set Col_Servicios = Obj_Wmi.ExecQuery( _
"Select * from Win32_Service Where Name ='" &
Name_Servicio & "'")
For Each El_Servicio In Col_Servicios
If Accion = 0 Then
'Detiene el servicio
El_Servicio.StopService
DoEvents
MsgBox " Se detuvo el Name_Servicio : " & Name_Servicio,
vbInformation
ElseIf Accion = 1 Then
' Inicia el servicio
El_Servicio.StartService
DoEvents
MsgBox " Se inició el Name_Servicio : " & Name_Servicio,
vbInformation
ElseIf Accion = 2 Then
' Reinicia el servicio
El_Servicio.RefreshService
DoEvents
MsgBox " Se Reinició el Name_Servicio : " & Name_Servicio,
vbInformation
End If
Next
End Sub
amigos, estoy terminando un punto de venta y estoy en la parte de
impresion de boleto, necesito que nº de ticket se imprima al final del
boleto en barras, tengo la fuente "codebar_128" , tengo el codigo para
trasnformar el text en barras, en la pantalla lo muestra sin problemas
pero al imprimirlo me sale por ejemplo el ticket 11 muestra ^11!^s, he
intentado tantas cosas y nada, por favor ayudenme, gracias
Hola, estube intentando hacer un slash, para el programa y queria aprovechar poner el logo en el formulario y que quedara recortado, y aplicar el efecto de transparencia, o sea que aparesca de a poco.
Lo intente con las apis, pero cuando hago una cosa no puedo hacer la otra, es como que una deshabilita la otra.
1) Ni bien arranca tu programa, guardarte en
variables la resulocion de la pantalla.
ALTO = screen.height ANCHO=screen.width
2) Y cada vez que haces el form Load,
escribis este codigo:
me.Height = ALTO me.Width =
ANCHO
3) En el evento resize del form tambien tenes que
controlar que no te pase el tamaño de la pantalla default.
if me.Height > ALTO then me.Height = ALTO end if
if me.Width > ANCHO then
me.Width = ANCHO end if
Esto para las pantallas pero se
te va a poner dificil con los controles que existen dentro de los
formularios, porque dependiendo de la cantidad y tamaño que tengas
los tendras que adaptar a los cambios.
Espero que te sirva para
comenzar, y ademas provoque que el resto de los listeros opinen sobre lo
que antes escribi...
salduos.........jose
> hola grupo, estoy haciendo una aplicación en la que
necesito que el > tamaño de mis formularios (en general
todas la pantallas) se ajusten a > la resolución de
pantalla que tiene la máquina...... > No se me permite
ajustar a la resolución más conveniente, necesito >
ajustar las pantallas de la aplicación..... > > Si
alguno tiene idea de como podría hacer, le agradecería mucho
su > ayuda... > > saludos.... > Jorge > > >
hola grupo, estoy haciendo una aplicación en la que necesito que el
tamaño de mis formularios (en general todas la pantallas) se ajusten a
la resolución de pantalla que tiene la máquina......
No se me permite ajustar a la resolución más conveniente, necesito
ajustar las pantallas de la aplicación.....
Si alguno tiene idea de como podría hacer, le agradecería mucho su
ayuda...
saludos....
Jorge
Hola tengo un problema, como puedo hacer para que en un control
datagrid no me muestre la fila que por defecto me aparece sin tener
ningun dato con enlace a un Adodc.
Saludos,
Eduardo.
Te mandé dos archivos en VBScript ASP, con el Algoritmo Rijndael, ¿te han servido?
Saludos Walter
"Alberto M. Vernieri" <avernieri@...> escribió:
Hola!
Si, conozco el Rijndael... En mi pedido original lo llamé AES (Advanced Encryption Standard) pero es el mismo que mencionas, el sucesor de DES.
Tiene más o menos la misma fuerza crpitográfica que TwoFish (Doble Blowfish) o que IDEA. (Son comparables)
Tengo por aquí (en papel) las definiciones matemáticas de todos esos algoritmos,
aunque es un plomo tratar de pasarlos a código...
Pensé que sería más fácil de conseguir alguna versión ya implementada...
Algunos amigos me han pasado ya varias implementaciones, y estoy en la etapa de verificarlas y medir performance de ellas para elegir finalmente una...
(La verificacion la hago encriptando con el algoritmo, e intentando desencriptar con la misma clave y la Java Cryptographic Engine...) Es que el código de alguos lleva unas cuantas constantes hexa, y un solo digito mal haría que el cifrado no estuviera en norma, por lo tanto no me serviría...
Pero bueno, espero en esta semana tener resuelto el problema...
Te comento que el mejor algoritmo criptográfico simétrico fuerte, es el "Algoritmo Rijndael" este es block cipher que cifra bloques de 128, 192,o 256 bits, y usa claves simétricas también de 128, 192 o 256 bits. Consiste en una ronda inicial ,de un número"r" de rondasque es de 10,12 o14 dependiendo de la longitud del bloque y de la clave.
Este algoritmo de cifrado es el estandar que se implementó en los estados unidos y sustituye al agonizante DES (56 bits de clave, por lo que resulta inseguro
actualmente.
Cuando encuentre algo de código te lo envío, por el momento yo no encuentro el código que poseía en mi máquina.
Saludos Walter
Preguntá. Respondé. Descubrí. Todo lo que querías saber, y lo que ni imaginabas,
está en Yahoo! Respuestas (Beta). ¡Probalo ya!
Hola, gracias por responder, como pensé y algunos
colisteros me dijeron, era problemas de
librerías, hice el paquete de instalación con el
instalador de VB coo me comentaron algunos
colisteros , lo instalé en cada máquina y resuelto el problema.
La consulta tabajaba bien en mi red, y tambien al
conectar mi notebook en la red del cliente, por
lo que era lógico pensar en librerias
MUCHAS GRACIAS A TODOS POR SU AYUDA:)
>www.dependencywalker.com/
>
>El día 18/05/07, suso <<mailto:jlcubas@...>jlcubas@... > escribió:
>
>Hola otra vez a todos, como puedo saber las dll y todos los
>componentes que necesita tanto el control datagrid como el adodc u
>otros controles ?
>
>He mirado las referencias en el proyecto->referencias, en
>proyecto->componentes y en el fichero vbp, abriendolo con el editor
>de texto, pero me faltan dll's y/o ocx's, ya que lo instalao en otro
>pc que no sea el de desarrollo, y no me funciona, no me da error,
>pero no me presenta datos ninguno, solo la pantalla de la rejilla, sin datos.
>
>He mirado en internet a ver si encontarba algo sobre eso..pero nada de nada.
>
>Uso installshield 2.4 y 3.5, pero sin resultado:(
>
>Alguna idea
>
>Muchas gracias por adelantado
>Saludos
>Suso
>
>
>
Saludos!!! creo que la mejor forma de hacerlo (al menos a mi me a
servido muchisimo es la siguiente:
Creen un archivo de texto con el block de notas y copien lo siguiente:
Windows Registry Editor Version 5.00
[HKEY_CLASSES_ROOT\dllfile\Shell]
@="Register"
[HKEY_CLASSES_ROOT\dllfile\Shell\Register]
[HKEY_CLASSES_ROOT\dllfile\Shell\Register\Command]
@="C:\\WINDOWS\\system32\\regsvr32.exe \"%1\""
[HKEY_CLASSES_ROOT\dllfile\Shell\Unregister]
[HKEY_CLASSES_ROOT\dllfile\Shell\Unregister\Command]
@="C:\\WINDOWS\\system32\\regsvr32.exe \"%1\" /u"
[HKEY_CLASSES_ROOT\ocxfile\Shell]
@="Register"
[HKEY_CLASSES_ROOT\ocxfile\Shell\Register]
[HKEY_CLASSES_ROOT\ocxfile\Shell\Register\command]
@="C:\\WINDOWS\\system32\\regsvr32.exe \"%1\""
[HKEY_CLASSES_ROOT\ocxfile\Shell\Unregister]
[HKEY_CLASSES_ROOT\ocxfile\Shell\Unregister\command]
@="C:\\WINDOWS\\system32\\regsvr32.exe \"%1\" /u"
guarden el archivo como "Registro.Reg" y luego denle Doble Click
Con esto se guardarán el el registro las claves con las que tendran
en el menú emergente las opciones de "Register" y "Unregister" para
librerias 'dll' y para archivos 'ocx' dejando por default la opcion
de "Register".
Espero que les sirva
ISC. José Gustavo Montaño Morales
Biometrics Developer Team Leader
Identidad Digital Veracruz
--- En DesarrolloVB@..., "Briand Bernal"
<briand.bernal@...> escribió:
>
> Si pero a veces queres quitar una dll, y el trabajo de escribir es
engorroso estar abriendo el interfaz en el directorio correcto.
> Por eso fue que se me ocurrio, y fue por esa razon de "unregister
dll" que se me ocurrio hacerlo.
>
> Por la pregunta final, jaja, tienes razon. Se podrian ver los
iconos, pero no importa.
>
> Saludos,
> Briand
>
> ----- Original Message -----
> From: Alberto M. Vernieri
> To: DesarrolloVB@...
> Sent: Monday, May 21, 2007 4:48 PM
> Subject: Re: [VB] RegSvr32GUI (Interfaz grafico para registrar
DLL)
>
>
> Hola!
>
> Yo lo que suelo hacer es: Una vez en la vida (de cada instalación
de Windows) voy al explorer, apunto a una dll, Shift click
derecho, "Abrir con..." (o bien "Open with..." según el idioma),
Botón Otros programas, navego hasta system32\regsvr32, y marco la
casilla "Usar siempre este programa"
>
> Una vez hecho esto, cada vez que quiero registrar una DLL, la
busco en el explorador, le doy doble click y voilá...
>
> Se puede hacer otro tanto con los OCX...
>
> Total, qué otra actividad se te ocurre que podrías querer hacer
clickeando sobre una dll u ocx, que no sea registrarlos?
>
> Saludos
> Alberto
>
>
>
> On 5/21/07, Briand Bernal <briand.bernal@...> wrote:
>
> Buenos dias
> Ayer en un momento de loco, que me volvia a encontrar con tener
que registrar DLL, otra vez tenia que recurrir a la linea de comandos.
> Un poco engorrozo el tema, decidi hacer una interfaz grafica
para estas tareas.
>
> Lo comparto con el grupo, espero que les sirva.
> El link
> http://www.seypro.com/utils/RegSvr32GUI.exe
>
> Saludos,
> Briand Bernal
>
> _=
>
Uso la version 8 del true dbgrid, pero a veces no ejecuta el evento aftercoledit, mi codigo es el siguiente al modificar una casilla del grid, como les repito solo pasa a veces, pero me
ocasiona a veces que los calculos no sean los deseados
Private Sub dg_AfterColEdit(ByVal ColIndex As Integer) Select Case ColIndex Case C_CANTIDAD: CalculoTotal Case C_FRACCION: CalculoTotal Case C_PUNIT CalculoDetalle CalculoTotal Case C_PRECIO 'precio CalculoTotal End Select End Sub
Subject: Re: [VB] RegSvr32GUI (Interfaz grafico para registrar DLL)
Hola!
Yo lo que suelo hacer es: Una vez en la vida (de cada instalación de Windows) voy al explorer, apunto a una dll, Shift click derecho, "Abrir con..." (o bien "Open with..." según el idioma), Botón Otros programas, navego hasta system32\regsvr32, y marco la casilla "Usar siempre este programa"
Una vez hecho esto, cada vez que quiero registrar una DLL, la busco en el explorador, le doy doble click y voilá...
Se puede hacer otro tanto con los OCX...
Total, qué otra actividad se te ocurre que podrías querer hacer clickeando sobre una dll u ocx, que no sea registrarlos?
Hola, el problema es que no me da mensajes de
error, solo que no me muestra los datos en la
rejilla, , cuando si me da mensajes de error, es
en la entrada de datos,"esa clase no esta registrada".
Saludos
Suso
>Tal vez no estes registrando las dll o ocx.
>
>Si podes ser mas especifico en los mensajes de error mejor.
>
>Saludos,
>Briand
>
>----- Original Message -----
>From: <mailto:jlcubas@...>suso
>To: <mailto:visualbasic-esp@yahoogroups.com>visualbasic-esp@yahoogroups.com
>Cc:
><mailto:DesarrolloVB@...>DesarrolloVB@...
>;
><mailto:canalvisualbasic@...>canalvisualbasic@...
>;
><mailto:desarrolladores-software@yahoogroups.com>desarrolladores-software@yahoo\
groups.com
>
>Sent: Friday, May 18, 2007 7:36 PM
>Subject: [VB] Averiguar librerias en un proyecto de vb6
>
>Hola otra vez a todos, como puedo saber las dll y todos los
>componentes que necesita tanto el control datagrid como el adodc u
>otros controles ?
>
>He mirado las referencias en el proyecto->referencias, en
>proyecto->componentes y en el fichero vbp, abriendolo con el editor
>de texto, pero me faltan dll's y/o ocx's, ya que lo instalao en otro
>pc que no sea el de desarrollo, y no me funciona, no me da error,
>pero no me presenta datos ninguno, solo la pantalla de la rejilla, sin datos.
>
>He mirado en internet a ver si encontarba algo sobre eso..pero nada de nada.
>
>Uso installshield 2.4 y 3.5, pero sin resultado:(
>
>Alguna idea
>
>Muchas gracias por adelantado
>Saludos
>Suso
>
>
Sin conexión 
Enviar correo