vbscript - 检查字符串是否“以”另一个字符串开头

Question

我想检查一个地址是否以http://www.youtube.com开头。

如果我有这样的事情

if rs("mainVideoName")="http://www.youtube.com*" then

这不起作用，那我该怎么做呢？

Answer 1

尝试这个：

 Function UrlStartsWith(string1, string2)
     UrlStartsWith = InStr(1, string1, string2, 1) = 1
 End Function

 If UrlStartsWith(rs("mainVideoName"), "http://www.youtube.com") Then


 End If

Starts with 通过使用IntStr并确保它返回 1 作为找到搜索字符串的起始位置进行测试。由于您正在测试 URL，因此上面的代码使用 TextCompare 来区分大小写。

Answer 2

您可以为此使用该InStr()功能：

Dim positionOfMatchedString 
positionOfMatchedString= InStr(rs("mainVideoName"),"http://www.youtube.com")

If positionOfMatchedString > 0 Then
  // Do your stuff here
End If

正如 Anthony 指出的那样，这告诉您 string2包含在 string1 中。你可以把它写成：

If positionOfMatchedString = 1 Then

从 .开始检查它。

Answer 3

怎么样...

Dim s: s = "http://www.youtube.com"
Dim l: l = Len(s)

If Left(rs("mainVideoName"), l) = s Then
    ' String begins with URL part '        
End If