在编写asp时提示出现无效字符，不知道怎么回事？

Microsoft VBScript 编译器错误 错误 '800a0408'

无效字符

/is_name.asp，行 9

if InStr（“abcdefghijklmnopqrstuvwxyz_”,c）<=0 And (Not IsNumeric(c) then   'InStr函数可以返回指定字符在某一字符串中首次出现的位置

源代码：
<%
 '用户名规则判定函数
 function is_name(name)
     Dim  i,c
 is_name=true
 For i=1 to len(name)
      c1=Lcase(Mid(name),i,1)         'Mid函数可以从字符串的指定位置返回制定数目的字符，这里它逐个从字符串变量name中返回字符
                                 'Lcase函数可以将大写字母转换为小写字母
  if InStr（“abcdefghijklmnopqrstuvwxyz_”,c）<=0 And (Not IsNumeric(c) then   'InStr函数可以返回指定字符在某一字符串中首次出现的位置
     is_name=false
 exit function
 end if
 
Next
end function
%>

不知哪位大侠可以帮忙解答 asp vbscript --------------------编程问答-------------------- if InStr（"abcdefghijklmnopqrstuvwxyz_”,c）<=0 And (Not IsNumeric(c)) then   

补充：VB ,  网络编程