我想检查地址是否以asp。{/ p>中的http://www.youtube.com开头
如果我有这样的东西
if rs("mainVideoName")="http://www.youtube.com*" then
这不起作用,我怎么能这样做?
谢谢!
答案 0 :(得分:12)
试试这个:
Function UrlStartsWith(string1, string2)
UrlStartsWith = InStr(1, string1, string2, 1) = 1
End Function
If UrlStartsWith(rs("mainVideoName"), "http://www.youtube.com") Then
End If
使用IntStr
进行测试并确保它返回1作为搜索字符串的起始位置。由于您正在测试URL,因此上面的代码使用TextCompare对case进行不敏感。
答案 1 :(得分:2)
您可以使用InStr()
功能:
Dim positionOfMatchedString
positionOfMatchedString= InStr(rs("mainVideoName"),"http://www.youtube.com")
If positionOfMatchedString > 0 Then
// Do your stuff here
End If
正如安东尼所指出的,这告诉你string2在string1中是包含。你可以把它写成:
If positionOfMatchedString = 1 Then
以开头检查。
答案 2 :(得分:1)
怎么样......
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