1

スクリプトは現在、URL 全体 (/default.html を含む) を追加しています。私が変更しようとしているのは、URL の最後の部分です。default.html (基本的には URL のファイル名部分) を削除したいと思います。

基本的に、変更したいコードのこの部分は次のとおりです。

if matches = 1 Then
    Response.Redirect( urlLink ) //Would like to add new code here to change url that is passed
end if
4

1 に答える 1

1

これを試して:

Dim url
url = Mid(urlLink, 1, InStrRev(urlLink, "/"))

urlLink 変数に実際に「/」文字があることを確認するには、次のようにします。

If InStr(urlLink, "/") > -1 Then
    Dim url
    url = Mid(urlLink, 1, InStrRev(urlLink, "/"))
End If

これは元の URL を取得し、最後の「/」文字が見つかるまで読み取ります。

于 2013-04-19T20:16:10.663 に答える