[FAQ CENTER トップ]
[VBScript FAQ トップへ]

VBScript / VBA FAQ


スポンサード リンク

【質問】 URLからパスを取り出すサンプル(ファイル名を除去)

スポンサード リンク

【答え】
URLからパスを取り出す(ファイル名を除去)サンプルです。

(1)
http://www.example.com/test1/test2/test3.htm の場合
http://www.example.com/test1/test2/ を取り出す。

(2)
http://www.example.com/test1/test2/test3/ の場合
http://www.example.com/test1/test2/test3/ を取り出す。


(3)
http://www.example.com/test1/test2/test3 の場合
http://www.example.com/test1/test2/ を取り出す

---------------------------------------------------
dim i
dim output
path="http://www.example.com/test1/test2/test3.html"

for i=len(path) to 1 step -1
 if mid(path,i,1)="/" then
  outputstr=mid(path,1,i)
  WScript.echo outputstr
  WScript.quit
 end if
next




スポンサード リンク

[VBScript FAQ トップへ]
[FAQ CENTER トップ]





(ご注意) 本サイト内の内容を使用して発生したいかなる時間的損害、金銭的損害あるいはいかなる損害に対して、いかなる人物も一切の責任を負いません。あくまでも個人の判断で使用してください。
本サイト内掲載されている情報は、著作権法により保護されています。いかなる場合でも権利者の許可なくコピー、配布することはできません。
このページはリンクフリーです。(このページへの直接リンクも可能です。)
雑誌等での紹介は特に連絡は不要です。
Copyright(c) tooljp.com 2007-2014