在本地测试Microsoft VBScript 编译器错误 '800a0400' 缺少语句 Microsoft VBScript 编译器错误 错误 '8...
Microsoft VBScript \u7f16\u8bd1\u5668\u9519\u8bef \u9519\u8bef '800a0400' \u7f3a\u5c11\u8bed\u53e5\u628a\u7b2c\u4e00\u884c\u5220\u6389\u8bd5\u8bd5,\u4f60\u7528\u7684\u662f\u672a\u7ecf\u7f16\u7801\u7684VBS\u660e\u6587\u4ee3\u7801,\u4f46\u4f60\u58f0\u660e\u7684\u662fVBScript.Encode
ActiveServerPages,ASP0126(0x80004005)-->\u627e\u4e0d\u5230\u5305\u542b\u6587\u4ef6
MicrosoftOLEDBProviderforODBCDrivers(0x80040E21)-->sql\u8bed\u53e5\u51fa\u9519(\u6570\u636e\u7c7b\u578b\u4e0d\u5339\u914d\u6216\u8868\u540d(\u5b57\u6bb5\u540d)\u9519\u8bef\u6216\u8868\u5904\u4e8e\u7f16\u8f91\u72b6\u6001\uff0c\u6216\u8868\u4e0d\u5b58\u5728\u4e8econn\u6253\u5f00\u7684\u6570\u636e\u5e93\u4e2d)
MicrosoftOLEDBProviderforODBCDrivers(0x80040E14)-->sql\u8bed\u53e5\u51fa\u9519(\u5b57\u6bb5\u540d\u9519\u8bef,\u6216\u6570\u636e\u7c7b\u578b\u4e0d\u5339\u914d)
MicrosoftOLEDBProviderforODBCDrivers(0x80040E07)-->sql\u8bed\u53e5\u51fa\u9519(\u8981\u63d2\u5165\u6216\u66f4\u65b0\u7684\u5b57\u6bb5\u7684\u7c7b\u578b\u4e0e\u53d8\u91cf\u6570\u636e\u7c7b\u578b\u4e0d\u5339\u914d)
MicrosoftOLEDBProviderforODBCDrivers(0x80040E57)-->sql\u8bed\u53e5\u51fa\u9519(\u8981\u63d2\u5165\u6216\u66f4\u65b0\u7684\u6570\u636e\u6ea2\u51fa)
MicrosoftOLEDBProviderforODBCDrivers(0x80040E10)-->sql\u8bed\u53e5\u51fa\u9519(update\u5b57\u6bb5\u540d\u6216\u8981\u66f4\u65b0\u7684\u6570\u636e\u7c7b\u578b\u9519\u8bef)
MicrosoftOLEDBProviderforODBCDrivers(0x80004005)-->sql\u8bed\u53e5\u51fa\u9519(\u8981\u63d2\u5165\u6216\u66f4\u65b0\u7684\u5b57\u6bb5\u7684\u6570\u503c\u4e0d\u80fd\u4e3a\u7a7a\u503c)
MicrosoftOLEDBProviderforODBCDrivers(0x80004005) -->\u6253\u5f00\u6570\u636e\u5e93\u51fa\u9519\uff0c\u6ca1\u6709\u5728\u6307\u5b9a\u76ee\u5f55\u53d1\u73b0\u6570\u636e\u5e93
MicrosoftOLEDBProviderforODBCDrivers(0x80040E37)-->\u6ca1\u6709\u53d1\u73b0\u8868
MicrosoftVBscript\u8fd0\u884c\u65f6\u9519\u8bef(0x800A000D)-->\u9519\u8bef\u5f15\u7528rs\u53d8\u91cf(rs\u5bf9\u50cf\u5df2\u5173\u95ed\u6216\u672a\u5b9a\u4e49)
MicrosoftVBscript\u8fd0\u884c\u65f6\u9519\u8bef(0x800A01C2)-->vbscript\u811a\u672c\u9519\u8bef(vbscript\u8bed\u53e5\u51fa\u9519)
MicrosoftVBscript\u8fd0\u884c\u65f6\u9519\u8bef(0x800A0006)-->vbscript\u811a\u672c\u9519\u8bef(\u6ea2\u51fa\u9519\u8bef)
MicrosoftVBscript\u7f16\u8bd1\u5668\u9519\u8bef(0x800A040E)-->\u7f3a\u5c11loop
MicrosoftVBscript\u7f16\u8bd1\u5668\u9519\u8bef(0x800A03EA)-->\u7f3a\u5c11if\u6216endif
MicrosoftVBscript\u7f16\u8bd1\u5668\u9519\u8bef(0x800A03EE)--> \u8bed\u53e5\u672a\u7ed3\u675f(\u7f3a\u5c11")")
MicrosoftVBscript\u7f16\u8bd1\u5668\u9519\u8bef(0x800A03F6)-->if\u8bed\u53e5\u51fa\u9519(\u7f3a\u5c11endif)
MicrosoftVBscript\u8fd0\u884c\u65f6\u9519\u8bef(0x800A005B)-->\u7f3a\u5c11set
MicrosoftVBscript\u8fd0\u884c\u65f6\u9519\u8bef(0x800A0005)-->\u53d8\u91cf\u672a\u5b9a\u4e49
MicrosoftVBscript\u7f16\u8bd1\u5668\u9519\u8bef(0x800A03F9)-->if\u8bed\u53e5\u7f3a\u5c11then
MicrosoftVBscript\u7f16\u8bd1\u5668\u9519\u8bef(0x800A0411)-->dim\u8bed\u53e5\u5b9a\u4e49\u9519\u8bef
MicrosoftVBscript\u7f16\u8bd1\u5668\u9519\u8bef(0x800A0408)-->sql\u8bed\u53e5\u9519\u8bef\uff08?????????????????)
Microsoft VBScript \u8fd0\u884c\u65f6\u9519\u8bef (0x800A01B6)\u9519\u8bef\u539f\u56e0\uff1aset rs=server.create......\u4f60\u5c11\u4e86 set
ADODB.Recordset(0x800A0BB9)-->sql\u8bed\u53e5\u51fa\u9519(sql\u8bed\u53e5\u6216conn\u8bed\u53e5\u672a\u5b9a\u4e49\u6216\u5bf9\u4e00\u4e2ars\u5c5e\u6027\u8fdb\u884c\u8d4b\u503c\u65f6\u53d1\u751f\u9519\u8bef)
ADODB.Recordset(0x800A0CC1)-->rs\u5bf9\u50cf\u51fa\u9519(rs\u5bf9\u50cf\u672c\u8eab\u4e0d\u5b58\u5728\u6216\u9519\u8bef\u5730\u5f15\u7528\u4e86\u4e00\u4e2a\u4e0d\u5b58\u5728\u7684\u5b57\u6bb5\u540d)
ADODB.Recordset(0x800A0BCD)-->rs\u5bf9\u50cf\u51fa\u9519(\u8bb0\u5f55\u96c6\u4e2d\u6ca1\u6709\u8bb0\u5f55\u5374\u5bf9\u8bb0\u5f55\u96c6\u8fdb\u884c\u64cd\u4f5c)
ADODB.Recordset(0x800A0E78)-->rs\u5bf9\u50cf\u51fa\u9519(\u8bb0\u5f55\u96c6\u4e0d\u5b58\u5728,\u7f3a\u5c11rs.open\u8bed\u53e5)
ADODB.Recordset(0x800A0CC1) -->rs\u5bf9\u50cf\u51fa\u9519(\u5f15\u7528\u4e86\u4e00\u4e2a\u4e0d\u5b58\u5728\u7684\u5b57\u6bb5\u540d)
ADODB.Recordset(0x800A0E7D)-->conn\u5b9a\u4e49\u9519\u8bef
ADODB.Recordset(0x800A0CB3)-->\u6570\u636e\u5e93\u4ee5\u53ea\u8bfb\u65b9\u5f0f\u6253\u5f00\uff0c\u65e0\u6cd5\u66f4\u65b0\u6570\u636e
\u5982\u679c VBScript \u8bed\u53e5\u7ed3\u6784\u8fdd\u53cd\u4e86\u4e00\u4e2a\u6216\u591a\u4e2a VBScript \u811a\u672c\u8bed\u8a00\u8bed\u6cd5\u89c4\u5219\uff0c\u5c31\u4f1a\u4ea7\u751f VBScript \u8bed\u6cd5\u9519\u8bef\u3002
\u9519\u8bef\u901a\u5e38\u5728\u6267\u884c\u7a0b\u5e8f\u524d\uff0c\u7f16\u8bd1\u7a0b\u5e8f\u65f6\u4ea7\u751f\u3002 \u4ee5\u4e0b\u662f53\u4e2a\u8bed\u6cd5\u9519\u8bef\uff1a
\u9519\u8bef\u7f16\u53f7 \u63cf\u8ff0
\u5341\u8fdb\u5236 \u5341\u516d\u8fdb\u5236 \u8bf4\u660e
1001 800A03E9 \u5185\u5b58\u4e0d\u8db3
1002 800A03EA \u8bed\u6cd5\u9519\u8bef
1003 800A03EB \u7f3a\u5c11\u201c\uff1a\u201d
1005 800A03ED \u9700\u8981 '('
1006 800A03EE \u9700\u8981 ')'
1007 800A03EF \u7f3a\u5c11\u201c]\u201d
1010 800A03F2 \u9700\u8981\u6807\u8bc6\u7b26
1011 800A03F3 \u9700\u8981 '='
1012 800A03F4 \u9700\u8981 'If'
1013 800A03F5 \u9700\u8981 'To'
1014 800A03F6 \u9700\u8981 'End'
1015 800A03F7 \u9700\u8981 'Function'
1016 800A03F8 \u9700\u8981 'Sub'
1017 800A03F9 \u9700\u8981 'Then'
1018 800A03FA \u9700\u8981 'Wend'
1019 800A03FB \u9700\u8981 'Loop'
1020 800A03FC \u9700\u8981 'Next'
1021 800A03FD \u9700\u8981 'Case'
1022 800A03FE \u9700\u8981 'Select'
1023 800A03FF \u9700\u8981\u8868\u8fbe\u5f0f
1024 800A0400 \u9700\u8981\u8bed\u53e5
1025 800A0401 \u9700\u8981\u8bed\u53e5\u7684\u7ed3\u675f
1026 800A0402 \u9700\u8981\u6574\u6570\u5e38\u6570
1027 800A0403 \u9700\u8981 'While' \u6216 'Until'
1028 800A0404 \u9700\u8981 'While,'\u3001 'Until,' \u6216\u8bed\u53e5\u672a\u7ed3\u675f
1029 800A0405 \u9700\u8981 'With'
1030 800A0406 \u6807\u8bc6\u7b26\u592a\u957f
1031 800A0407 \u65e0\u6548\u7684\u6570
1032 800A0408 \u65e0\u6548\u7684\u5b57\u7b26
1033 800A0409 \u672a\u7ed3\u675f\u7684\u4e32\u5e38\u91cf
1034 800A040A \u672a\u7ed3\u675f\u7684\u6ce8\u91ca
1037 800A040D \u65e0\u6548\u4f7f\u7528\u5173\u952e\u5b57 'Me'
1038 800A040E 'loop' \u6ca1\u6709 'do'
1039 800A040F \u65e0\u6548 'exit' \u8bed\u53e5
1040 800A0410 \u65e0\u6548 'for' \u5faa\u73af\u63a7\u5236\u53d8\u91cf
1041 800A0411 \u540d\u79f0\u91cd\u5b9a\u4e49
1042 800A0412 \u5fc5\u987b\u4e3a\u884c\u7684\u7b2c\u4e00\u4e2a\u8bed\u53e5
1043 800A0413 \u4e0d\u80fd\u8d4b\u7ed9\u975eByval\u53c2\u6570
1044 800A0414 \u8c03\u7528 Sub \u65f6\u4e0d\u80fd\u4f7f\u7528\u5706\u62ec\u53f7
1045 800A0415 \u9700\u8981\u6587\u5b57\u5e38\u6570
1046 800A0416 \u9700\u8981 'In'
1047 800A0417 \u9700\u8981 'Class'
1048 800A0418 \u5fc5\u987b\u5728\u4e00\u4e2a\u7c7b\u7684\u5185\u90e8\u5b9a\u4e49
1049 800A0419 \u5728\u5c5e\u6027\u58f0\u660e\u4e2d\u9700\u8981 Let , Set \u6216 Get
1050 800A041A \u9700\u8981 'Property'
1051 800A041B \u53c2\u6570\u6570\u76ee\u5fc5\u987b\u4e0e\u5c5e\u6027\u8bf4\u660e\u4e00\u81f4
1052 800A041C \u5728\u7c7b\u4e2d\u4e0d\u80fd\u6709\u591a\u4e2a\u7f3a\u7701\u7684\u5c5e\u6027/\u65b9\u6cd5
1053 800A041D \u7c7b\u521d\u59cb\u5316\u6216\u7ec8\u6b62\u4e0d\u80fd\u5e26\u53c2\u6570
1054 800A041E Property Let \u6216 Set \u81f3\u5c11\u5e94\u8be5\u6709\u4e00\u4e2a\u53c2\u6570
1055 800A041F \u4e0d\u9700\u8981\u7684 'Next'
1056 800A0420 \u53ea\u80fd\u5728 \u2018Property\u2019 \u6216 \u2019Function\u2019 \u6216 \u2019Sub\u2019 \u4e0a\u6307\u5b9a \u2019Default\u2019
1057 800A0421 \u8bf4\u660e 'Default' \u5fc5\u987b\u540c\u65f6\u8bf4\u660e 'Public' "
1058 800A0422 \u53ea\u80fd\u5728 Property Get \u4e2d\u6307\u5b9a 'Default'
VBScript \u8fd0\u884c\u65f6\u9519\u8bef
\u5982\u679c VBScript \u811a\u672c\u6267\u884c\u7cfb\u7edf\u65e0\u6cd5\u5b9e\u65bd\u7684\u64cd\u4f5c\uff0c\u5219\u4f1a\u4ea7\u751f VBScript \u8fd0\u884c\u65f6\u9519\u8bef\u3002\u53ea\u6709\u5728\u8fd0\u884c\u811a\u672c\u3001\u4e3a\u53d8\u91cf\u8868\u8fbe\u5f0f\u8d4b\u503c\u6216
\u5206\u914d\u5185\u5b58\u65f6\uff0c\u624d\u4f1a\u4ea7\u751f VBScript \u8fd0\u884c\u65f6\u9519\u8bef\u3002 \u4ee5\u4e0b\u662f65\u4e2a\u8fd0\u884c\u65f6\u9519\u8bef\uff1a
\u9519\u8bef\u7f16\u53f7 \u63cf\u8ff0
\u5341\u8fdb\u5236 \u5341\u516d\u8fdb\u5236 \u8bf4\u660e
5 800A0005 \u65e0\u6548\u8fc7\u7a0b\u8c03\u7528\u6216\u53c2\u6570
6 800A0006 \u6ea2\u51fa
7 800A0007 \u5185\u5b58\u4e0d\u8db3
9 800A0009 \u4e0b\u6807\u8d8a\u754c
10 800A000A \u8be5\u6570\u7ec4\u4e3a\u5b9a\u957f\u7684\u6216\u4e34\u65f6\u88ab\u9501\u5b9a
11 800A000B \u88ab\u96f6\u9664
13 800A000D \u7c7b\u578b\u4e0d\u5339\u914d
14 800A000E \u5b57\u7b26\u4e32\u7a7a\u95f4\u6ea2\u51fa
17 800A0011 \u65e0\u6cd5\u6267\u884c\u8bf7\u6c42\u7684\u64cd\u4f5c
28 800A001C \u5806\u6808\u6ea2\u51fa
35 800A0023 \u672a\u5b9a\u4e49 Sub \u6216 Function
48 800A0030 \u52a0\u8f7d DLL \u9519\u8bef
51 800A0033 \u5185\u90e8\u9519\u8bef
52 800A0034 \u574f\u6587\u4ef6\u540d\u6216\u6570
53 800A0035 \u6587\u4ef6\u672a\u627e\u5230
54 800A0036 \u574f\u6587\u4ef6\u6a21\u5f0f
55 800A0037 \u6587\u4ef6\u5df2\u7ecf\u6253\u5f00
57 800A0039 \u8bbe\u5907I/O\u9519\u8bef
58 800A003A \u6587\u4ef6\u5df2\u7ecf\u5b58\u5728
61 800A003D \u78c1\u76d8\u7a7a\u95f4\u5df2\u6ee1
62 800A003E \u8f93\u5165\u8d85\u51fa\u6587\u4ef6\u5c3e
67 800A0043 \u6587\u4ef6\u592a\u591a
68 800A0044 \u8bbe\u5907\u4e0d\u53ef\u7528
70 800A0046 \u6743\u9650\u7981\u7528
71 800A0047 \u78c1\u76d8\u672a\u51c6\u5907\u597d
74 800A004A \u4e0d\u80fd\u7528\u4e0d\u540c\u7684\u9a71\u52a8\u5668\u91cd\u65b0\u547d\u540d
75 800A004B \u8def\u5f84/\u6587\u4ef6\u8bbf\u95ee\u9519\u8bef
76 800A004C \u8def\u5f84\u672a\u627e\u5230
91 800A005B \u672a\u8bbe\u7f6e\u5bf9\u8c61\u53d8\u91cf
92 800A005C For \u5faa\u73af\u672a\u521d\u59cb\u5316
94 800A005E \u975e\u6cd5\u4f7f\u7528 Null
322 800A0142 \u4e0d\u80fd\u5efa\u7acb\u6240\u9700\u4e34\u65f6\u6587\u4ef6
424 800A01A8 \u9700\u8981\u5bf9\u8c61
429 800A01AD ActiveX \u90e8\u4ef6\u65e0\u6cd5\u521b\u5efa\u5bf9\u8c61
430 800A01AE \u7c7b\u4e0d\u652f\u6301\u81ea\u52a8\u5316
432 800A01B0 \u5728\u81ea\u52a8\u5316\u64cd\u4f5c\u4e2d\u672a\u627e\u5230\u6587\u4ef6\u540d\u6216\u7c7b\u540d
438 800A01B6 \u5bf9\u8c61\u4e0d\u652f\u6301\u8be5\u5c5e\u6027\u6216\u65b9\u6cd5
440 800A01B8 Automation\u9519\u8bef
445 800A01BD \u5bf9\u8c61\u4e0d\u652f\u6301\u6b64\u64cd\u4f5c
446 800A01BE \u5bf9\u8c61\u4e0d\u652f\u6301\u6307\u5b9a\u7684\u53c2\u6570
447 800A01BF \u5bf9\u8c61\u4e0d\u652f\u6301\u5f53\u524d\u7684\u533a\u57df\u8bbe\u7f6e
448 800A01C0 \u672a\u627e\u5230\u547d\u540d\u53c2\u6570
449 800A01C1 \u53c2\u6570\u4e0d\u53ef\u9009
450 800A01C2 \u9519\u8bef\u7684\u53c2\u6570\u4e2a\u6570\u6216\u65e0\u6548\u7684\u53c2\u6570\u5c5e\u6027\u503c
451 800A01C3 \u5bf9\u8c61\u4e0d\u662f\u4e00\u4e2a\u96c6\u5408
453 800A01C5 \u6307\u5b9a\u7684dll\u51fd\u6570\u672a\u627e\u5230
455 800A01C7 \u4ee3\u7801\u6e90\u9501\u9519\u8bef
457 800A01C9 \u8fd9\u4e2a\u952e\u5df2\u7ecf\u662f\u672c\u96c6\u5408\u7684\u4e00\u4e2a\u5143\u7d20\u5173\u8054
458 800A01CA \u53d8\u91cf\u4f7f\u7528\u4e86\u4e00\u4e2a VBScript \u4e2d\u4e0d\u652f\u6301\u7684\u81ea\u52a8\u5316\uff08Automation\uff09\u7c7b\u578b
462 800A01CE \u8fdc\u7a0b\u670d\u52a1\u5668\u4e0d\u5b58\u5728\u6216\u4e0d\u80fd\u8bbf\u95ee
481 800A01E1 \u65e0\u6548\u56fe\u7247
500 800A01F4 \u53d8\u91cf\u672a\u5b9a\u4e49
501 800A01F5 \u8fdd\u6cd5\u7684\u5206\u914d
502 800A01F6 \u811a\u672c\u5bf9\u8c61\u4e0d\u5b89\u5168
503 800A01F7 \u5bf9\u8c61\u4e0d\u80fd\u5b89\u5168\u521d\u59cb\u5316
504 800A01F8 \u5bf9\u8c61\u4e0d\u80fd\u5b89\u5168\u521b\u5efa
505 800A01F9 \u65e0\u6548\u7684\u6216\u4e0d\u5408\u683c\u7684\u5f15\u7528
506 800A01FA \u7c7b\u672a\u88ab\u5b9a\u4e49
507 800A01FB \u53d1\u751f\u5f02\u5e38
5016 800A1398 \u9700\u8981\u6b63\u5219\u8868\u8fbe\u5f0f\u5bf9\u8c61
5017 800A1399 \u6b63\u5219\u8868\u8fbe\u5f0f\u4e2d\u7684\u8bed\u6cd5\u9519\u8bef
5018 800A139A \u9519\u8bef\u7684\u6570\u91cf\u8bcd
5019 800A139B \u5728\u6b63\u5219\u8868\u8fbe\u5f0f\u4e2d\u9700\u8981 ']'
5020 800A139C \u5728\u6b63\u5219\u8868\u8fbe\u5f0f\u4e2d\u9700\u8981 ')'
5021 800A139D \u5b57\u7b26\u96c6\u8d8a\u754c
32811 800A802B \u5143\u7d20\u672a\u627e\u5230
以上的这种注释是在HTML之中使用的，而在ASP之中注释应该是英文状态下的单引号或rem:
只要改成以下：
'<!-- 修改信任网址-->
或改成以下：
rem <!-- 修改信任网址-->
或者直接去掉就行！
把第5行的内容删除，
<!-- 修改信任网址-->
此种注释方式不是用于脚本中，而是Html代码中。
在<%与%>之间的代码属于脚本代码,你上面的代码是VBS语法,注释语句也应该使用VBS的注释方法,即以一个单引号开头.不能在VBS代码中混用HTML注释,VBS脚本引擎不能识别这种注释.
扩展阅读：office安卓版免费版下载 ... windows永久免费下载软件 ... microsoft手机app下载 ... microsoft365永久免费 ... 微软24小时人工电话 ... office个人永久免费版 ... microsoftstore下载软件 ... office365永久免费 ... 永久免费版office办公软件 ...
