استخراج نام فایل از آدرس آن

[XMEGAMAHDI]

به نام خدا سلام دوستان سوال من این است که چگونه میتوان از آدرسی که از یک فایل مشخص به صورت یک رشته داریم نام فایل را استخراج بکنیم و این که چطور میتوان با زذن یک کلید در برنامه یک فایل با فرمت help را فراخوانی کرد و روی صفحه نشان داد(من help را درست کردم نمیدانم چطور باید آن را نمایش دهم) متشککرم

[ALI TT]

به نام خدا سلام دوستان سوال من این است که چگونه میتوان از آدرسی که از یک فایل مشخص به صورت یک رشته داریم نام فایل را استخراج بکنی
راه های زیادی وجود داره . ساده ترین راه :

Dim FileName As String = My.Computer.FileSystem.GetName("E:\DISK\ALI TT.exe")


این که چطور میتوان با زذن یک کلید در برنامه یک فایل با فرمت help را فراخوانی کرد و روی صفحه نشان داد(من help را درست کردم نمیدانم چطور باید آن را نمایش دهم) متشککرم
اگه فقط می خواهی باز شه :

Process.Start("آدرس فابل مربوط")

اگه هم خاستی که کاربر تا این فایل رو نبسته نرم افزارت قفل بمونه :

Process.Start("آدرس فابل مربوط").WaitForExit()

[XMEGAMAHDI]

به نام خدا سلام دوست عزیز از کمککت خیلی خیلی ممنون ومتشککرم امیدوارم در تمام صحنه های زندگی موفق و پیروز باشی.

[Afshin160]

با سلام ...
براي استخراج نام فايل :



PublicFunction fnamefile(ByVal str AsString) AsString
Dim st1, st2, str3, ttt AsString
Dim i, j AsInteger
j = (str).Length
str3 = StrReverse(str)
st2 = Mid((str3), 5, j - 4)
i = (InStr(1, st2, "\"))
st1 = Mid(st2, 1, i - 1)
ttt = StrReverse(st1)
Return (ttt)
EndFunction




وبراي بدست آوردن Folder و File ها واقع در يك مسير :




Dim Fb AsNew FolderBrowserDialog
Dim listbox1 AsNew ListBox

listbox1.Parent = Me()
listbox1.Show()
'---------------
Fb.ShowDialog()
If FileIO.FileSystem.DirectoryExists(Fb.SelectedPath) Then
ForEach s In FileIO.FileSystem.GetFiles(Fb.SelectedPath)
listbox1.Items.Add(s)
Next
EndIf




موفق باشيد .

راستي داشت يادم ميرفت از دستور Shell زير براي اجرا كردن برنامه هاي ديگر نيز ميوتني استفاده كني.

[sepehr.net]

سلام برای اینکه یک فایل help در برنامتون درست کنید به این تاپیک مراجعه کنین
http://barnamenevis.org/forum/showthread.php?t=130290