- 博客(3)
- 资源 (3)
- 收藏
- 关注
转载 按行读取文件
Text = Plugin.File.ReadFileEx("C:\testfile.txt") Msgbox "向目标文件读出文本内容为:"& Text dim MyArray MyArray = Split(Text, "|") If UBound(MyArray)>=0 Then i=0 For UBound(MyArray)
2012-12-31 14:13:40 464
转载 截图 区域找图
//将当前窗口移至指定的像素位置 Hwnd = Plugin.Window.Foreground() Call Plugin.Window.Move(Hwnd, 100, 100) MsgBox "当前移动窗口到(100, 100)位置" //下面这句在屏幕区域范围内截图保存到桌面 //下面两句是获取用户桌面文件夹 set Obj = createobject("WScrip
2012-12-31 14:11:41 1391
转载 判断两个图片是否相同
--自定义函数: if object_id('tablename') is not null drop table tablename create table tablename (id int identity(1, 1), a1 image, a2 image) go insert into tablename(a1, a2) select 'aaa', 'aa
2012-12-31 14:06:48 657
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人