rprt.net
当前位置:首页 >> vB 打开worD文件提示“对象变量或WITH块变量未设置” 程序如下 >>

vB 打开worD文件提示“对象变量或WITH块变量未设置” 程序如下

这里对象又不是只有一个,不说清楚点1 检查一下文本框名有没有写错的2 在建立数据源连接时,有个测试按钮,测试一下能不能连接成功3 字段索引是不是从1开始啊?如果是adodclogin.recordset.fields(3) = "customer" 出错的话,那应该从0开始.

就是变量没有定义啊,或者有的变量没有设置新的实例(New) ,仔细检查一下 with 什么? 找一下哪个对象在你的程序里有没有,比如with adodc1.recordset 你就要找一下有没有adodc1

在VB菜单:工程->引用 里面找 Microsoft ActiveX Data Object 2.8 Library,并勾选上

这你贴我这段程序中 一看这 If rtl = "true" Then 好像这句有错误 改为If rtl = true Then试试 你又没说的清楚点错误提示

对象变量或with块变量未设置 可能是你的网页还没加载完毕,找不到tangram__psp_8__username这个元素 你可以试一下加载网页在一个按钮,然后填表在另外一个按钮,先加载网页,等待网页加载完成后再填表(也可以判断下网页加载完成自动填表).如果还是这个错误的话就表示此网页没有这个元素.刚看了下tangram__psp_8__username是有的

在一个函数里面的静态变量就是这个函数反复调用的过程中,他的内容一直都是持续的,例如,上一次调用这个函数,这个函数把静态变量a设置为2了,下次再调用这个函数,就会发现a仍然是2

Dim frmaddhistory As 历史消息 Set frmaddhistory = New 历史消息 这两块有问题.

你的代码是复制过去的吧,有的语句一看就是错的,比如说关于用户名的那段,"用户名不能为空"后面text1获得焦点后面的if语句,你拉了value,这句应该这样写if option1.value=false and 同理,我用手机发的就不给你写了,还有代码里有些对象名你看看你对应的控件的name属性是不是一一对应,不是的话就会出错,哪怕你代码写对了,运行时也毫无反应,你好好看看吧,其实我并不赞成你这样写代码,复杂不说,也不好找,连接库,就把连接代码写上,不要定义什么变量了,反而容易出错,验证用户名密码的正确用个嵌套循环就行,外循环可以用do loop until 控制查询,内循环用if表判断 希望对你有帮助

可能的情况1 rs1无数据2 确认数据库是否有 “本级编号” “种类” 这些字段,字别写错了,3 是否有null数据把断点设在 这里 Do While rs1.EOF = False看能不能正常运行到那

很可能是你的自定义函数 ExecuteSQL当前返回的是nothing也许你会说不可能,至少它会返回eof=true的ADODB.RECORDSET.但是,我之前就遇到过这种情况.这可能是一个bug吧.如果满意我的回答,请采纳,谢谢!!

相关文档
网站首页 | 网站地图
All rights reserved Powered by www.rprt.net
copyright ©right 2010-2021。
内容来自网络,如有侵犯请联系客服。zhit325@qq.com