Server 对象错误 'ASP 0178 : 80070005' Server.CreateObject 访问错误 tiaozhuan.asp，行 14 检查权限时_备孕

进控制面板-组件服务-计算机-我的电脑-DCOM配置-Microsoft Excel Application

安全选项中将三个单选项一律选择自定义，编辑中将Everyone加入所有权限

浓眉大眼慈眉善目气宇轩昂高大魁梧英姿飒爽

衣着得体一表人才风度翩翩 衣冠楚楚 青面獠牙

貌比潘安秀色可餐膀大腰园披头散发相貌堂堂

闭月羞花沉鱼落雁大腹便便虎背熊腰尖嘴猴腮

贼眉鼠眼眉清目秀容光焕发美如冠玉出水芙蓉

冰肌玉骨冰清玉洁明眸皓齿道貌岸然国色天香

粉白黛黑靡颜腻理傅粉施朱婀娜多姿亭亭玉立

雾鬓风鬟鹤发童颜鹤发鸡皮短小精悍面黄肌瘦

面如土色面红耳赤面有菜色蓬头垢面囚首垢面

蓬头历齿鸠形鹄面铜筋铁骨肠肥脑满骨瘦如柴

药店飞龙披头散发

二、分类描写人类外貌的词语

头发

披肩长发柔软的头发齐眉的刘海秃头（没有头发）

白发苍苍头发乌润头发稀疏

眼睛

大眼睛忽闪忽闪乌溜溜的眼珠眼睛布满血丝会说话的眼睛慈祥的目光明亮的眼睛凶狠的目光眼睛眯成一条缝

眉青目秀炯炯有神华语网（原大汉民族）

鼻子

高鼻梁鹰钩鼻酒糟鼻蒜头鼻朝天鼻塌鼻梁

又遍又平的鼻子又高又直的鼻子尖尖的鼻子

宽鼻阔嘴

嘴

樱桃小嘴抿着小嘴血盆大口尖嘴猴腮厚嘴唇薄嘴唇

嘴唇苍白唇如胭脂唇无血色齿白唇红

牙

参差不齐的牙齿白而发亮的牙齿

咬紧牙关满口银牙青面獠牙

面容

苹果脸瓜子脸鹅蛋脸长方脸四方脸

俊美的脸丑陋的脸清瘦的脸满脸憔悴一脸稚气古铜色的脸黑里透红的脸红扑扑的脸布满皱纹的脸

脸色苍白愁眉苦脸嬉皮笑脸面黄肌瘦满脸雀斑面如桃花面如土色天庭饱满脸颊绯红面目可憎油头粉面面不改色心不跳

手

十指尖尖纤纤素手粗壮的大手

身材

身材矮小身材苗条身材丰腴体态轻盈身材臃肿佝偻着身子身强力壮虎背熊腰膀阔腰圆

肌腱发达腰板挺直彪形大汉大腹便便脑满肠肥身材高挑亭亭玉立袅袅婷婷弱不禁风瘦骨嶙峋瘦骨如柴短小精悍

〔衣着〕

朴素大方整洁时髦摩登讲究笔挺邋遢俗气

穿戴整齐衣冠楚楚穿红戴绿衣着入时珠光宝气花枝招展衣衫不整

不修边幅破破烂烂袒臂露肩衣不蔽体赤身裸体一丝不挂

第二部分

