[Resolvido]retornar o nome do dominio de rede

Senhores

existe alguma maneira de quando entrar no sistema, executar algum codigo para retornar o nome do dominio de rede da maquina, em que está sendo executado o sistema.

achei algo na internet.

Dim msg2

msg2 = "Dominio usuario " & vbTab & Environ$("UserDomain")
MsgBox msg2, vbInformation, "Dominio"


agora preciso, pegar o resultado, no caso "msg2", e confrontar um um campo na tabela, se forem iguais, entra no sistema, caso contrario exibe uma informação e não abre o sistema.

Olá,

O Dcount já resolve seu problema:

If Dcount("CampoDominio", "TabelaDominio", "CampoDominio = '" & msg2 & "'") > 0 then

MsgBox "Abre O sistema" 'Use aqui o codigo para abrir o sistema

else

Msgbox "Não Abre o Sistema"

end if

Sds,

obrigado, funcionou perfeitamente.