100分求解这里代码哪出错了

tonyones 2009-10-31 08:58:51
<%@LANGUAGE="VBSCRIPT" %>
<%
Dim name,word,conn,rs,DBPath
name = Request("name")
word = Request("word")
DBPath = "abc.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.RecordSet")
On Error Resume Next
conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(DBPath)
If Err.Number <> 0 Then
Err.Clear
Set conn = Nothing
Response.Write("连接错误")
End If
rs.open "select * from abc where Name='" & name & "' and Word='" & word & "'",conn,1,1
If rs.recordcount=0 Then
response.write(name & "H" & word & "=flase")
Else
response.Write(name & "H" & word & "=true")
End If
rs.Close
set rs = Nothing
%>



如上是我根据网上查找的远程ASP连接ACCESS数据库查找相关条目是否存在的 aab.asp 文件里的代码,假设存放位置为http://www.abc.com/aab.asp ,我的abc.mdb 里的数据满足搜索下方搜索条件,就是说本来应该都是返回 true

我在电脑A 上VB里面编写 MsgBox Inet1.OpenURL("http://www.abc.com/aab.asp?name=测试一下&word=2")
发送后 返回值为 测试一下H2=true

但是在电脑B上(这台电脑没安装VB,只是用打包程序执行)同样程序运行后返回的值是 ??H2=flase

请问这是什么原因呢?是不是因为我的ASP文件上没申明接受什么类型的文字?比如UTF-8什么的,这些不太了解,麻烦高手指点下,谢谢
...全文
237 19 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
19 条回复
切换为时间正序
请发表友善的回复…
发表回复
白发程序猿 2009-11-02
  • 打赏
  • 举报
回复
ASP的不懂
红叶哥 2009-11-02
  • 打赏
  • 举报
回复
當發生("连接错误") ,就會出誤,改為:
If Err.Number <> 0 Then
Err.Clear
Set conn = Nothing
Response.Write("连接错误")
Else
rs.open "select * from abc where Name='" & name & "' and Word='" & word
If rs.recordcount=0 Then
response.write(name & "H" & word & "=flase")
Else
response.Write(name & "H" & word & "=true")
End If
rs.Close
End If

set rs = Nothing
Set conn = Nothing
booksoon 2009-11-02
  • 打赏
  • 举报
回复
顶帮~~~
luoxiang123 2009-11-02
  • 打赏
  • 举报
回复
在ASP文件中强制为GB2312类型
Alitech 2009-11-02
  • 打赏
  • 举报
回复
根据返回的结果值应该是PC字符集问题,可以强制为GB类型的,因为数据库字符集可能与客户端有所差异,ORacle经常会出项这种情况
舉杯邀明月 2009-11-02
  • 打赏
  • 举报
回复
再顶~~~~~~~~
getemail 2009-11-01
  • 打赏
  • 举报
回复
写在asp文件里

[Quote=引用 11 楼 tonyones 的回复:]
引用 7 楼 zzyong00 的回复:
指定一下 Response.Charset

请问 Response.Charset 是写在VB里呢还是写在asp文件里呢
[/Quote]
tonyones 2009-11-01
  • 打赏
  • 举报
回复
[Quote=引用 7 楼 zzyong00 的回复:]
指定一下 Response.Charset
[/Quote]
请问 Response.Charset 是写在VB里呢还是写在asp文件里呢
wuchuangam 2009-11-01
  • 打赏
  • 举报
回复
先顶~
舉杯邀明月 2009-10-31
  • 打赏
  • 举报
回复
友情Up...............
贝隆 2009-10-31
  • 打赏
  • 举报
回复
帮顶
goosen 2009-10-31
  • 打赏
  • 举报
回复
帮顶了
zzyong00 2009-10-31
  • 打赏
  • 举报
回复
指定一下 Response.Charset
getemail 2009-10-31
  • 打赏
  • 举报
回复
别着急
[Quote=引用 5 楼 tonyones 的回复:]
谢谢胡子帮顶,怎么都没人来了~~~在线等待中。。。。
[/Quote]
tonyones 2009-10-31
  • 打赏
  • 举报
回复
谢谢胡子帮顶,怎么都没人来了~~~在线等待中。。。。
getemail 2009-10-31
  • 打赏
  • 举报
回复
说不好,高度关注

[Quote=引用 3 楼 tonyones 的回复:]
引用 2 楼 getemail 的回复:
确定打包程序带上Inet了么?

恩,打包了的,而且我有发给2个人测试过,他们1个可以,1个不行,好像也都是XP系统
[/Quote]
tonyones 2009-10-31
  • 打赏
  • 举报
回复
[Quote=引用 2 楼 getemail 的回复:]
确定打包程序带上Inet了么?
[/Quote]
恩,打包了的,而且我有发给2个人测试过,他们1个可以,1个不行,好像也都是XP系统
getemail 2009-10-31
  • 打赏
  • 举报
