Printable View
سلام من زیاد با VB کار نکردم
میخوام یه کارساده انجام بدم:
یه فایل رو تو یه برنامه اجرا کنم، مثلا فایل txt رو تو word باز کنم
این درست کار میکنه:
shell ("c:/word.exe c:/a.txt")
اما من میخوام به جای c:/a.txt اینو بزارم:
TextBox1.text = "c:/a.txt"
shell ("c:/word.exe TextBox1.text")
ممنون میشم راهنمایی کنید
نقل قول:
من منظور شما رو درست متوجه نشدم...!؟! :41:
تا اونجایی که من فهمیدم شما می خواید آدرس فایلی رو که تو فایل C:\a.txt قرار داره رو به برنامه C:\word.exe بفرستید....!؟! :13:
خب اگه این طور باشه، اول باید فایل رو باز کنید... متن داخلش رو توی Text1 قرار بدید... و مقدار Text1 رو به برنامه C:\word.exe بفرستید...!؟! من این برنامه رو براتون نوشتم...!؟! :
اگه منظورتون رو درست متوجه نشدم بگید که راهنمایی تون کنم...!؟!کد:FileName = "C:\a.txt"
F = FreeFile
Open FileName For Input As #F
Text1.Text = Input$(LOF(F), F)
Close #F
Shell "C:\word.exe " & Text1.text
موفق باشید...!؟! :46:
خیلی ممنون که جواب دادی ،نقل قول:
من میخواستم یه برنامه رو تو یه برنامه دیگه باز کنم که با راهنماییت مشکل حل شد:46:
ولی یه مشکل دیگه دارم اگه کمکم کنی ممنون میشم
با اینجور آدرس ها مشکل دارم مثلا:
F:\Documents and Settings\EBOOT.BIN
چون بعد از Documents فاصله هست تا and ، برنامه فکر میکنه F:\Documents یه آدرس جداست و and هم جدا
مرسی:40:
اگه حال داشتی اینم بگو:
چجوری میتونم یه فایل رو Embed کنم و بعد اجراش کنم؟
خواهش میکنم...!؟! :11:نقل قول:
اینجور آدرس ها که بینشون فاصله ست رو باید بین کوتیشن ( " ) بذاری...!؟! :13:
ولی خب... چون خود رشته ها هم تو vb با کوتیشن مشخص می شن... موضوع یکم پیچیده میشه...!؟! شما باید آدرس رو به این صورت بنویسید...!؟! :
باز هم اگه سوالی داشتید من در خدمتم...!؟! :10:کد:"""F:\Documents and Settings\EBOOT.BIN"""
موفق باشید...!؟! :46:
بازم مرسینقل قول:
مشکل من اینه که آدرس داخل اینه:
Me.sfovira.FileName
نمیشه اطرافش "" گذاشت:41:
چرا... میشه...!؟! اینجوری :13: :نقل قول:
باید چهار تا کوتیشن بذارید...!؟! :27: :31:کد:"""" & Me.sfovira.FileName & """"
موفق باشید...!؟! :46: