Mensajes

1. Que lea información de una planilla? Especifica! De qué planilla? O es que piensas escanear un documento y quieres que lo que escanees se almacene en una BD? Si pensaste eso estas loco.

No estoy totalmente de acuerdo contigo ssccaann43, yo hice una aplicacion que podia escanear documentos (ya no me acuerdo como lo hice ), bueno, obviamente usando dll de terceros, pero solo podia guardarlos en blanco y negro, si queria guardarlos a color la BD me decia lo mismo que tu: ESTAS LOCO, y la razon es porque al escanear un doc a color tamaño carta el bmp me salia en 16 Mb y en BN no pasaba de 1 Mb

En lo que le doy la razon a ssccaann43 es que no hacemos tareas, podemos guiarte y darte sugerencias.

Tambien tengo algunas dudas:
1. ¿a que te refieres con "leer"? Leer que lo lea y se oiga en un altavoz, leer que reconozca los caracteres y solo guarde la informacion leida o simplemente cargar el archivo (Se que me oigo como ignorante pero hay que ser especificos para tener respuestas especificas)
2. ¿a que te refieres con "plantilla"?

Saludos

Se me ocurre algo como esto:

Variables Globales

Código (vb) [Seleccionar] Expandir


Dim cadena1(3) as string
Dim cadena2(3) as string


Declaracion de la cadena1

Código (vb) [Seleccionar] Expandir


cadena1(0) = "paco"
cadena1(1) = "42"
cadena1(2) = "35"
cadena1(3) = "gato"


Procedimiento que reordena aleatoriamente la cadena1 y la guarda en cadena2

Código (vb) [Seleccionar] Expandir


Dim Bandera As Boolean
Dim vNum As Integer

Randomize

cadena2(0) = ""
cadena2(1) = ""
cadena2(2) = ""
cadena2(3) = ""

For x = 0 To 3
    Bandera = True
    Do While Bandera
        vNum = Int(Rnd * 4)
        If cadena2(vNum) = "" Then
            cadena2(vNum) = cadena1(x)
            Bandera = False
        End If
    Loop
Next


A ver amigo, sinceramente es un circulo lo que pides: quieres una aplicacion que se quede residente en la maquina si necesidad de reiniciar, pero para que se quede residente necesariamente tienes que reiniciar y desactivar primero el deep freeze, no dudo que se pueda encontrar un agujero, pero mientras eso suceda es imposible instalar algo sin reiniciar. Si lo que quieres es no pagar, poder grabar archivos o instalarte lo que quieras leete el siguiente post:

http://foro.elhacker.net/hacking_avanzado/todo_para_burlar_cybers-t146960.0.html

Saludos.

P.D.: Si logras encontrar el metodo te aseguro que toda la comunidad te lo agradeceria 

Sinceramente no creo que lo puedas matar. El Deep Freeze es para congelar el SO y cualquier cambio que se haga al SO se restablezca al reiniciar la PC, si lo que quieres es desactivar el DF, te sugiero busques en los foros, por ahi me parecio ver el Fuck Deep Freeze, sirve para deshabilitar el DF

Saludos

[Editando:]

Bueno, eso depende de las circunstancias, porque no es lo mismo presentarlo en una empresa ante ejecutivos a presentarlo a un profesor para una calificacion. Aun asi, seran pocas las personas que te pregunten por el codigo, y eso te lo digo por experiencia, les importa mas que trabaje y cumpla con lo que te pidieron que haga.

Desde mi punto de vista le doy mas peso a la funcionalidad. Si hace lo que quieres que haga entonces esta bien.

A mi me ha pasado que haciendo un progama me salian varias linas, que despues de un tiempo al aprender mas de programacion en VB, simplificaba algunos pasos.

Aun asi le segire pensando, si logro algo te lo informare.

Editando:

Lo que se me ocurrio es declarar una variable sin tipo, y con un for ir recorriendo todos los elementos del form, de manera que cuando encontrara un elemento shape llamar una funcion, pasandole como parametro el nombre del elemento shape y el valor, para encender los segmentos , pero me marca error de referencia al objeto.
Tampoco me funciono declarando una variable tipo shape. Ejemplo del codigo:

Código (vb) [Seleccionar] Expandir


Dim Elemento
For each Elemento in Frm_7segDisplay.Controls
   if typeof Elemento is shape
      call Segmentos(Elemento, num)
   end if
Next

sub Segmentos(vElemento as shape, vNum as integer)
   Select Case vNum
      Case "0"
         vElemento.BackColor= &H40&
         ...
   End Select
End Sub


Saludos 

Hola, he estado testeando tu programa. Por lo pronto te digo que no creo que sea posible hacerlo como tu quieres, ya que aun cuando muestres el valor de una variable en 2 displays, necesariamente tienes que hacer el case para cada display. Es como utilizar un decodificador BCD a 7 Segmentos en electronica, utilizas un PIC para hacer el contador pero 1 deco para cada display.

De todos modos seguire intentando a ver que se puede lograr