Merhaba Arkadaşlar ;

Ben bir sitedeki txt dosyasındakı yazıyı label ' a otomatık kopyalatmasını istiyoruım , yanş duyuru yapmasini istiyorum projede.

Oncelikle 1 Label Ekleyin ve 1timer ekleyin interval ını 1 yapin ve cift tıklayarak bu kodu ekleyin

hFile = lopen("......... .txt", 0)
If hFile Then
fileSz = GetFileSize(hFile, 0)
lpData = Space(fileSz)
lread hFile, ByVal lpData, fileSz
Label1 = lpData
lclose hFile
Else
MsgBox "Dosya acilamadi", 16
End If

hFile = lopen("......... .txt", 0) koyu yazılmış olan yere .txt formatında yazdığınız yazının urlsini giriyorsunuz.

Birisi yazmış ama bende lopen fonksiyonu calışmıyor neden olabilir acil yardımcı olurmusunuz ?
__________________