ENVIRON
Galera, como encontrar a pasta (Temporary Internet Files) do windows xp, vista ou seven usando o comando environ?
environ(temp) encontro a pasta temp, não é isso que eu quero e sim o temporary internet files
pois após download de arquivos preciso esvaziar o cache, senão ele sempre abre o último arquivo que baixei
Gracias
environ(temp) encontro a pasta temp, não é isso que eu quero e sim o temporary internet files
pois após download de arquivos preciso esvaziar o cache, senão ele sempre abre o último arquivo que baixei
Gracias
Isso vai mostrar todas as variáveis no Environment:
For i% = 1 To 1000
MsgBox Environ(i%)
If Environ(i%) = [Ô][Ô] Then Exit For
Next i%
Quando achar a que vc quer, use:
dim variavel as string
variavel = environ(Nome_da_variavel_no_environ) [ô]como por exemplo MsgBox Environ([Ô]ALLUSERSPROFILE[Ô])
For i% = 1 To 1000
MsgBox Environ(i%)
If Environ(i%) = [Ô][Ô] Then Exit For
Next i%
Quando achar a que vc quer, use:
dim variavel as string
variavel = environ(Nome_da_variavel_no_environ) [ô]como por exemplo MsgBox Environ([Ô]ALLUSERSPROFILE[Ô])
KERPLUNK, obrigado pela pronta resposta.
Mas eu estava com um problema assim:
Meu programa tem uma função para baixar um arquivo da internet, mas quando ele baixava na primeira vez ele vinha correto, mas quando atualizava o arquivo na internet e ia baixar, sempre era o primeiro, ou seja não atualizava, mas se limpasse o cache do windows (internet temporary files) ele baixava o atual, quando você baixa o arquivo mais de uma vez com o mesmo nome ele não sobrepõe.
Então descobri uma função que estou compartilhando
a função DeleteUrlCacheEntry apaga o arquivo no cache, e funcionou muito bem, espero que possa ajudar mais alguem
Abraços
Mas eu estava com um problema assim:
Meu programa tem uma função para baixar um arquivo da internet, mas quando ele baixava na primeira vez ele vinha correto, mas quando atualizava o arquivo na internet e ia baixar, sempre era o primeiro, ou seja não atualizava, mas se limpasse o cache do windows (internet temporary files) ele baixava o atual, quando você baixa o arquivo mais de uma vez com o mesmo nome ele não sobrepõe.
Então descobri uma função que estou compartilhando
Citação:
Private Declare Function DeleteUrlCacheEntry Lib [Ô]wininet.dll[Ô] Alias [Ô]DeleteUrlCacheEntryA[Ô] (ByVal lpszUrlName As String) As Long
Private Declare Function URLDownloadToFile Lib [Ô]urlmon[Ô] Alias [Ô]URLDownloadToFileA[Ô] (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
Call DeleteUrlCacheEntry([Ô]http://www.site.com.br/arquivo.txt[Ô])
Call Download([Ô]http://www.site.com.br/arquivo.txt[Ô], [Ô]c:\arquivo.txt[Ô])
a função DeleteUrlCacheEntry apaga o arquivo no cache, e funcionou muito bem, espero que possa ajudar mais alguem
Abraços
Tópico encerrado , respostas não são mais permitidas