VB程序员博客

VB程序开发

如题
背景可以透明的
除了png

GIF的现实效果很差<
又要背景可以透明的,又要显示图片最快,不要png,也就是gif了.无语innnnnnnnggif不错啊。
楼主要求很高?代开各行业【増直/鐠通】漂据。
另批发/零售仿真度可达90%以上各品牌香烟,如中华、黄鹤楼1916、芙蓉王、南京95至尊、白沙(和天下)、苏烟、玉溪、利群、双喜、世纪经典等。
如有意,请联系Q:1145553117。  手机:13544123356、金先生


各位,我做了个小浏览器。现在让它的右上角加上一个图片,怎样实现当正在打开网站时,它就动起来,网站打开完毕就静止不动?
就像IE右上角的那个图片一样,各位高手请赐教,小菜谢过了~~放上一个Flash控件,加载一个小动画.flash
gif
或者放一个imagelist,存入单帧的图像,定时轮流显示。具体怎么搞,还是不懂啊~~能否给个简单的具体实例~~谢了!^_^|-/


http://www.gzjd.gov.cn/gzwfcx/hnisijsp/jtwfcx/wfchx.jsp这个页面的验证码部分(红色四位数随机字母数字)做得很特别,好像是一个text类型的框,但不能输入,它的id="checkCode",如果类型是text,且知道name的就可以获取它的值也即value,但这个验证码出来晚点,所以在WebBrowser1_DocumentComplete完成后还没显示,但我现在关键是即使显示完成了,我也不能获取它的值,所以想延时一下获取都不行,能否通过它的createCode函数,得到它的checkCode.value?高手们帮帮忙了。这个验证码竟然可以复制粘贴,好弱弱的验证码啊。我顶一下。

厉害!马上结贴!


我用WebBrowser,监视网页里的一个元素并替换,我现在用的方法是在DocumentComplete里操作,但是有个缺点:有些网页打开后,整个页面基本都显示出来,但是还有一些小元素没完全下载下来,所以没触发DocumentComplete事件(或者偶尔要等比较长的时间才触发),所以想请教有更好的方法么?

监视1个固定的网址

因为网页内容比较多,所以要触发DocumentComplete的时间稍微长点,偶尔碰到一些网页元素可能要下载很久,所以导致要很久才触发DocumentComplete,但是基本的页面都打开了的

比如我要 屏蔽  www.163.com 里的一些广告,不会要等整个页面都装载完毕再去屏蔽吧?

这样出现的效果是:页面没完全打开的时候,看得到广告,等页面打开完毕后,广告才消失ⷂ𗂷

这种效果不理想哦ⷂ𗼯
顶一下ⷂ𗂷ⷂ𗂷ⷂ𗂷ⷂ𗂷ⷂ𗼯


我用WebBrowser,监视网页里的一个元素并替换,我现在用的方法是在DocumentComplete里操作,但是有个缺点:有些网页打开后,整个页面基本都显示出来,但是还有一些小元素没完全下载下来,所以没触发DocumentComplete事件(或者偶尔要等比较长的时间才触发),所以想请教有更好的方法么?

监视1个固定的网址

因为网页内容比较多,所以要触发DocumentComplete的时间稍微长点,偶尔碰到一些网页元素可能要下载很久,所以导致要很久才触发DocumentComplete,但是基本的页面都打开了的

比如我要 屏蔽  www.163.com 里的一些广告,不会要等整个页面都装载完毕再去屏蔽吧?

这样出现的效果是:页面没完全打开的时候,看得到广告,等页面打开完毕后,广告才消失ⷂ𗂷

这种效果不理想哦ⷂ𗼯
顶一下ⷂ𗂷ⷂ𗂷ⷂ𗂷ⷂ𗂷ⷂ𗼯


我用WebBrowser,监视网页里的一个元素并替换,我现在用的方法是在DocumentComplete里操作,但是有个缺点:有些网页打开后,整个页面基本都显示出来,但是还有一些小元素没完全下载下来,所以没触发DocumentComplete事件(或者偶尔要等比较长的时间才触发),所以想请教有更好的方法么?

监视1个固定的网址

因为网页内容比较多,所以要触发DocumentComplete的时间稍微长点,偶尔碰到一些网页元素可能要下载很久,所以导致要很久才触发DocumentComplete,但是基本的页面都打开了的

比如我要 屏蔽  www.163.com 里的一些广告,不会要等整个页面都装载完毕再去屏蔽吧?

这样出现的效果是:页面没完全打开的时候,看得到广告,等页面打开完毕后,广告才消失ⷂ𗂷

这种效果不理想哦ⷂ𗼯
顶一下ⷂ𗂷ⷂ𗂷ⷂ𗂷ⷂ𗂷ⷂ𗼯


