Jan skrev:
> Er her en som kan svare på hvordan man lettest finder Dato og tid på en
zip
> fil placeret på internettet.
Jeg tror det nemmeste er dette...
Placér en Internet Transfer Control på din Form og skriv følgende kode
ind... ændrer Url til din fil og kør programmet! (Det virker vist nok også
på ftp-protokollen, men jeg er ikke 100% sikker)
Const Url = "
http://www.domain.com/path/file.zip"
Private Sub Form_Load()
Inet1.Execute Url
Me.Caption = "Please wait..."
End Sub
Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
Inet1.Cancel
End Sub
Private Sub Inet1_StateChanged(ByVal State As Integer)
Select Case State
Case 11
MsgBox "An error occurred!"
Unload Me
Case 12
MsgBox Inet1.GetHeader("Last-modified"), vbOKOnly, "Last
modified"
Unload Me
End Select
End Sub
- Bjarke Walling Petersen