(男)好词: 剑眉平头方脸歪嘴英俊健壮壮实时兴笔挺穿着穿戴打扮合适服饰装饰朴素土气新颖洋气雅致梳妆注释观赏游玩辅导打量朝气热情委婉谦虚挖苦夸耀感激安慰狡猾机智得意满意郁闷烦恼火气恼火失落消沉 胡渣子宽额头减下巴飞毛腿鸭蛋脸鹅蛋脸娃娃瓜子脸水汪汪水灵灵圆溜溜滴溜溜骨碌碌细眯眼脸 （1）描写人物外貌的成语： 一表人才、风度翩翩，大腹便便，膀大腰园、披头散发、虎背熊腰、衣冠楚楚、相貌堂堂 （2）描写人物动作的成语： 身手敏捷、风驰电掣，动如脱兔，举目眺望、大步流星、昂首挺胸，手舞足蹈、张牙舞爪、 （3）描写人物神态的成语： 呆若木鸡、目瞪口呆、神采奕奕、全神贯注、聚精会神，眉飞色舞、张口结舌、挤眉弄眼、眉开眼笑、目不转晴 （4）描写人物心情的成语：举棋不定，忐忑不安、心急如焚、七上八下、六神无主、心神不定 心情词语：兴高采烈、喜出望外、欢天喜地、炎冒三丈、怒气冲天、垂头丧气、无精打采、闷闷不乐、欢天喜地、欢蹦乱跳 神态词语：聚精会神、全神贯注、目不转睛、闭目养神、得意洋洋 外貌词语：眉清目秀、面色苍白、白发苍苍、面黄肌瘦、衣冠楚楚 动作词语：指手划脚、手忙脚乱、手舞足蹈、七手八脚、摇头晃脑 品格词语：舍己为人、见义勇为、大公无私、不屈不饶、顽强不屈 〔头发〕 白发苍苍满头银发两鬓染霜头发乌润蓬松的短发头发稀疏 满头青丝披肩长发柔软的头发齐眉的刘海披头散发蓬头垢面 〔眼睛〕 丹凤眼三角眼斜白眼斗鸡眼细眯眼单眼皮双眼皮眉青目秀 浓眉打眼明眸皓齿眉梢细长火眼金睛炯炯有神大眼睛忽闪忽闪 乌溜溜的眼珠眼睛布满血丝会说话的眼睛慈祥的目光明亮的眼睛 目光锐利目光迟钝凶狠的目光眼睛眯成一条缝眼泡浮肿 〔鼻子〕 蒜头鼻鹰钩鼻酒糟鼻朝天鼻塌鼻梁又遍又平的鼻子 又高又直的鼻子尖尖的鼻子宽鼻阔嘴 〔嘴、牙〕 樱桃小嘴血盆大口尖嘴猴腮抿着小嘴厚嘴唇薄嘴唇嘴唇苍白 唇如胭脂唇无血色齿白唇红参差不齐的牙齿白而发亮的牙齿 咬紧牙关满口银牙 〔面容〕 苹果脸瓜子脸鹅蛋脸长方脸四方脸俊美的脸丑陋的脸清瘦的脸 满脸憔悴一脸稚气古铜色的脸黑里透红的脸红扑扑的脸 布满皱纹的脸脸色苍白愁眉苦脸嬉皮笑脸面黄肌瘦满脸雀斑 面如桃花面如土色天庭饱满脸颊绯红面目可憎油头粉面面不改色脸“刷”地一下白了脸“腾”地一下红了 〔手、身材〕 十指尖尖纤纤素手粗壮的大手身材矮小身材苗条身材丰腴 体态轻盈身材臃肿佝偻着身子身强力壮虎背熊腰膀阔腰圆 肌腱发达腰板挺直彪形大汉大腹便便脑满肠肥身材高挑 亭亭玉立袅袅婷婷弱不禁风瘦骨嶙峋瘦骨如柴短小精悍 〔衣着〕 朴素大方整洁时髦摩登讲究笔挺邋遢俗气穿戴整齐 衣冠楚楚穿红戴绿衣着入时珠光宝气花枝招展衣衫不整不修边幅破破烂烂袒臂露肩衣不蔽体赤身裸体一丝不挂 [神态〕 庄重端庄安闲安详恬静文雅镇静沉着诚挚憨厚恳切 潇洒妩媚羞涩腼腆严厉冷酷坚毅傲慢疲惫沮丧失神 诧异发愣尴尬踌躇容光焕发英姿勃勃精神矍铄精神抖擞 生龙活虎威风凛凛英姿飒爽风度翩翩热情洋溢热情奔放温文尔雅文质彬彬和蔼可亲和颜悦色心平气和平心静气悠然自得毕恭毕敬从容不迫泰然自若津津有味若无其事不露声色面红耳赤面有赧颜无精打彩郁郁寡欢闷闷不乐局促不安垂头丧气精疲力竭风尘仆仆气喘吁吁呆若木鸡瞠目结舌哑口无言交头接耳笨头笨脑疯疯癫癫凶神恶煞杀气腾腾装腔作势盛气凌人龇牙咧嘴神气十足傲慢无礼神气活现趾高气扬咄咄逼人目空一切不屑一顾目中无人旁若无人冷眼旁观贼头贼脑鬼鬼祟祟半信半疑不知所措漫不经心心不在焉怅然若失垂涎三尺死皮赖脸缩手缩脚丑态百出 心情词语：兴高采烈、喜出望外、欢天喜地、炎冒三丈、怒气冲天、垂头丧气、无精打采、闷闷不乐、欢天喜地、欢蹦乱跳 神态词语：聚精会神、全神贯注、目不转睛、闭目养神、得意洋洋 外貌词语：眉清目秀、面色苍白、白发苍苍、面黄肌瘦、衣冠楚楚 动作词语：指手划脚、手忙脚乱、手舞足蹈、七手八脚、摇头晃脑 品格词语：舍己为人、见义勇为、大公无私、不屈不饶、顽强不屈 描写人物外貌的成语： 一表人才、风度翩翩，大腹便便，膀大腰园、披头散发、虎背熊腰、衣冠楚楚、相貌堂堂 描写人物动作的成语： 身手敏捷、风驰电掣，动如脱兔，举目眺望、大步流星、昂首挺胸，手舞足蹈、张牙舞爪、 描写人物神态的成语： 呆若木鸡、目瞪口呆、神采奕奕、全神贯注、聚精会神，眉飞色舞、张口结舌、挤眉弄眼、眉开眼笑、目不转晴 描写人物心情的成语：举棋不定，忐忑不安、心急如焚、七上八下、六神无主、心神不定 描写人物神态的成语： 呆若木鸡、目瞪口呆、神采奕奕、全神贯注、聚精会神，眉飞色舞、张口 心情词语：喜出望外、欢天喜地、怒气冲天、垂头丧气、无精打采、闷闷不乐 神态词语：聚精会神、全神贯注、闭目养神、得意洋洋 外貌词语：眉清目秀、面色苍白、白发苍苍、面黄肌瘦、衣冠楚楚 动作词语：指手划脚、手忙脚乱、手舞足蹈、七手八脚、摇头晃脑 品格词语：舍己为人、见义勇为、大公无私、不屈不饶、顽强不屈腰、衣冠楚楚、相貌堂堂 （2）描写人物动作的成语： 身手敏捷、风驰电掣，动如脱兔，举目眺望、大步流星、昂首挺胸，手舞足蹈、张牙舞爪、 （3）描写人物神态的成语： 呆若木鸡、目瞪口呆、神采奕奕、全神贯注、聚精会神，眉飞色舞、张口结舌、挤眉弄眼、眉开眼笑、目不转晴 （4）描写人物心情的成语：举棋不定，忐忑不安、心急如焚、七上八下、六神无主、心神不定 心情词语：兴高采烈、喜出望外、欢天喜地、炎冒三丈、怒气冲天、垂头丧气、无精打采、闷闷不乐、欢天喜地、欢蹦乱跳 神态词语：聚精会神、全神贯注、目不转睛、闭目养神、得意洋洋 外貌词语：眉清目秀、面色苍白、白发苍苍、面黄肌瘦、衣冠楚楚 动作词语：指手划脚、手忙脚乱、手舞足蹈、七手八脚、摇头晃脑 品格词语：舍己为人、见义勇为、大公无私、不屈不饶、顽强不屈 〔头发〕 白发苍苍满头银发两鬓染霜头发乌润蓬松的短发头发稀疏 满头青丝披肩长发柔软的头发齐眉的刘海披头散发蓬头垢面 〔眼睛〕 丹凤眼三角眼斜白眼斗鸡眼细眯眼单眼皮双眼皮眉青目秀 浓眉打眼明眸皓齿眉梢细长火眼金睛炯炯有神大眼睛忽闪忽闪 乌溜溜的眼珠眼睛布满血丝会说话的眼睛慈祥的目光明亮的眼睛 目光锐利目光迟钝凶狠的目光眼睛眯成一条缝眼泡浮肿 〔鼻子〕 蒜头鼻鹰钩鼻酒糟鼻朝天鼻塌鼻梁又遍又平的鼻子 又高又直的鼻子尖尖的鼻子宽鼻阔嘴 〔嘴、牙〕 樱桃小嘴血盆大口尖嘴猴腮抿着小嘴厚嘴唇薄嘴唇嘴唇苍白 唇如胭脂唇无血色齿白唇红参差不齐的牙齿白而发亮的牙齿 咬紧牙关满口银牙 〔面容〕 苹果脸瓜子脸鹅蛋脸长方脸四方脸俊美的脸丑陋的脸清瘦的脸 满脸憔悴一脸稚气古铜色的脸黑里透红的脸红扑扑的脸 布满皱纹的脸脸色苍白愁眉苦脸嬉皮笑脸面黄肌瘦满脸雀斑 面如桃花面如土色天庭饱满脸颊绯红面目可憎油头粉面面不改色脸“刷”地一下白了脸“腾”地一下红了 〔手、身材〕 十指尖尖纤纤素手粗壮的大手身材矮小身材苗条身材丰腴 体态轻盈身材臃肿佝偻着身子身强力壮虎背熊腰膀阔腰圆 肌腱发达腰板挺直彪形大汉大腹便便脑满肠肥身材高挑 亭亭玉立袅袅婷婷弱不禁风瘦骨嶙峋瘦骨如柴短小精悍 〔衣着〕 朴素大方整洁时髦摩登讲究笔挺邋遢俗气穿戴整齐 衣冠楚楚穿红戴绿衣着入时珠光宝气花枝招展衣衫不整不修边幅破破烂烂袒臂露肩衣不蔽体赤身裸体一丝不挂 [神态〕 庄重端庄安闲安详恬静文雅镇静沉着诚挚憨厚恳切 潇洒妩媚羞涩腼腆严厉冷酷坚毅傲慢疲惫沮丧失神 诧异发愣尴尬踌躇容光焕发英姿勃勃精神矍铄精神抖擞 生龙活虎威风凛凛英姿飒爽风度翩翩热情洋溢热情奔放温文尔雅文质彬彬和蔼可亲和颜悦色心平气和平心静气悠然自得毕恭毕敬从容不迫泰然自若津津有味若无其事不露声色面红耳赤面有赧颜无精打彩郁郁寡欢闷闷不乐局促不安垂头丧气精疲力竭风尘仆仆气喘吁吁呆若木鸡瞠目结舌哑口无言交头接耳笨头笨脑疯疯癫癫凶神恶煞杀气腾腾装腔作势盛气凌人龇牙咧嘴神气十足傲慢无礼神气活现趾高气扬咄咄逼人目空一切不屑一顾目中无人旁若无人冷眼旁观贼头贼脑鬼鬼祟祟半信半疑不知所措漫不经心心不在焉怅然若失垂涎三尺死皮赖脸缩手缩脚丑态百出 心情词语：兴高采烈、喜出望外、欢天喜地、炎冒三丈、怒气冲天、垂头丧气、无精打采、闷闷不乐、欢天喜地、欢蹦乱跳 神态词语：聚精会神、全神贯注、目不转睛、闭目养神、得意洋洋 外貌词语：眉清目秀、面色苍白、白发苍苍、面黄肌瘦、衣冠楚楚 动作词语：指手划脚、手忙脚乱、手舞足蹈、七手八脚、摇头晃脑 品格词语：舍己为人、见义勇为、大公无私、不屈不饶、顽强不屈 描写人物外貌的成语： 一表人才、风度翩翩，大腹便便，膀大腰园、披头散发、虎背熊腰、衣冠楚楚、相貌堂堂 描写人物动作的成语： 身手敏捷、风驰电掣，动如脱兔，举目眺望、大步流星、昂首挺胸，手舞足蹈、张牙舞爪、 描写人物神态的成语： 呆若木鸡、目瞪口呆、神采奕奕、全神贯注、聚精会神，眉飞色舞、张口结舌、挤眉弄眼、眉开眼笑、目不转晴 描写人物心情的成语：举棋不定，忐忑不安、心急如焚、七上八下、六神无主、心神不定 回答者：草摩梦铃 - 见习魔法师二级 6-4 15:54 描写人物神态的成语： 呆若木鸡、目瞪口呆、神采奕奕、全神贯注、聚精会神，眉飞色舞、张口 心情词语：喜出望外、欢天喜地、怒气冲天、垂头丧气、无精打采、闷闷不乐 神态词语：聚精会神、全神贯注、闭目养神、得意洋洋 外貌词语：眉清目秀、面色苍白、白发苍苍、面黄肌瘦、衣冠楚楚 动作词语：指手划脚、手忙脚乱、手舞足蹈、七手八脚、摇头晃脑 品格词语：舍己为人、见义勇为、大公无私、不屈不饶、顽强

分类: 电脑/网络 >>程序设计 >>其他编程语言

问题描述:

高手们，帮帮忙看一下啦！！

Microsoft VBScript 运行时错误错误 '800a0009'

下标越界: 'i'

Cart_List文件部分代码如下

url=request.servervariables("_referer")

ProdIds = Session("ProdIds")

ProdNums = Session("ProdNums")

call up("购物车状态","购物车状态","购物车状态")

response.write "<tr>"

response.write " <td>"

response.write " <table border=1 width=100% cellpadding=4 style='border-collapse: collapse' bordercolor=#DFDFDF>"

response.write "<tr bgcolor=#f2f2f2><td>商品名称</td><td>市场价</td><td>网站价</td><td>订购数量</td><td>小计</td><td>删除</td></tr>"

response.write "<form action=Cart_List method=post name=form1 onsubmit=return CheckFrom()>"

response.write "<input type=hidden name=cmdShow value=Yes>"

if ProdIds<>"" then

aaa=split(ProdNums,",")

bbb=split(ProdIds,",")

pbuynums=Request("pbuynums")

Quatitys=split(Request("pbuynums"),",")

session("y")=ubound(bbb)+1

for i=0 to ubound(bbb)

set rs=server.createobject("adodb.recordset")

sql="select id,product_info_PriceM,product_info_PriceS,Shop_name from product where id="&bbb(i)

rs.open sql,conn,1,1

if rs.eof or rs.bof then

response.write "<tr><td colspan=6 align=center><a href='javascript:history.go(-1)'><<购物车为空，请返回选购商品</a></td></tr>"

else

set id=rs(0)

set product_info_PriceM=rs(1)

set RMB=rs(2)

set product_info_name=rs(3)

While Not rs.EOF

Quatity = Quatitys(i)

If Quatity <>"" Then

x=Quatity

else

x=aaa(i)

if aaa(i)="" then x=1

end if

sum1=sum1 + csng(rmb) * x

sum=FormatNumber(sum1,2,-1)

session("sum")=sum

response.write "<tr>"

response.write " <td><input type=hidden name=mc value="&id&"><a href=Product_Detail?id="&id&" target=_blank>"&Shop_name&"</a></td>"

response.write " <td>￥"&FormatNumber(product_info_PriceM,2,-1)&"</td>"

response.write " <td>￥"&FormatNumber(Rmb,2,-1)&"</td>"

response.write " <td><input name=pbuynums value="&x&" size=5 maxlength=5></td>"

response.write " <td>￥"&FormatNumber((csng(rmb)*x),2,-1)&"</td>"

response.write " <td><a href=Cart_Del?MyAction=Del&id="&id&">删除</a></td>"

response.write "</tr>"

rs.MoveNext

Wend

end if

rs.close

set rs=nothing

解析:

有问题的部分：

aaa=split(ProdNums,",")

bbb=split(ProdIds,",")

问题：你能保证 aaa、bbb 通过 Split 函数分割出来的数组下标完全一致？若不一致因该在调用前检查一下，问题就出现在这里。

调试:

Response.Write aaa &" " &bbb

Response.End

这样输出一下 aaa、bbb 值看看是否正确。

修改：

你没给出发生错误的位置，我根据代码推断因该是以下代码发生错误：

x=aaa(i)

if aaa(i)="" then x=1

这段代码改为

If i >UBound(aaa) Then

x = 1

ElseIf aaa(i) = "" Then

x = 1

Else

x = aaa(i)

End If

欢迎分享，转载请注明来源：优选云

原文地址:https://54852.com/hy/533071.html

Server 对象 错误 'ASP 0178 : 80070005' Server.CreateObject 访问错误 tiaozhuan.asp，行 14 检查权限时

随机推荐

发表评论

Server 对象错误 'ASP 0178 : 80070005' Server.CreateObject 访问错误 tiaozhuan.asp，行 14 检查权限时