Private Sub Command1_Click()
Dim IE As Object
Set IE = CreateObject("InternetExplorer.Application")
IE.Navigate2 "D:\1.html"
IE.Visible = True
j = App.Path + "\Capture_2.jpg"
'j的值是D:\capture_2.jpg IE.document.All.upfile.focusEnd Sub
1.html代码
<html>
<body>
<form>
<INPUT TYPE=FILE NAME=upfile></Input>
</form>
</body>
</html>
有没有办法把变量j赋给1.html中的那个框框,我是想,有没有办法把j中的值进行一次复制,在进行focus指定框框,然后在进行一次粘贴。请问各位高手们要怎么做?
Dim IE As Object
Set IE = CreateObject("InternetExplorer.Application")
IE.Navigate2 "D:\1.html"
IE.Visible = True
j = App.Path + "\Capture_2.jpg"
'j的值是D:\capture_2.jpg IE.document.All.upfile.focusEnd Sub
1.html代码
<html>
<body>
<form>
<INPUT TYPE=FILE NAME=upfile></Input>
</form>
</body>
</html>
有没有办法把变量j赋给1.html中的那个框框,我是想,有没有办法把j中的值进行一次复制,在进行focus指定框框,然后在进行一次粘贴。请问各位高手们要怎么做?
解决方案 »
- 为VB6开源而散分
- 关于创建VPN时参数的问题
- 请问 “Public Function ParseTab(ByVal T$, v%) As String” 是什么意思呀?
- 怎样将数据库中的信息打印到固定的表格上啊,就像银行的存款单那样,有固定的表格了,用电脑添单怎么做啊?有高手吗?有例子程序吗?
- 关于设置DATAGRID空间单元格里的内容的问题,搞不懂,郁闷中……
- 请众位高手推荐几个关于Visual Basic 的好站点 THX
- 最后100分了。谁答对给谁。绝不失言!!!!!
- 网线通讯
- RegSetValueEx(lonSubkeyHandle, "xyz", 0, REG_BINARY, XXXX, 4)???
- 如何通过串行端口传输和接收浮点数。
- 请教ADO访问有密码的Excel文件
- 请教高手用WebBrowser写了个网络浏览器,但是后来发现每次点击网页上的新连接后,打开的还是ie的新窗口,而不是小弟自编的浏览器,
这个客户端的东西是无法赋值的