آدرس دهي فايل [بایگانی]

vahid_esp

جمعه 30 مرداد 1388, 04:14 صبح

سلام دوستان.
من مي خوام توي ويژوال بيسيك آدرس يه فايل رو بدم كه داخل فلدريه كه فايل Exe برنامه همونجاست.
منظورم اينكه مي خوام يه فايل رو به برنامه Attach كنم طوري كه اين فلدر رو به هر جايي منتقل كنم اجرا بشه.
توضيحات بيشتر:

|datasource|\1.txt
به جاي |datasource| چه كدي قرار بدم

Hossis

جمعه 30 مرداد 1388, 09:42 صبح

اگر مثلا برنامه اجرایی (exe) در پوشه f:\user\you\app باشد و فایل شما در شاخه f:\user\you\app\datasource\1.txt باشد، برای پیدا کردن فایل توسط برنامه کافی است بنویسید

textbox1.text=io.file.readalltext("datasource\1.txt")

امیدوارم به جوابت رسیده باشی

Hossis

جمعه 30 مرداد 1388, 09:44 صبح

این یعنی این که شاخه خود فایل اجرائی رو لازم نیست وارد کنیی،‌بلکه برنامه خود بخود شناسائی می کنه

sari-1369

جمعه 30 مرداد 1388, 12:14 عصر

برای بدست آوردن مسیری که برنامه از اونجا اجرا شده هم میتونی از این کد استفاده کنی

Dim a As String = My.Application.Info.DirectoryPath

Hossis

جمعه 30 مرداد 1388, 12:45 عصر

برای بدست آوردن مسیری که برنامه از اونجا اجرا شده هم میتونی از این کد استفاده کنی

Dim a As String = Application.startupPath

vahid_esp

جمعه 30 مرداد 1388, 22:07 عصر

دستتون درد نكنه. به جوابم رسيدم:قلب::بوس: