Robby
Advanced Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору
Код: sName = "C:\\MyFolder\\name.ext.ext.ext"
sName = String.SplitPath(sName).Filename;
sName = string.gsub (sName, "%..*", "");
|
Результат:
ALeadsoft.Search.Engine.Builder.Professional.v2.92.Incl.Keygen-BEAN.rar >> ALeadsoft
ALeadsoft.Search.Engine.Builder.Professional.v2.92.Incl.Keygen-BEAN.rar.txt >> ALeadsoft
CDGX5SP1RuEn.part1.rar >> CDGX5SP1RuEn
CDGX5SP1RuEn.part1.rar.txt >> CDGX5SP1RuEn
CDGX5SP1RuEn.part2.rar >> CDGX5SP1RuEn
CDGX5SP1RuEn.part3.rar >> CDGX5SP1RuEn
ClickBook.MMX.13.1.0.0_2b.rar >> ClickBook
ClickBook.MMX.13.1.0.0_2b.rar.txt >> ClickBook
Hugo Tumanov.rar >> Hugo Tumanov
Hugo Tumanov.rar.txt >> Hugo Tumanov
Mpeg2Jpeg.zip >> Mpeg2Jpeg
Mpeg2Jpeg.zip.txt >> Mpeg2Jpeg
Teorex Inpaint 2.4.1.0 + Patch-UST.rar >> Teorex Inpaint 2
Teorex Inpaint 2.4.1.0 + Patch-UST.rar.txt >> Teorex Inpaint 2
ToDir.zip >> ToDir
ToDir.zip.txt >> ToDir
Web_CEO_5.6x.rar >> Web_CEO_5
Web_CEO_5.6x.rar.txt >> Web_CEO_5
delaem_sami_t_2010_13s_djvu.rar >> delaem_sami_t_2010_13s_djvu
delaem_sami_t_2010_13s_djvu.rar.txt >> delaem_sami_t_2010_13s_djvu
derevo_djvu.rar >> derevo_djvu
derevo_djvu.rar.txt >> derevo_djvu
Вин Чун_ Развитие энергии ЦИ_ Вильям Чеун.djvu >> Вин Чун_ Развитие энергии ЦИ_ Вильям Чеун
Вин Чун_ Развитие энергии ЦИ_ Вильям Чеун.djvu.txt >> Вин Чун_ Развитие энергии ЦИ_ Вильям Чеун
Код:
function GetFileName(sPath)
local sFilename = String.SplitPath(sPath).Filename..String.SplitPath(sPath).Extension;
local sExt = String.SplitPath(sPath).Extension;
if sExt ~= "" then
while String.ReverseFind(sFilename, sExt, false) ~= -1 do
sFilename = String.Mid(sFilename, 1, String.Length(sFilename) - String.Length(sExt));
end
end
return sFilename;
end
Dialog.Message("Notice", GetFileName("C:\\MyFolder\\name.ext.ext.ext"), MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1);
|
Результат:
ALeadsoft.Search.Engine.Builder.Professional.v2.92.Incl.Keygen-BEAN.rar >> ALeadsoft.Search.Engine.Builder.Professional.v2.92.Incl.Keygen-BEAN
ALeadsoft.Search.Engine.Builder.Professional.v2.92.Incl.Keygen-BEAN.rar.txt >> ALeadsoft.Search.Engine.Builder.Professional.v2.92.Incl.Keygen-BEAN.rar
CDGX5SP1RuEn.part1.rar >> CDGX5SP1RuEn.part1
CDGX5SP1RuEn.part1.rar.txt >> CDGX5SP1RuEn.part1.rar
CDGX5SP1RuEn.part2.rar >> CDGX5SP1RuEn.part2
CDGX5SP1RuEn.part3.rar >> CDGX5SP1RuEn.part3
ClickBook.MMX.13.1.0.0_2b.rar >> ClickBook.MMX.13.1.0.0_2b
ClickBook.MMX.13.1.0.0_2b.rar.txt >> ClickBook.MMX.13.1.0.0_2b.rar
Hugo Tumanov.rar >> Hugo Tumanov
Hugo Tumanov.rar.txt >> Hugo Tumanov.rar
Mpeg2Jpeg.zip >> Mpeg2Jpeg
Mpeg2Jpeg.zip.txt >> Mpeg2Jpeg.zip
Teorex Inpaint 2.4.1.0 + Patch-UST.rar >> Teorex Inpaint 2.4.1.0 + Patch-UST
Teorex Inpaint 2.4.1.0 + Patch-UST.rar.txt >> Teorex Inpaint 2.4.1.0 + Patch-UST.rar
ToDir.zip >> ToDir
ToDir.zip.txt >> ToDir.zip
Web_CEO_5.6x.rar >> Web_CEO_5.6x
Web_CEO_5.6x.rar.txt >> Web_CEO_5.6x.rar
delaem_sami_t_2010_13s_djvu.rar >> delaem_sami_t_2010_13s_djvu
delaem_sami_t_2010_13s_djvu.rar.txt >> delaem_sami_t_2010_13s_djvu.rar
derevo_djvu.rar >> derevo_djvu
derevo_djvu.rar.txt >> derevo_djvu.rar
Вин Чун_ Развитие энергии ЦИ_ Вильям Чеун.djvu >> Вин Чун_ Развитие энергии ЦИ_ Вильям Чеун
Вин Чун_ Развитие энергии ЦИ_ Вильям Чеун.djvu.txt >> Вин Чун_ Развитие энергии ЦИ_ Вильям Чеун.djvu
|
Всего записей: 879 | Зарегистр. 28-09-2003 | Отправлено: 10:49 06-09-2010 | Исправлено: Robby, 11:00 06-09-2010 |
|
