سوال: ذخیره فایل txt راهنمائی کنید ! [بایگانی]

saeedzx

دوشنبه 20 مهر 1388, 09:06 صبح

سلام
من می خواستم بدونم چه فرمی میشه با اجرا کردن فایل exe برنامه یک فایل با نام al.txt کنار همون فایل ذخیره بشه

یعنی مثلاً این دستور ذخیره کردن
Open "c:\Bank.txt" For Append As #intfnum

ولی این دستور فایل رو در مسیر مشخصی خیره میکنه من میخوام هر جا فایل باشه همون جا ذخیره بشه

مثلاً این فرمی ولی این دستور زیر جواب نمیده !!!
Open "\Bank.txt" For Append As #intfnum

Tasiyan

دوشنبه 20 مهر 1388, 10:55 صبح

قبلا یه همچین پستی زده بودم :متفکر:
Private Sub Command1_Click()
Open App.Path + "\DAVOUD.txt" For Output As #1
Print #1, "åí ÇÑ ÓÇíå ÐíÑÏ ¡ ãÇ åãÇä ÓÇíå åííã"
Close #1
End Sub

shahram_g

دوشنبه 20 مهر 1388, 11:02 صبح

سلام
من می خواستم بدونم چه فرمی میشه با اجرا کردن فایل exe برنامه یک فایل با نام al.txt کنار همون فایل ذخیره بشه

یعنی مثلاً این دستور ذخیره کردن
Open "c:\Bank.txt" For Append As #intfnum

ولی این دستور فایل رو در مسیر مشخصی خیره میکنه من میخوام هر جا فایل باشه همون جا ذخیره بشه

مثلاً این فرمی ولی این دستور زیر جواب نمیده !!!
Open "\Bank.txt" For Append As #intfnum

برای این کار به شکل زیر مسیر را اصلاح کنید:

Open App.path & "\Bank.txt" For Append As #intfnum

mostafa_bahar

سه شنبه 21 مهر 1388, 18:13 عصر

هر دو جواب درسته دوست عزیز app.path آدرس فایل Exe رو بر می گردونه حالا اگر در کنارش داخل شاخه ای می خوای بریزی از api ساختن شاخه استفاده کن

DLL_DLL

سه شنبه 21 مهر 1388, 18:45 عصر

البته من یادمه بدون app.path هم میشد قدیما!

پشت فایلت / ندار ببین درست نمیشه ؟

Open "data.txt"

ironclip

سه شنبه 21 مهر 1388, 20:47 عصر

با سلام به همه

شاید این سورس به کارتون بیاد

با تشکر ...