Foxtable(狐表) → 用户栏目 → 专家坐堂 → [求助]国税局增值税fa piao查询参数自动填写问题-已解决


  共有4909人关注过本帖树形打印复制链接

主题：[求助]国税局增值税fa piao查询参数自动填写问题-已解决
帅哥哟，离线，有人找我吗？
shenyl0211
 小大  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：977 积分：6835 威望：0 精华：0 注册：2012/4/2 21:49:00 		[求助]国税局增值税fa piao查询参数自动填写问题-已解决  发帖心情 Post By：2018/11/22 10:20:00 [显示全部帖子]

1、下面是来自甜版的例子：http://www.foxtable.com/bbs/dispbbs.asp?BoardID=2&ID=120985&skin=0
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:网页例子.table
2、fa piao查询的默认值是“开具金额”：

图片点击可在新窗口打开查看此主题相关图片如下：默认状态.png
图片点击可在新窗口打开查看
3、点击“输入参数”按钮后，文本框右边并没有出现手工输入并按回车键后的对钩符号：

图片点击可在新窗口打开查看此主题相关图片如下：2345截图20181122102046.png
图片点击可在新窗口打开查看
4、“fa piao代码”和“fa piao号码”只有按回车键后才出现对钩符号：
图片点击可在新窗口打开查看此主题相关图片如下：2345截图20181122102151.png
图片点击可在新窗口打开查看
5、如果“fa piao代码”是12位，则要求输入“校验码”，而不是默认的“开具金额”：

图片点击可在新窗口打开查看此主题相关图片如下：2345截图20181122102441.png
图片点击可在新窗口打开查看
6、输入“fa piao代码”后有一定的停顿时间，以判断是输入“开具金额”还是“校验码”。
7、“校验码”的文本框ID是什么？或者说，怎么获取。例如前面的fpdm、fphm、kprq、kjje。
谢谢！





[此贴子已经被作者于2018/11/23 13:54:25编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
shenyl0211
 小大  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：977 积分：6835 威望：0 精华：0 注册：2012/4/2 21:49:00 		  发帖心情 Post By：2018/11/22 11:02:00 [显示全部帖子]

校验码的Id是什么？

 回到顶部
帅哥哟，离线，有人找我吗？
shenyl0211
 小大  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：977 积分：6835 威望：0 精华：0 注册：2012/4/2 21:49:00 		  发帖心情 Post By：2018/11/22 12:45:00 [显示全部帖子]

谢谢甜版，获取Id问题已经解决。
但这样的帮助页面标题和具体内容确实与解决本问题的思路不符，应该开设专门章节进行详细讲解，让非专业人员也能轻松应对，这才符合狐表的出发点。
[此贴子已经被作者于2018/11/22 13:38:23编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
shenyl0211
 小大  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：977 积分：6835 威望：0 精华：0 注册：2012/4/2 21:49:00 		  发帖心情 Post By：2018/11/22 13:41:00 [显示全部帖子]

为什么必须点击两次“填入数据”按钮才能填入“校验码”？
但如果中间插入MessageBox.Show(0)则可以一次性填入
Dim web As System.Windows.Forms.WebBrowser = e.Form.controls("webbrowser1").basecontrol
web.ScriptErrorsSuppressed = True
Dim fpdm = web.Document.GetElementById("fpdm")
Dim fphm = web.Document.GetElementById("fphm")
Dim kprq = web.Document.GetElementById("kprq")
Dim kjje = web.Document.GetElementById("kjje")
Dim yzm_img = web.Document.GetElementById("yzm_img")
fpdm.SetAttribute("value", "044001600111")
fphm.SetAttribute("value", "45372505")
kprq.SetAttribute("value", "20180603")
fpdm.focus
fphm.focus
’MessageBox.Show(0)
kjje.SetAttribute("value", "214592")
yzm_img.InvokeMember("click")
[此贴子已经被作者于2018/11/22 13:43:53编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
shenyl0211
 小大  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：977 积分：6835 威望：0 精华：0 注册：2012/4/2 21:49:00 		  发帖心情 Post By：2018/11/22 14:03:00 [显示全部帖子]

目前只能加入一句可以自动关闭的提示，反正什么也不影响：
MessageBoxTimeout(BaseMainForm.Handle,"请稍候……", "提示", vbOKonly, 0, 1000)
 回到顶部
帅哥哟，离线，有人找我吗？
shenyl0211
 小大  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：977 积分：6835 威望：0 精华：0 注册：2012/4/2 21:49:00 		  发帖心情 Post By：2018/11/23 10:29:00 [显示全部帖子]

奇怪！
甜版：
    1、直接用固定数值（就是你的例子）的时候，能马上自动出现验证码图片；
    2、直接从表格取值（这是现实需要）的时候，就不会自动出现验证码图片；
    3、在2的基础上加上MessageBox.Show，或MessageBoxTimeout，就与1一样了。
 下载信息  [文件大小：   下载次数： ]
图片点击可在新窗口打开查看点击浏览该文件:网页例子.table



[此贴子已经被作者于2018/11/23 10:31:12编辑过]
 回到顶部
帅哥哟，离线，有人找我吗？
shenyl0211
 小大  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：977 积分：6835 威望：0 精华：0 注册：2012/4/2 21:49:00 		  发帖心情 Post By：2018/11/23 10:55:00 [显示全部帖子]

9楼就是实例

 回到顶部
帅哥哟，离线，有人找我吗？
shenyl0211
 小大  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：977 积分：6835 威望：0 精华：0 注册：2012/4/2 21:49:00 		  发帖心情 Post By：2018/11/23 11:05:00 [显示全部帖子]

    上传9楼实例时出现一个问题：
    9楼实例是商业版格式，我关闭商业版后添加附件、上传附件，执行了2次都提示上传成功，但因上传时开发版并没有关闭，所以，实际上并没有上传成功，等到关闭开发版后上传才真正成功。
    这种情况是否不应该出现？
 回到顶部
帅哥哟，离线，有人找我吗？
shenyl0211
 小大  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级：四尾狐 帖子：977 积分：6835 威望：0 精华：0 注册：2012/4/2 21:49:00 		  发帖心情 Post By：2018/11/23 13:54:00 [显示全部帖子]

谢谢甜版，辛苦了。
我觉得还是用7楼的，快！也不影响什么。
 回到顶部
RSS2.0 | Xhtml无图版 | Xslt无图版 Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号
   Powered By Dvbbs Version 8.3.0
页面执行时间 0.04688 秒, 7 次数据查询