专家坐堂-页面提示：传递数据失败，GetValues问题，845个字符，是不是太长了，导致的？Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

-- 页面提示：传递数据失败，GetValues问题，845个字符，是不是太长了，导致的？

For Each key As String In e.GetValues.Keys

If key = "wupxx" Then

wupxx = e.GetValues(key)

wupxx = DecryptText(wupxx,"a","b") \'解密

Values_wupxx = wupxx.Split("|")

End If

If wupxx = "" Then

With wb.AddDialog("","dlg5", "传递数据失败","将前往首页!") ’访问后，这个弹窗显示了

.AddButton("btnn5-1","确定","/index.htm")

\'.Attribute = "style=\'padding:0.5em;\'"

End With

wb.AppendHTML("<script>show(\'dlg5\')</script>")

e.WriteString(wb.Build) \'生成网页

e.Handled = True \'通知系统异步函数执行完毕,可以关闭信道

Return "" \'必须的

End If

网页链接：wupxx后面845个字母，是不是太多了吗？字符数量有限制吗？

http://www.lang.com/details.htm?wupxx=lbnZTp+aPFuZPYvUP7GAo7DrC4qc2+su/pQkhwJBfTYjcMeYApIQ+pz6CTiMpEcl5EcoVsneVxknfhj5GhMAzGDnrfaX9uSUmx4kFnziQFsqayH9IZshs59AI5IKOQnsA7gXuZVSdchVoxWKI+AJVJi6tAMLp/BuGTL73q2rB/L/R+EUsgnQDQkPqcDnZRWVHe3IGrIUcvQQ/LcUkZERG3STAH++wTLlXE3uh6VRJOhKHXhvx7rO06Aga9GiquQ9SCw7i4++uk0pnqhX95JPzYMFZEj8YUkkAM4ZknviTJLqzytGEM5DexhJy+lR8gAD3fKanTCyekDguh8Z85OhpTac3bSSX0KhtyNGWr5FZAa+I33GDVIIWfbEwyiYFjPx/CqfTZ717C5/MtkxCjm5Bj0aYbiZnQ2yCfV9GbSRBnRJNgM3LPHyBb6MUGJ1hA+efQzs+8sGz42IyhJszh4ybmM1CrVs89TTDAO9yK0/WZcbGfsnywg2GEzQZx5QzhX0bQnDISBKJ/IaaGd8gs7/Js9+qtBXwZPTiSgOOQ0d+W5DcjHYQrUYVnI3d6kugambg2+v5h8bar0ZEk9gQnVHqDwZCes27y61T+vx9GHZ0vUSwg6TKLs1efEtFYygCiyQIXKukAwNrmIQ9dxrY0H9OwVO1wv59xPQkpKnmhBwxbsBwXTqnfkCayf9k/yzc6iPLIVWZjW0nOlW5u31BCpjST79VuKV8RZ9dZuHuHjieZi4JFWFyyAIbIHbjUJONJZBYYwR+kK8nzahBTwG7Kn0F1EahlGT8xDR3VZhGp9apwx8h4FMldoM6kj7Svn8NHJXTgeuWyZvCqk=

改成短字符，依然不行：

此主题相关图片如下：111.png

[此贴子已经被作者于2020/8/27 17:19:24编辑过]