如何获取网页中的某个文本框的焦点?

来源:百度知道 编辑:UC知道 时间:2024/05/17 04:24:58
Private Sub Command8_Click()
Dim IEList As New ShellWindows
Dim Doc
Dim iewin As New ShellWindows
Dim ietemp As InternetExplorer

On Error Resume Next
'遍历当前地浏览器窗口
For Each ietemp In iewin
'找到需要地IE窗口
If ietemp.hWnd = hWnd1 Then
Set Doc = ietemp.document
'填写用户名字段

Doc.body.All("ti").Click '请通过修改这一段达到目标
'填写密码字段
End If
Next
Timer2.Enabled = True
Form1.Visible = False
End Sub

不是内部的WEB控件,而是直接激活外部的网站的文本对话框焦点
不知道你回答干什么?
句柄什么的的都已经获取了,只需要指定焦点

不明白我的问题就不要回答,你是白痴吗?激活外部的网站的文本对话框焦点,你取Value干什么?

记得某API可以指定当前的焦点,可以用此方法搞定。假如需要获得对象的句柄,可以尝试FindWindow……

PS:很久没玩VB了,基本忘光了,而且我API方面是菜鸟……

为什么不

Doc.getElementById("ti").Value = "baidu kuangzu"

(好像是 Doc.getElementsByTagName("ti").Value = "baidu kuangzu",记不清了)

前面的代码偶学习了~谢谢

回lz

“不明白我的问题就不要回答”为什么?
正是因为没弄明白你的问题所以才要向你确认,弄清问题,看帮不帮的上忙

“不知道你回答干什么?”弄清问题,看帮不帮的上忙

“你是白痴吗”不是

“激活外部的网站的文本对话框焦点,你取Value干什么?”哦,抱歉,这是我理解错了
但接下来“'填写密码字段”为什么不直接填写(俺的理解)?

用 .focus

这回理解对了吧,难道还差一个bringwindowtotop?