摆摊上架的代码。 // by tiandi for trade system #include <ansi.h> inherit F_CLEAN_UP; string value_string(int value) { if( value < 1 ) value = 1; else if( value < 100 ) return ch...
快乐风云2的交易系统trade.c源码
仿照网游的交易系统设计: // by tiandi for trade system #include <ansi.h> inherit F_CLEAN_UP; int main(object me, string arg) { if( me->is_fighting() ) return notify_fail(&...
屏蔽webbrowser的script error
用silent = true 来暂时禁止弹出框 需要设置在downloadbegin和complete中,其它地方会无效. 文章评分1次,平均分5.0:★★★★★
VB制作多窗口浏览器(5)–收藏夹
添加收藏夹,管理收藏夹都有函数,但是浏览收藏夹的函数我没有找到,获取也有.收藏夹就是一个目录,只要读取目录下的文件再做处理也是可以实现的,这里我只做到了二级目录的分析,并且二级...
vb制作简单的多窗口浏览器(4) –移除窗口
让我们继续讨论移除页的过程,移除页就是一个先移除WEBBROWSER控件,再设置TAB为不可见的过程.起初是想尝试做移除的TAB的效果,结果失败,为什么要移除WEBBROWSER呢,SET 不可见不行吗?当然这也是可...
vb制作简单的多窗口浏览器(3) — 新建窗口
制作到现在碰到的最大的难点在于SSTAB这个东西上,我的多窗口的做法是在每一个SSTAB.TAB上生成一个WEBBROWSER,当然,这个webbrowser先定义成控件组.这样就形成了一个sstab.tab(i)对应一个webbrowser(i),做...
vb制作简单的多窗口浏览器(2)– form初始化
框架都搭好了,现在开始主要是代码了. 先定义变量 '一共打开多少页 Dim totalpage As Integer '当前页 Dim activepage As Integer Dim i As Integer '删除了多少页 Dim delfla...
vb制作简单的多窗口浏览器(1)
之前由于做自动考勤的时候接触到了webbrowser这个东西,于是打算进行更深入一点的操作.制作一个简单的VB多窗口浏览器. 普通的VB浏览器网上有太多的资料了.如果想知道用VB做浏览器的基础知...
[转]VB 中文转utf-8的函数 ,应用于搜索引擎
Public Function UTF8Encode(ByRef szString As String) As String Dim szChar As String Dim szTemp As String Dim szCode As String Dim szHex ...
webbrowser控件组的小问题
添加webbrowser控件组的时候index As Integer一定要写在括号的最前位置,如下: Private Sub WebBrowser1_ProgressChange(index As Integer, ByVal Progress As Long, ByVal ProgressMax As Long) 文章评分1次,平均分5.0:★★★...