新手问字符串函数问题 - 编程论坛

爬爬虫2008-08-15 11:19

字符有相同输出但是不同编码吗？

更晕了，求高手指点。自己编个查字串GIF89a，一个个取字符比较。竟然遇到"G"不承认是"G"。高手救命啊！
    Function gifContent(OlePackage)
        dim tmpStr,i
        gifContent=0
        for i=1 to lenb(OlePackage)-6
            tmpStr=midb(OlePackage,i,1)
            if tmpStr="G" then
                tmpStr=midb(OlePackage,i,1)
                if tempStr="I" then
                    tmpStr=midb(OlePackage,i,1)
                    if tempStr="F" then
                        tmpStr=midb(OlePackage,i,1)
                        if tempStr="8" then
                            tmpStr=midb(OlePackage,i,1)
                            if tempStr="7" or tempStr="9"  then
                                tmpStr=midb(OlePackage,i,1)
                                if tempStr="a" then
                                    gifContent=i-6
                                end if
                            end if
                        end if
                    end if
                end if
            end if
            'if gifContent>0 then exit for
            if i=133 then
                response.write "<br>"&tmpstr                           '这句输出个G
                if tmpstr<>"G" then response.write "<br>"&"不等于"     '这句输出个不等于！
            end if
        next
    End Function