Como verificar se o disquete esta vazio ? - VBWEB

USUÁRIO: SENHA:

SALVAR LOGIN ?


	Fórum
	Visual Basic

Voltar

Autor

Assunto: Como verificar se o disquete esta vazio ?

Aquatico

SÃO PAULO
SP - BRASIL

Postada em 10/11/2004 12:17 hs

Como verificar se o disquete esta vazio ?

Sandro
não registrado

Postada em 10/11/2004 12:39 hs

Tente o seguinte:

Arquivo = Dir(App.path & "*.*", vbArchive)

If Arquivo <> "" Then

Msgbox "Disco possui arquivos"

Else

Msgbox "Disco Vazio"

End If

Página(s): 1/1

Seu Nome:
Seu eMail:		ALTERAR PARA MODO HTML
Mensagem: [:)] = [:P] = [:(] = [;)] = HTML DESLIGADO

VOLTAR


		CyberWEB Network Ltda. © Copyright 2000-2026 - Todos os direitos reservados. Powered by HostingZone - A melhor hospedagem para seu site