回复
确定打包程序带上Inet了么?
getemail 2009-10-31
  • 打赏
  • 举报
回复
先顶后看
Algorithms   本次README修订为算法仓库Algorithms的第100次commit,首先我们庆祝自2016年8月4日本仓库建立以来Dev-XYS在算法学习方面取得的显著进步!   这里有各种算法的C++代码,任何人可以在自己的任何程序中使用,欢迎大家指出代码中的错误以及有待改进的地方。   本仓库内所有代码的授权方式为Unlicense,大家如果使用我的代码开发自己的软件挣了大钱,或是参考我的代码在NOI中得了金牌,我都会很高兴的。使用这里的代码之后,你可以自主选择是否公开源代码。总而言之,你可以把这里的代码当作你自己写的一样,无论怎样使用都是被允许的。但是,我不对本仓库内代码的正确性负责。大家要是使用我的代码开发软件而导致程序崩溃,或是参考我的代码在考试时出错,请不要向我抱怨。如果你愿意,遇到问题可以在Issues中提出来,我们共同解决。我们不赞成Pull Request,因为本仓库主要储存作者已经学习的算法,全部代码均由作者本人负责维护与更新。   以下索引提供了本仓库内算法的中文名,方便大家查找。更新可能有很长时间的延迟,不保证所有算法的名称都在列表中出现。 Index --------------------------Contents-------------------------- --------------------------FileName-------------------------- AC自动机 Aho-Corasick-Automation 单源最短路径(SPFA) Bellman-Ford(Queue-Optimised) 单源最短路径(Bellman-Ford) Bellman-Ford 使用Edmonds-Karp进行二图匹配 Bigrpah-Matching(Edmonds-Karp) 普通的二叉搜索树 Binary-Search-Tree 广度优先搜索 Breadth-First-Search 冒泡排序 Bubble-Sort 桶排序 Bucket-Sort 组合数的递推求解 Combination(Recursion) 枚举组合 Combination 基本的复数类 Complex-Number 割点 Cut-Vertex 深度优先搜索 Depth-First-Search 堆优化的Dijkstra算法 Dijkstra(Heap-Optimised) 并查集 Disjoint-Set-Union 最大流Edmonds-Karp算法 Edmonds-Karp 欧拉函数 Euler's-Totient-Function 有向图的欧拉回路 Eulerian-Tour(Digraph) 拓展欧几里得算法 Extended-Euclid 简单的快速幂 Fast-Exponentiation 树状数组 Fenwick-Tree 所有结点对之间的最短路径(Floyd) Floyd-Warshall 凸包算法(Graham扫描法) Graham-Scan 辗转相除法求最大公约数 Greatest-Common-Divisor 堆排序 Heap-Sort ISAP算法 Improved-Shortest-Augmenting-Path(Naive) 插入排序 Insertion-Sort 字符串匹配(KMP) Knuth-Morris-Pratt 最小生成树(Kruskal) Kruskal 最近公共祖先(Tarjan) Least-Common-Ancestor(Tarjan) 使用后缀数组求解最长公共子串 Longest-Common-Substring 最长上升子序列(n·log(n)) Longest-Increasing-Subsequence(n·log(n)) 倍增法求最近公共祖先 Lowest-Common-Ancestor(Doubling) 朴素的矩阵乘法 Matrix-Multiplication(Naive) 归并排序 Merge-Sort 最小堆 Min-Heap 乘法逆元 Modular-Multiplicative-Inverse 仅支持单点修改的可持久化线段树(维护区间和值) Persistent-Segment-Tree(Sum) 试除法素数测试 Prime-Check(Naive) 线性的素数筛法 Prime-Sieve(Linear) 队列的基本操作 Queue 快速排序的优化版本 Quick-Sort(Extra-Optimised) 快速排序的随机化版本 Quick-Sort(Randomized) 快速排序 Quick-Sort 使用向量叉积判断两个有向线段的时针关系 Segment-Direction 线段树维护区间最大值 Segment-Tree(Maximum) 线段树维护区间最小值 Segment-Tree(Minimum) 线段树维护区间和值 Segment-Tree(Sum) 普通的选择算法 Selection Eratosthenes素数筛法 Sieve-of-Erotosthenes 指针版的单向链表 Singly-Linked-List(Pointer) 跳表 Skip-List ST表 Sparse-Table 伸展树 Splay 博弈论SG函数 Sprague-Grundy 栈的基本操作 Stack 递推法求解无符号第一类斯特林数 Stirling-Number(Cycle,Unsigned,Recursion) 递推法求解第二类斯特林数 Stirling-Number(Subset,Recursion) 倍增法求解后缀数组 Suffix-Array(Doubling) 倍增法求解后缀数组(附带Height数组) Suffix-Array-with-Height(Doubling) 使用Tarjan算法求解强连通量 Tarjan(Strongly-Connected-Components) 数组版的字典树 Trie(Array) 指针版的字典树 Trie(Pointer)

7,785

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