Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Use scanner
Message
De
20/12/2004 15:44:16
 
 
À
20/12/2004 15:31:11
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire d'écran & Écrans
Titre:
Versions des environnements
Visual FoxPro:
VFP 8
Divers
Thread ID:
00970779
Message ID:
00970808
Vues:
12
Hi Mohammed,

Claudio told you how to SHOW the picture. To get the picture from your scanner into your PC is a totally different issue, to get this job done automatically, you need to buy a scanning program which can be controlled by VFP. One of those program is ImageMan which you can read more about here: http://www.hallogram.com/imageman/index.html. But be prepared for a lot of reading and testing. :-)

A much easier solution is simply to tell your customers that they must use the scanning software that ships with their scanner, or buy some commercial program to get the picture from the scanner into their PC. Then your program simply present a 'Locate picture' command button for all the employees without a valid picture name in your table. This command button then invokes a GETFILE() dialogue to locate the scanned picture manually, and insert the file name into your employee table.

>hi,
>sory but i don't understand,
>if i insert at myform via thisform.text1.value =8 (employee number.)
>and i complate all employee data as name ,age ,salary ...etc
>i put his picture at the scanner to save it as the same employee number,
>how,pls. if you can step by step.
>thanks alot.
>m.qasem
>
>
>procedure thisform.refresh
>cwemployee  = allt(thisform.text1.value)  && place for employee code
>
>cwpicfile   = forcepath(cwemployee + ".jpg", "d:\tal\images\")
>
>thisform.imgemployee.picture = iif(file(cwpicfile), cwpicfile, "")
>thisform.imgemployee.visible = file(cwpicfile)
>endproc
>
>
>
>>>thank you for reply,
>>>i get error message file d:\tal\images\55.jpj dose not exist
>>>
>>>but how i can link between employee number and his picture ,mean employee number is 8 ,at the same time with command button link with scanner to giv this picture the same number 8 ..
>>>thanks
>>>m.qasem
>>
>>
>>procedure thisform.refresh
>>cwemployee  = allt(thisform.text1.value)  && place for employee code
>>
>>cwpicfile   = forcepath(cwemployee + ".jpg", "d:\tal\images\")
>>
>>thisform.imgemployee.picture = iif(file(cwpicfile), cwpicfile, "")
>>thisform.imgemployee.visible = file(cwpicfile)
>>endproc
>>
>>
>>Claudio
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform