1

Konu: If File()

Yardımınız için teşekkür ederim.

if file(datapack)
parentez içine girmiyor.

if file(&datapack)
parantez içine giriyor
bahsettiğm hatayı veriyor
tamam dediğinde
lcbaslik değişkenine  ilgili formüldeki değer atanıyor
ve normal çalışmaya devam ediyor.

Teşekkürler..

2

Re: If File()

Bahattin 2 side tehlikeli kullanimlar ama problem nedir zaten hic anlamadim.

3

Re: If File()

Günaydın
sn.Basoz

yukarıda kullandığım ifade çok yanlış tabi..
"parantezin içine giriyor" dan kasıt şu
IF doğru sonuç veriyor anlamında.
Yapmak istediğim VFP caption a genel parametreler dosyasından
firma ismini atamak
main prg deki Kod aşağıda
aldığım hata kodu: 1300 function name is missing

Not :Sn.Basoz ben tehlikeli kısmını anlayamadım bilgi verirseniz sevinirim.


Hoşçakalın..


...............
Read Events
tsurucu=syol+'data\'+YILc+'\bahdata01!'
surucu=syol+'data\'+YILc+'\bahDATA01.dbc'
datapack=syol+'data\'+YILc+'\bahDATA01'
local qwar
qwar=syol+'data\'+YILc+'\bahgnprm.dbf'
if file(&qwar)
open database &datapack
use bahgnprm
select bahgnprm
lcBaslik=lcBaslik+'          '+rtrim(bahgnprm.gnprmadi)+'  '+rtrim(bahgnprm.gnprmunv)
use
close database
endif
_Screen.Visible = .T.
_VFP.Caption = lcBaslik
Zoom Window Screen Max
set sysmenu off

4

Re: If File()

Tehlikeli kismindan baslarsak degiskenlerin nereden geldigi belli degil. Memory degiskenleri ise baslarina mutlaka m. koy.

tsurucu=m.syol+'data\'+m.YILc+'\bahdata01!'

gibi.
if file( m.qwar ) && burada & tamamen gereksiz

open database ( m.datapack ) && burada da & gereksiz ve tehlikeli pathde bosluk varsa gocer mesela

5

Re: If File()

sayın cetin basoz
file()
komutunu bende kullanıyorum.
yerine tehlikesiz bi secenek varmı.
tehlike neresinde anlamadım.
tşkler..

6

Re: If File()

1) Bir onceki yaziyi oku, file() da degil tehlike, macro ve degisken kullanimlarinda.
2) File() yerine adir() daha guvenilir bir secenek. File() network dosyalari icin olmadigi halde .t. dondurebiliyor.

7

Re: If File()

Sn.Basoz
"m."  konusunda eski forumda bilgi vermiştiniz.Dikkat ediyorum aslında ama bazen..
tekrar için ve & uyarılarınız için çok teşekkürler..
iyi çalışmalar..

8

Re: If File()

cetinbasoz yazdı:

1) Bir onceki yaziyi oku, file() da degil tehlike, macro ve degisken kullanimlarinda.
2) File() yerine adir() daha guvenilir bir secenek. File() network dosyalari icin olmadigi halde .t. dondurebiliyor.


ben file kullanırken file(sys(5)+curdir()+"myfilename.dbf")

gibi kullanıyorum. yoksa path ta olup ta mevcut directory de olmayan dosyaları da varmış gibi gösteriyor. network dosyaları dediğin bu heralde?

Haksızlıklar karşısında susanlar, dilsiz şeytanlardır!
www.metinemre.com

9

Re: If File()

file("\\remoteserver\share\myfile.txt")
Dosya olmadigi halde (connection kesik, server yok vs) .t. donebiliyor.