Foxtable(狐表)用户栏目专家坐堂 → [求助][讨论]有没有什么办法将表内的数据列自动输入到打开的页面中对应的表里


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

主题:[求助][讨论]有没有什么办法将表内的数据列自动输入到打开的页面中对应的表里

帅哥哟,离线,有人找我吗?
jjjeyes
  1楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:305 积分:2695 威望:0 精华:0 注册:2011/10/29 16:26:00
[求助][讨论]有没有什么办法将表内的数据列自动输入到打开的页面中对应的表里  发帖心情 Post By:2019/6/20 21:38:00 [显示全部帖子]

我做了一个小软件,可以用来登记统计学生成绩。此软件的数据并没有和学校的教务系统数据库相连。
但是,我们学校的教务系统有个缺陷,不能将成绩批量导入,只能人工对照后一个个手动输入。
所以想有没有什么办法,将我自己做的软件内的数据列,与学校教务系统中的网页上的学号列,相互比对后对号入座的将成绩输入到网页上。
求教

 回到顶部
帅哥哟,离线,有人找我吗?
jjjeyes
  2楼 | QQ | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:小狐 帖子:305 积分:2695 威望:0 精华:0 注册:2011/10/29 16:26:00
  发帖心情 Post By:2019/6/21 0:01:00 [显示全部帖子]

Dim web As System.Windows.Forms.WebBrowser = e.Form.controls("webbrowser1").basecontrol

Dim Inputs = web.Document.GetElementById("login2").GetElementsByTagName("input")
For Each Input As object In Inputs
    If Input.id = "inputid" Then
        Input.SetAttribute("value", "abc")
    ElseIf input.id = "inputPassword"
        Input.SetAttribute("value", "123")
    ElseIf Input.id = "btnQyyhdl" Then
        'Input.InvokeMember("click")
    End If
Next

试过原文件可以正常填写用户名“abc”和密码“123”到输入框,但是换了我的网页就不能实现以上的功能。
查看过网页的源代码,但还是没有搞清楚,请问以上红色代码的意义!

 回到顶部