百度空间现在好像不能保存网页了吧?也就是另存为(全部*html,*htm)到百分之多少就停住了,我试过一个软件叫网文任我存,可以将网页通过在浏览器的右键里添加到“保存全部网页 到 网文任我存”它保存后将网页的整个格式都保存了下来,文字还可以编辑修改,并不是一张图片,当然它也有保存成一个图片的功能,等记录多了之后,还能将这些记录做成电子书,分chm格式和exe两种格式,我就觉得它这个保存成网页格式的技术挺厉害,不知道怎么做的,在vb中不知道能不能用web浏览器控件来做成这个效果。我也想知道,up能。目前只想到一种很麻烦的方法。

用API下。。麻烦的方法是不是复制到word再另存为html。顶一下,不行明天就结了。<
<


http://bestopview.com/showtp.asp?code=600001&date=091222
我想保存600001的图片,但无法用右键,求教方法,谢谢!!!

试试是不是每次打开时内容会变:

上面的图片好象不是“实时行情”。

不知这个如何:

Chen8013:

我还是不行,我的IE为7.05730等一会儿,鼠标移到图的左上角有保存菜单出现现在证实 3F 的图片是“实时行情”。


输入地址 http://www.0797123.com/index.asp
看到的是下图,未登陆的页面

使用用户名和密码登陆后看到下图

问题: 想用vb做程序,下载此网页,提取信息编号、信息内容和发布时间.
用普通的方法保存源代码(见下面的方法一、二),得到的都不是图2表中的数据,还有别的方法吗?
方法一:WebBrowser1.Document.body.innerHTML
方法二:WebBrowser1.Document.All(0).outerHTML

目前用vb做程序,用WebBrowser控件已经实现自动登陆到图2的状态,因该网页有框架,如何保存该网页为源代码?
只要能保存网页源代码,那提取信息编号、信息内容等信息不成问题. 不一定非得用WebBrowser,用别的方法能解决也行。
平日都是替别人解决问题,今剑也有问题,
望大家都来帮忙,提供思路或代码,剑将感激之至……

我的邮箱:lpfdxx@qq.com
如有意,请和我联系,可以提供测试用户名和密码,如果谁能解决我的问题,我还可以付一定报酬(人民币,邮件中可商量).
拒绝灌水!换个控件。How much money?

帮顶…..这个需要了解dthml,可以通过frames访问
http://blog.csdn.net/sysdzw/archive/2009/08/19/4463844.aspx哈哈,经过阿泰的指点已经顺利解决了,谢谢阿泰,
同时也谢谢sysdzw,下面这个帖子变成了散分帖,心里真是痛快…….

因是技术帖,请大家来接分时,顺便谈一下下载源代码的效率问题,用inet、webbrowser或是别的方式哈哈,经过阿泰的指点已经顺利解决了,谢谢阿泰,
同时也谢谢sysdzw,下面这个帖子变成了散分帖,心里真是痛快…….

因是技术帖,请大家来接分时,顺便谈一下下载源代码的效率问题,用inet、webbrowser或是别的方式用 XMLHTTP 下源码很快,代码也简单的多。
    Set X = CreateObject("Microsoft.XMLHTTP")
    URL = "http://xxx.xxx.xxx"
    X.Open "GET", URL, False
    X.send
    Dim b() As Byte
    b = X.responseBody

取到二进制数组,然后随便你蹂躏了 ,可以创建多个XMLHTTP 对象,分别对不同页面同时下载,
(居然是多线程,这么简单就实现了,但不是VB的,是XMLHTTP 的多线程,就像同时打开多个浏览器窗口一样)

附:
自编的网页分析小工具,简单实用
http://club.excelhome.net/viewthread.php?tid=377077&?fromuid=26992
自编的网页分析小工具,简单实用
http://club.excelhome.net/viewthread.php?tid=377077&?fromuid=26992 这么快就结贴了,还想要个测试帐号试试来。

一般要截取字串的我用inet,比如天气预报等。

其它的需要生成页面的用webbrowser,不过inet处理字串会有个编码造成乱码的问题。我是来接分的。<
只用过WebBrowser1和DOMDocument 的
试了下inet,貌似不怎么样


+' <td id=menu8 align="center" nowrap="nowrap" width=83> <span color="#082d71" onclick="javascript:ActionHandle(2355703,8);" onmouseover="this.style.cursor='hand';"> <font color="#082d71">&nbsp;管理 </font> </span> </td>'

请问题用VB怎么触发点击如上代码“管理”链接谢谢!!!没有人回答吗?
引用MSHTML,遍历到这个连接对象,调用这个对象的click()方法<
dim objDoc  as mshtml.htmldocument
dim objLink  as mshtml.htmllinkelement

'取得文档对象接口
set objdoc=WebBrowser1.document

'遍历所有连接
for each objlink in objdoc.links
    if instr(1,objlink.tostring,"管理") then
        objlink.click()
        exit for
    endif
next没有用哦,算了。
自已找别人办法,谢谢你们啊