プログラムで苦戦中

いままでの経験を生かしてとある業界のクチコミサイトを作成中。
デザインはほぼ完成して、久しぶりにプログラムを書いています。

メンテナンスしやすく、被リンクを受けやすく、
URLは短く（インデックスをされやすく）、
広告枠も販売しやすい（広告主も魅力的な）サイトを目指しています。

プログラムはコピペをベースに必要なところだけ調べて
書いているので、基本的なところが抜けていたりして苦戦中です。
で、さっき苦労していたのがこれ。
------
ASPで現在（自分自身のいる）のフォルダ名を取得

Set fs = CreateObject("Scripting.FileSystemObject")
Set fo = fs.GetFolder(Server.MapPath("./"))
Folder_nm=fo.name
------