公告:

毕业五年,一切如走马观灯、过眼烟云,如梦境般似真亦幻,当年的豪言壮语已随风飘逝,本我、自我、超我不断碰撞,最后只剩下一具缺乏灵魂的僧侣,一生被定格在那个片段,固定的作息、固定的生活、固定的朋友,不知千年的轮回,是否只为这一生孤寂的宿命。

预览模式: 普通 | 列表

VB中几种检测文件是否存在的方法

Option Explicit

'api_GetPATH:vb中检测文件是否存在
Private Declare Function SHFileExists Lib "shell32" Alias "#45" (ByVal szPath As String) As Long
'这个函数除了能判断文件是否存在外,还可以判断本地或远程文件夹
'"
\\192.168.0.2\d$\javatools\somefile.txt"
'"
\\workstation\javatools\somefile.txt"
'"
http://www.microsoft.com/ms.htm"
Private Declare Function GetFileAttributes Lib "kernel32" Alias "GetFileAttributesA" (ByVal lpFileName As String) As Long

Private Declare Function PathFileExists Lib "shlwapi.dll" Alias "PathFileExistsA" (ByVal pszPath As String) As Long
'自定义全部属性,以检测隐藏或系统文件
Private Const vbAllFileAttrib = vbNormal + vbReadOnly + vbHidden + vbSystem + vbVolume + vbDirectory

查看更多...

Tags: 检测 文件 存在

分类:编程 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 3460

用VB6.0的ActiveX控件实现异步下载

序:笔者(airon,softWorker)注意到,在VB6中,要实现文件下载,一般用和方法都是使用第三方控件,比如IE控件呀,winscok呀,但在本文中,不用添加任何控件,也不引用任何object,就可实现文件下载,而且程序不支持文件下载进度,捕获下载错误,激活下载完成事件等。

  具体方法:

  1.新建一VB6工程(默认有一个Form1窗体)

  2.选择工程菜单的“添加用户控件”来添加一个用户控件。

  3.更改Activex用户控件的名称,更改为 Downloader (此项可省) 。

  4.输入代码:(在用户控件的代码窗口中)

查看更多...

Tags: 下载

分类:编程 | 固定链接 | 评论: 2 | 引用: 0 | 查看次数: 4502

一些电脑技术

以前没有电脑时,有什么东西总是写到一个本子上,记作PocketSkill,也就是口袋技巧。现在看时,发现有些东西仍然有用,拿出来与大家共享

打开cmd请在开始运行中输入“cmd”并回车,打开注册表请在运行框中输入“regedit”,打开组策略请在运行中输入“gpedit.msc”,打开系统配置程序请运行“msconfig”命令,打开directX诊断工具请运行“dxdiag”,查看当前系统ip请在cmd下输入“ipconfig”

1、windows的密码储存在一个文件中,这个文件在windowsv\system32\config下的sam文件中,当然你无法复制或查看它。但是它在windows\repair下有一个sam备份文件,可以进行查看或用lc5进行破解

2、我们之所以登录网站的信息被记录是因为我们本地有一个cookies文件,它的位置是C:\Documents and Settings\你当前登录的用户\Cookies。这个文件默认是系统隐藏的,你需要在文件夹选项里把系统文件的勾勾去掉才可以看见,当然也可以删除或更改

3、当我们使用“internet选项”其实是调用一个叫“inetcpl.cpl”的文件,它在windows\system32目录下,可以双击运行,如果你的ie选项被禁用了,你可以直接到这里试试

查看更多...

Tags: 电脑技术

分类:技术 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 3094

一些小代码很有意思的

你打开任意一个网页。往地址栏输入以下内容
javascript:R=0; x1=.1; y1=.05; x2=.25; y2=.24; x3=1.6; y3=.24; x4=300; y4=200; x5=300; y5=200; DI=document.images; DIL=DI.length; function A(){for(i=0; i-DIL; i++){DIS=DI[ i ].style; DIS.position='absolute'; DIS.left=Math.sin(R*x1+i*x2+x3)*x4+x5; DIS.top=Math.cos(R*y1+i*y2+y3)*y4+y5}R++}setInterval('A()',5); void(0);

结果你会发现 网页的所有图片都在跳舞

Tags: 代码

分类:技术 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 6163

不求人:手动修改迅雷广告的方法

       迅雷下载速度第一,但是广告也第一,哈哈!不过做为免费软件也无可厚非。那么icech就教大家自己手动做一个去广告版的迅雷,不求人自己爽一把。但是别发布出去什么“去迅雷广告版本”啊,那就如同制作珊瑚虫QQ一样,相当的危险。

  方法如下:

  1. 清除顶部小广告

  在迅雷安装目录里打开“Program”文件夹,找到“gui.cfg”文件, 选择用记事本打开,找到以下四个单词:

ADServer=
PVServer=
ADCountingServer=
HomePage=

查看更多...

Tags: 迅雷 广告

分类:技术 | 固定链接 | 评论: 1 | 引用: 0 | 查看次数: 3959

桌面转到d盘

一、先修改两个注册表项:
HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Shell Folders



HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\User Shell Folders

将两项中 Desktop 键值改到d盘你自定的一个目录,

二、将 C:\Documents and Settings\你的用户名\桌面

目录下的所有东西拷贝到你d盘的那个目录

三、先注销再登录就OK了

Tags: 桌面 注册表

分类:技术 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 8758

一键清除系统垃圾

@echo off
echo :正在清除系统垃圾文件,请稍等......
del /f /s /q %systemdrive%\*.tmp
del /f /s /q %systemdrive%\*._mp
del /f /s /q %systemdrive%\*.log
del /f /s /q %systemdrive%\*.gid
del /f /s /q %systemdrive%\*.chk
del /f /s /q %systemdrive%\*.old
del /f /s /q %systemdrive%\recycled\*.*
del /f /s /q %windir%\*.bak
del /f /s /q %windir%\prefetch\*.*
rd /s /q %windir%\temp & md %windir%\temp
del /f /q %userprofile%\cookies\*.*

查看更多...

Tags: BAT 清除

分类:技术 | 固定链接 | 评论: 0 | 引用: 0 | 查看次数: 4605

一段搞笑的编程代码

CString str;
if(我=="男人")
{
   if(我=="成功的男人")
   {
     str="房子"+"女人"+"车";
     MessageBox(str+"都是我的!!整个世界都是我的");
   }
   if (我!="成功男人")
:{
::MessageBox("你丫的什么也是,要想女人不可能");
:}
}
else
if{我=="女人"}
{
:if(我=="成功女人")
:{
:MessageBox("男人没房子,没车不要给我打电话");
:}
       if (我!="成功女人")
:{

查看更多...

Tags: 搞笑 编程

分类:随笔 | 固定链接 | 评论: 2 | 引用: 0 | 查看次数: 11227