字符串比较失败vbscript

Question

我有这样的代码

<html>
<head>
    <title></title>
</head>
<body>
    <%
        Function GetGUID()
            GetGUID = CreateObject("Scriptlet.TypeLib").GUID
        End Function

        if Request.ServerVariables("REQUEST_METHOD") = "POST" then
            if session("token") = cstr(Request.Form("csrftoken")) then
                response.write("Same")
            else
                response.write("different")
            end if

        else
            dim token
            token = GetGUID()
            session("token")=token
        end if
    %>
    <form method="post" action="test.asp">
        <input type="text" name="nama" placeholder="Input name">
        <input type="submit" value="submit">
        <input type="hidden" value="<%= session("token") %>" name="csrftoken">
    </form>
</body>
</html>

但是当我单击提交按钮时，总是会打印不同的内容。我非常确定这些变量（会话和 csrftoken）具有相同的值，因为我已经通过打印这些变量进行了检查。

更新

感谢大家的帮助，问题已经解决。这是因为 GUID 返回以 null 结尾的字符串。 作为参考，您可以在此处查看：Link。感谢 Lankymart 的参考:)

Answer 1

不要问我为什么，但是CreateObject("Scriptlet.TypeLib").GUID 末尾有 2 个字符，当将其作为post 推送时不知何故丢失了。我会在发现更多信息后立即更新此答案，但现在，您可以通过根据请求变量的长度制作会话变量的left 来比较所有“真实”字符。像这样：

    if left(session("token"), len(Request.Form("csrftoken"))) = Request.Form("csrftoken")then

另外：您可以使用trim 代替cstr。它暗示cstr 并修剪字符串。

编辑： 所以“为什么”部分在@Lankymart 链接的问题中得到了回答。谢谢！