Office中国论坛/Access中国论坛

标题: 如何把ACCESS表格中的内容自动填充到网页的相应空格中呢？ [打印本页]

作者: fatmingli 时间: 2013-9-3 10:52
标题: 如何把ACCESS表格中的内容自动填充到网页的相应空格中呢？
我公司有一内部网办公软件，是网页版的，里面需要填写二十几项内容，但这些内容都保存在另一个办公软件的ACCESS的表格中，能不能做个ACCESS小软件，把ACCESS表格中的内容自动填充到网页的相应空格中呢？
请教各样，可以做到吗？具体的思路请详细介绍一下吧。
谢谢

作者: access学习交流 时间: 2013-9-3 12:44
那是因为Access是作为数据库吧！本来就是在网页中填写内容再保存到数据库中的，你这是要反过来了？做一个Access小软件，那还要网页版干嘛呢？你好像还没有搞清楚数据到时是要显示还是要输入

作者: ynjxw 时间: 2013-9-3 14:25
理论上是可以的。

作者: fatmingli 时间: 2013-9-3 15:11

ynjxw 发表于 2013-9-3 14:25
理论上是可以的。

如何把理论实现啊？

作者: gnoy 时间: 2013-9-3 16:56
这很容易处理的，当然说是很难说清楚的，主要方法如下：

弄个窗体，加个webbrowser控件，在页面加载完事件中对document相关对象赋值

作者: ynjxw 时间: 2013-9-3 17:10

fatmingli 发表于 2013-9-3 15:11
如何把理论实现啊？

至少要有个例子吧

作者: cgsilicone 时间: 2013-9-3 17:18
本帖最后由 cgsilicone 于 2013-9-3 17:28 编辑

还可以采用如下办法：
Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Declare Function BringWindowToTop Lib "user32" (ByVal hwnd As Long) As Long
BringWindowToTop FindWindow(vbNullString, "要填表的浏览器窗口标题栏文字")
SendKeys "要填的内容 ", True

作者: chaosheng 时间: 2013-9-3 17:35
找个键盘鼠标操作录制变脚本的软件, 然后重复执行录制的脚本.

不然就直接把数据提交到那软件的数据库里. 办公软件,数据库应该不会太复杂吧.

作者: chaosheng 时间: 2013-9-4 20:11
差点忘了这个.
最可行的方法是用XMLHTTP编程:

set oxh=createobject("Microsoft.XMLHTTP")
postdata="name1=value1&name2=value2&......" '注意这行按form来写
oxh.Open "post",url,false
oxh.setRequestHeader "Content-Length",len(postdata)
oxh.setRequestHeader "CONTENT-TYPE", "application/x-www-form-urlencoded"
oxh.send postdata

作者: ynjxw 时间: 2013-9-5 10:41
填写本论坛账号、密码例子
      Set IE = CreateObject("InternetExplorer.application")
      IE.Visible = True
      IE.Navigate "http://www.office-cn.net/forum.php"
      While IE.ReadyState <> 4
         DoEvents
      Wend
      With IE.Document
         .all("username").Value = "cjks"
         .all("password").Value = "123456"
      End With

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)