Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

proteus

Serial do hd

Recommended Posts

eu preciso de um programa que pegue o numero serial do hd.......para possibilitar acesso em apenas uma màquina para cada usuario de um sistema......alguem sabe?

Compartilhar este post


Link para o post
Compartilhar em outros sites

Tenta isso:'É importante adicionar aos references do seu projeto a seguinte biblioteca "Microsoft Scripting Runtime" para que funcione. Dim lSerial as Long Dim fso As New FileSystemObject, drvDrive As Drive 'Pega as informações do drive c:Set drvDrive = fso.GetDrive(left(fso.GetDriveName("c:\"), 2)) 'Pega o número de série do HDlSerial = drvDrive.SerialNumber [ ]'s

Compartilhar este post


Link para o post
Compartilhar em outros sites

valeu moçada!!!!!!!!!!!!!!!!

Compartilhar este post


Link para o post
Compartilhar em outros sites

Acesse www.espacoaccess.com.br tem vários codigos fonte em vba que no vb é igualzinho.....um abraçolá tem com certeza....

essa pagina neim existe

Compartilhar este post


Link para o post
Compartilhar em outros sites

×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.