Chamuanza Posted November 23, 2016 at 11:51 AM Report #600790 Posted November 23, 2016 at 11:51 AM Um Bem Aja a todos Tenho uma pequena aplicação em VB2013 que pretendo ser executada após abrir a pasta da reciclagem no Windows10 É possível fazer? Agradecia umas dicas sobre o assunto. Obrigado desde já
M6 Posted November 23, 2016 at 12:07 PM Report #600791 Posted November 23, 2016 at 12:07 PM É capaz de ser possível, mas carece de confirmação: se criares um serviço que verifique o acesso a essa pasta (atenção que o caixote do lixo é algo meio vritual, não é só um diretório) e quando essa pasta é acedida via leitura, mandas abrir a tua aplicação. 10 REM Generation 48K! 20 INPUT "URL:", A$ 30 IF A$(1 TO 4) = "HTTP" THEN PRINT "400 Bad Request": GOTO 50 40 PRINT "404 Not Found" 50 PRINT "./M6 @ Portugal a Programar."
apocsantos Posted November 23, 2016 at 01:00 PM Report #600793 Posted November 23, 2016 at 01:00 PM Bom dia Creio que possas fazer o que pretendes, recorrendo ao evento System.Shell.RecycleBin.onRecycleBinChanged Adicionalmente podes recorrer ao SHQueryRecycleBin para obter o status do recycle bin. Cordiais cumprimentos, Apocsantos "A paciência é uma das coisas que se aprendeu na era do 48k" O respeito é como a escrita de código, uma vez perdido, dificilmente se retoma o habito"
Chamuanza Posted November 23, 2016 at 02:01 PM Author Report #600794 Posted November 23, 2016 at 02:01 PM Obrigado pela atenção apocsantos e M6 Como transformo essa vossa informação em rotina no VB.Net
apocsantos Posted November 23, 2016 at 02:41 PM Report #600795 Posted November 23, 2016 at 02:41 PM Boa tarde, Para a sugestão do @M6 cá fica um link: http://www.jorgepaulino.com/2008/09/vbnet-windows-service-filesystemwatcher.html. Para a minha, sinceramente nunca o fiz em vb.net teria de experimentar, mas não deve ser complicado. [EDIT:] Deixo-te cá o código C#, pode ser que ajude! O meu vb.net está cada dia mais "enferrujado", deve ser efeito da humidade e do salitre! 😄 public static int GetCount() { SHQUERYRBINFO sqrbi = new SHQUERYRBINFO(); sqrbi.cbSize = Marshal.SizeOf(typeof(SHQUERYRBINFO)); int hresult = SHQueryRecycleBin(string.Empty, ref sqrbi); return (int)sqrbi.i64NumItems; } Cordiais cumprimentos, Apocsantos "A paciência é uma das coisas que se aprendeu na era do 48k" O respeito é como a escrita de código, uma vez perdido, dificilmente se retoma o habito"
Recommended Posts
Create an account or sign in to comment
You need to be a member in order to leave a comment
Create an account
Sign up for a new account in our community. It's easy!
Register a new accountSign in
Already have an account? Sign in here.
Sign In Now