VB程序员博客
Archive for 05月, 2009
05 31st, 2009
好多次了出现这个错误，一般就是在运行中或后出现，这倒也好养成了我在调试运行程序之前保存的好习惯。可是每次
都要重新打开VB，很是麻烦，想问一下，这是怎么回事？
1、系统问题？
2、软件冲突？
3、硬件不会有问题吧？
多谢了先~
看不到图片…
其它人都没这个问题,还是你本机的什么东西有冲突造成的.比如说什么文件版本有问题.
终于知道怎么插入图片了。谢谢
看不到图片
我前些天也出现过你所说的情况，看不到你的图片。我说说我的情况吧
我的是用第三方控件及.hwnd出现问题，我反复试的的结果：用到.hwnd的属性的控件，不能放在窗体里的容器里，如frame,TTAB等
恩，我自己能看到的~
好的，我申请相册了，等下我传上去。
谢大家了先
图片小点了哈~
基本上就是：
第一张是说，遇到问题需要关闭，如在进程中则丢失信息。
第二张是说，***** 内存不能为read
大部分情况是代码有错误引起的，也有可能是插件引起的
代码中使用了HOOK或子类化.
帮顶
代码有错误？
代码有错误了，是不是都编译不过去呢，可是编译没问题呀。
不太懂….
学习
多谢，貌似我这不是关于第三方控件的事儿….
高手~~
还望详细一点….
语法有错误，编译会出问题。
语法没错误，逻辑有错误，编译没问题，但运行会出问题。
用F8逐句跟一下
up
挨个试了…
没错，程序运行也没错，只是偶尔的VB会出错，我重装了VB，现在出错不是那么频繁了。
这么多人用VB都没你这现象啊
不妨把你的代码贴出来。
子类化，hook，hwnd属性的控件都有可能的。
还有可能是你的代码的问题。
有些代码编译也没问题，逻辑也没问题，但实在是太粗糙了。
帮顶
打我重装VB以后，基本上就很少出现问题了…..
貌似不是vb环境的问题。
仔细研究下代码应该知道错哪了。
好的，和上面某楼说的似的，可是代码编译能过，现在调试，执行，倒是没事儿了
源代码贴一下吧！
有可能是用到外部控件或动态库的功能，程序退出时没有正常关闭！你可以试试把外部控件或DLL功能先屏蔽测试一下
以前用一个第三方工具栏的时候 遇到过
后来发现是其本身存在的bug 去掉没用 就好了
你 先查查看用了哪些第三方工具 然后查代码
没有用到第三方工具，代码挺多的。
90%代码是引用API函数，一般出错都是在运行时操作时出现的。
05 31st, 2009
点燃创意火花，增加社区版面凝聚力，也为今后CSDN版面间各项线下活动做好准备。CSDN特组织：『Show出你的创意，秀出你的精彩』CSDN版服设计大赛
活动对象：CSDN所有会员。
活动时间和内容：
1 、5月25日~6月7日，以大版为分类，分别组织版服设计大赛,网友们可以提交自己的创意。
2 、6月8日~10日，各大版进行投票评比，选出设计前2名，参加全CSDN版服设计大赛。
3、 6月11日~12日，限时投票选出CSDN版服大赛优胜者。
注意：截至当天的时间均为16点。如提交到6月7日16点截至。
活动内容及要求
1、突出版面特色，力求构思新颖，简洁大方。
2、原则上在设计时需加上CSDN社区logo，但如果logo的存在的确有碍你的创意迸发，则可以不加。设计时，请同时设计正反两面。
3、参加评选的版服，必须上传到CSDN相册中，以便将来给您的设计做全站推荐。 （如由于相册没有开通的原因无法上传，请用私信的方式给管理员ptwhite留言。 另外，开通的相册必须做为上传参赛图所用，如无使用，则在活动结束后进行关闭。）
4、作品不得侵犯著作权，如牵涉法律责任，由设计者承担。
奖项：
1、所有提交设计图的，每一份设计图，CSDN活动奖励可用分300分。
2、6月10日17点公布大版奖项。
第一名：版服一件+300元代金卷
第二名：版服一件+200元代金卷
3、6月12日17点公布CSDN版服优胜奖。
奖项：最佳人气奖3名
奖品：第一名：无线键盘
第二名：U盘激光笔
第三名：笔记本电脑包
设计模板
官方模板：
支持阿豆
找设计师ing。。。。
支持 ding
设计的不会，接分先。
不会设计，只会投票。
支持
纯 来 接分 》。。
各位不想画图的，不妨出出文字创意。
比如，你觉得那些keyword最能代表VB6的精髓？
希望绿豆把这个建议放到你的顶楼里，让大家都看到。
sub
com
activex
..
越想越多..接分
另外，在社区的主帖里提到：
补充：1、各版以大版主为组织，有效参赛大版，设计图不得少过10份，提交设计图的人员不得少过6人，少过该数则无效。不参与任何评奖。
这个的话，建议取消。估计咱们这里凑这个数有点难度的说
豆豆开这个帖是大版允许了的。 所以已经放进活动专帖了。
ding
同ing…
这是我前几天设计的那个T恤衫样式，请大家开动脑筋继续想些vb所特有的，能很好反映出vb特点的一些东西，谢谢！
这是根据常波同学的提议所改的夏日清凉版
顶
顶顶顶
黑色烟雾版
几米？
哈，没几米
多少钱撒
米是钱嘛
落伍啊斑竹
支持
hoho，我知道你说的是那个意思
现在只是征求设计阶段，还没有印呢，自然是无需多少米咯
来来，赶紧参加也设计一个，兴趣能得大奖哦
我来顶顶
顶
顶
找设计师ing。。。。
写点汉字也行啊，全是英文谁看呐。
VB板怎么才开始啊
modest的好！
to modest: 我喜欢第二个代码的。
建议字体换漂亮点的，颜色也变漂亮点。
VB Modest
为水源义务设计，版权转让，请速联系me。
西西，去设计一个吧。发挥你的智慧…
怎么才能得到这漂亮的衣服。
jf
衣服很漂亮
31楼的不错。
咱们版如果凑不够6个人，是不是就不能参加评奖了？
多多益善
哈哈，看看我上面的回复 看起来好小人啊
一点都不小人啊，年轻人快设计1件吧，为vb版争争面子诶
这个不错。顶！！！
虽然俺是菜鸟，可是不年轻鸟
。
另外，为何你和modest都无视人数的问题啊？咱们要是凑不够6个人不是白忙乎么？为嘛不建议那个白雪什么的改改规矩啊？
一来接分二来如果设计好的T恤便宜卖给我等,最好免费
因为这个活动主要是图个热闹，只要大家多发些言把帖子给顶住了，把楼盖上去了，我和老魏也就欣慰了，哈哈
看看我给水源设计的版服
http://topic.csdn.net/u/20090527/16/e21f7aeb-3d9c-4231-8736-1989f4409a24.html
顶一个
不会设计的人来顶了
个人意见，csdn弄这么个活动实在是。。。要是开会什么的都穿个版服，不是说一帮Geek开会么。不明白阿不明白
我靠都是人才。
我就等着出来穿着到处张扬
请问英文老师，geek倒底是贬义还是褒义？
我不人设计，我认为前面中文，背面英文，
个人理解吧，不过大部分人都理解是贬义。调查显示Geek就是那种特别不吸引异性的一个团体
不懂设计，喜欢那个有代码的
Bill Gates版
前面
后面
纯捧场
声明：此乃YY版，仅供娱乐。
没那个艺术细胞~~~~~~~~
路过顶贴…….
喜欢modest 59楼第一张
mark
jf
I,Basic版
前面
后面
爱Basic版
前面
后面
搞笑啊，哈哈
为了响应YY豆的号召,我也去凑个热闹,做了一个样式:
黑底的T恤暂时没有什么能勉强拿得出的方案,先放着吧…..
YY无止境
好象还是放到另一边好些…………..改了一下:
把布局改了,把字体也改了一点,不知道要不要好些.
同志们加油啊~~
YY的老魏…………
汗,相册竟然不能上传了.
刚给小田田发了私信,应该能收到吧.
或者我再发封MAIL?
加油加油
相册可以用了,田MM速度真快……赞一个先.
把背面也发一下:
综合一下.
白版正面:
白版背面:
黑版正面:
黑版背面:
匿.
豆子的洗虾铺好棒啊
这个设计名字叫做：YY无所不在，YY无所不能！
黑色版本
前面
后面
白色版本
前面
后面
恩 YY得好
这是网友lifetimeus设计的
我左VB,右CSDN,Microsoft在头顶,背后有GOV!!!
哈哈.
豆豆的YY衣真漂亮~~~
这些都多好的，啊。
顶!
再来支持
第九个，其他的可以到这里欣赏。
http://album.hi.csdn.net/views/album/474261
豆子 77F 的YY版好象没VB的主题~~~~~~~
那个是为YY版友情设计的
我再来两种款式:
白色正面:
白色背面:
黑色正面:
黑色背面:
嘿嘿,如何?
暂时没创意了,大家一起折腾吧……………….
wasei 创意无限的modest!
87楼最后一张质感很好啊
老马帮助下弄得
顺便说一下，csdn对于Chrome的支持不太好吧，都看不多编辑的那些按钮
雅琪和小雅不只名字相像，连设计也相像。素材撞车了？哈哈哈
这个是小雅设计的：
水源的设计：
http://topic.csdn.net/u/20090527/15/1f811af9-d1d9-4701-90e1-4b985f5d987d.html
再整一款:
黑色正面:
黑色背面:
白色正面:
白色背面:
差不多了,该折腾代码去了…………..
今晚应该能把这代码弄到可全面工作,明天测试一天…..
相册地址:
http://album.hi.csdn.net/views/guestalbum/474490?d=MjAwOS01LTI5IDA6Mzc6MDU=
这都几点了，你们无敌了。
在老马的带动下，我也弄了两个，其中一个是女用的，但是模板没有女装，将就用吧
1. The flame of VB
VB=Passion+Fashion+…Imagination
V=Fire
B=Funky Sunglasses
2. The real meaning of VB… 女孩子穿还可以，男士就看勇气了 
VB=Imagination
V+B=hot sexy bikini
经鉴定 clear_zero这回没盗版
顶
哈哈哈，
高高顶起~~~，哈哈，同志们厉害啊
这是来自lidia_tan(伊儿)的作品，偶帮忙发一下
这就是传说中Myjian的同住的女友么？
说实话，这两个轮子着实不错。
这套衣服，取名为：机械时代的环保
呵~~~
汗。。。汗。。。
不是女友~~~
正面放一堆 维生素B的瓶子或用瓶子围成一个VB的的形状。
然后写上：IT没有VB，结果会怎样？
我最近因为一个项目喜欢上VB了!!衣服定完稿后是不是通过CSDN可以定购的?嘿
伊儿做的YY版~~
我也来个YY版………….YY107楼的……………
快匿……….快匿……..
正面
反面
没啥创意，重在参与~~
那个和小雅重复的图是老马作的
我就是让他把 I heart VB 加进去，其他是他自己发挥的
哈，还是这个版型好
欣赏一下………….
^_^
嘿嘿,这个是YY版:
另一张:
我是不是要发水源去?
发错了………自己重发一下吧……
这是送给蒋总的,哇哈哈哈哈~~~
背面就都用这个吧,感觉不错:
随便写点VB的代码放在上面就行了，简洁好看
大大们都很厉害,拜服
厉害，都是人才啊！，特别是clear_zero的作品，嘿嘿，爱漏油！
我喜欢的设计款式`~！
蒋涛是谁？
CSDN总教主
快喊"千秋万代,一统江湖",哈哈.
膜拜，膜拜
一个比一个厉害！
请问楼上各位，申请开通相册后一般多长时间可开通呢？
答曰：若干年后~~~
很漂亮~
唉，俺的相册还没开通，又写邮件又发私信的。
豆子有熟人不？帮俺通融一哈？
顶贴拿分
up
那件夏日清凉版看上去最舒服，但要论创意的话，当然是clear_zero的啦，可惜只能作为珍藏版了…
太有创意了，喜欢
我也没开通，发过去就石沉大海了。连个音信都没
版主评选那个也是，估计我是拿不到杂志了 :((((
咦,我咋一下子就开通了?
好象没几分钟呀………
都是人才！
人才啊
05 31st, 2009
CSDN以交流IT技术为主的网络社区。 CSDN中的专家分，用来衡量用户的技术水平，以及用户的热心程度。来自于回答其他用户的问题，发帖人结帖时给分所得。
CSDN严格禁止倒分行为。倒分行为破坏了整个社区秩序。
由于发现在过去一年间很多用户进行了马甲倒分，CSDN将在6月集中处理。
鉴于以前一些倒分者已经不再进行倒分，并且对社区做出部分贡献。所以做出以下处理。
1、所以倒分相关帖子得分回复将全部删除处理。
2、对参与倒分的相关ID处理。
a 请自行发私信到CSDN,承认自己参与过倒分。并且已经改正错误。 CSDN将不进行封杀处理，只删除得分帖，不追究其他责任。
注：请在6月5日前发私信到CSDN，超过期者，一律按不承认错误者进行处理。
b 如参与倒分情况严重。并且不承认错误者，直接全站封杀处理。不再进行单个大版封杀。
说明：倒分次数超过5次，参与倒分技术分+水分>500分。则认为情节严重。
3、由于倒分，产生的专家分等级，勋章，社区将统一在6月对版面排行榜以及勋章进行重新生成。
其他：CSDN从6月起，每周管理员会进行一次倒分处理。 也欢迎大家举报非法倒分者。
补充大家提出的问题
问：什么叫做倒分？
简单的理解：一个用户使用马甲帐户提问，将可用分变成专家分的行为。
问：倒分的危害？
答：破坏了社区秩序，并且伤害了真正参与，回答问题的网友感情，严重者，对CSDN积分体系，和勋章体系造成影响。
问:怎么查处倒分？会不会误判？
答：目前每周查处一次的方法。
1、首先会以提问者和回答者的IP进行判断。
2、结帖时间。
3、对提问者的信任等级以及给分规律进行分析。
4、得分者的回答内容。
5、得分者的得分时间
。。。。等条件，
问：我们公司就一个IP出口，所以也许是我同事提到问题，我答了，自然要给我分。
答：我们会以多项条件进行分析判断，从而确定是否倒分。
如果是已知同事情况下，建议，应该让您同事请你吃饭，而不是在CSDN随意给分。
问：如果某段时间曾经允许倒分到多少额度就可，怎么办？
答：CSDN社区自创建起，为了维护社区专家分体系的稳定，一向是禁止倒分。
任何版面的版规不允许违反CSDN社区基本准则。
问：CSDN这次查处倒分有时间段吗?
答：本次统一查处倒分帖的发帖时间段为：2008-1-1日起到2009年5月31日。
问：如果版主参与了倒分呢？
答：做为社区网友的表率，如果版主参与倒专家分的行为，会按已经公布方法处理，并且撤销其版主职务。
支持~
沙发被鸭蛋抢了
支持支持！
象法院贴的布告，不象公告
严重支持
厉害~~
我支持的是以前的就不追究了，以后倒分的严厉处罚ⷂ𗂷ⷼ/td>
倒分为了自己虚荣，但伤害了别人的感情
支持
倒分可不好
支持
应该会删不少帖子..
好，严重支持
2000年倒的分还查不？
呵呵。。。。。。。
oo也倒过？
发现CSDN很有某party的风范
平时不好好做，觉得不行了就来次严打，打完了又恢复原样
有意义吗？
简直是瞎折腾
9年前的事现在也记不起来了，
也许倒过吧，哈哈。。。。。。。
支持。倒分是管理一个环节，平时也要加强管理。
支持
就倒过2次氺分。。
csdn好久没有福利了，穷死
以后每星期会查一次。
有个错误就会改正。
马上就要发福利了 
支持
严重支持~~已阅~~
關注
关注
支持
支持
支持，倒分影响大家心情，也破坏社区秩序。
倒分是干什么的？
马上要发福利了，所以严查倒分者。呵呵。
支持，伸张正义！
别人硬塞给我的分怎么办？
这招厉害！
有“倒分”现象，说明CSDN这里的福利是不错的，嘿嘿……
支持。
接分并支持
问下
什么是倒分
顶楼主，顺便问一句。
博文编辑HTML时写入EMBEDDED标签总是失败，能解决么？还是考虑什么安全问题。
jf
就说我的分的涨的不快呀
哈哈
怎么倒法的？
没有听说的？？？？？？？？／
呵呵
up….
以后没机会啦 - -！
强烈支持！严打倒分行为！
支持
封杀他们！！！
支持
坦白从宽，抗拒从严
杀,一个不留
支持!!!
不过不知道什么叫倒分..
有相同的困惑
倒分是什么，最重要的问题都没有说清楚，别人怎样知道他是不是犯了。。。
支持啊！！！
支持
支持ⷂ𗂷ⷂ𗂷ⷂ𗂷
什么叫"到分"?
似乎不少人都弄不清楚…..
有谁可以解释一下吗?
对于发帖数量多，质量过关的，要奖励分，某些同志，分好几万，都是一些无聊的回帖得来的，如何区别一般劳动者和混水摸鱼的？要提高社区帖子的质量和社员的
发帖积极性以及素质！
ding
支持
支持
啊哎， 上次倒的分已经全收回去了，别再封ID了吧
我还不知道倒分是什么，是不是自己用另外一个号给自己加分？
勋章啊 渺茫的东西
强烈支持啊
汗,吓死我了
支持。。。
支持！文明社区！
早就应该这样做了~！
强烈支持！
这个要做一个智能系统来判断.
倒分男想了半天，对马甲说：“拿我的黄裤子来！”
支持！
见识！
哦
想想倒过分没？
倒分怎么算呢？超过70%？还是什么？貌似没超过的……咔咔！~帮别人接生算倒分吗？hoho没违反规则貌似……
up
顶！
支持！
GOOD
up
o
严打
没明白倒分 啥 意思？
怎么没 人 出来 解释一下哈 …
不知道啊
支持
倒分的定义是什么?
什么情况下是倒分?
如何鉴别?
如何监督?
如何申诉?
如何……?
困惑中zzz～～～～
LZ是不是应该先声明一下倒分是什么？
何为倒分？
不行！以前的也必须追究！
只不过自己承认的仅删除所倒之分即可；
被举报的，不仅要删除所倒之分，还要成比例地删除他本来的分。
支持 `
看到了．．支持哟．．．
支持!
支持
是该处理一下。
不知道倒分有什么用，难道是虚荣心来了？？
可用分多发点，以前每周回帖即可以得到88个可用分的，怎么取消了，搞了个万恶的淘宝，真是对CSDN失望了
可用分多发点，以前每周回帖即可以得到88个可用分的，怎么取消了，搞了个万恶的押宝游戏，真是对CSDN失望了
支持，顶！！
支持下
支持下
啥叫倒分？？？
你们能给出个标准么？
说一套做一套，整天没事干神经乱抽风
顶。
1. 什么是倒分？
2. 什么是马甲倒分？
3. CSDN根据什么原则，判定是倒分或者马甲倒分？
4. 要是搞出了冤假错案了怎么办？
对后进来的人很不公平呀
呵呵，严打整治……
养肥了再宰……..
相当nice
怎么判定是不是倒分呢,不是那么容易吧
木倒过。。
什么是倒分？
不是有"技术分"和"非技术分"之分吗?
又一个问题来了……
什么是"马甲帐户"呢?
是多注册一个帐户吗????
求解~~~~
…
支持
几家欢喜几家愁啊～
是开二个帐号么 ?
还是不明白什么是倒分 .. 反正 要求严打 ..
CSDN中的福利是什么啊？？？？？？？？
没听说过啊？？？？？
支持一下，建议要有长效管理制度，只要倒分就应该一视同仁的做处理。
坦白了就可以得到豁免，这不是好办法。
支持
本来不知道倒分为何物，你却提醒了我，哈哈
短工，都不知道怎么样得分，哈哈！
顶个
支持支持
“1、所以倒分相关帖子得分回复将全部删除处理。”
是不是说
“1、所有倒分相关帖子得分回复将全部删除处理” 的意思？
了解，，抵制倒分行为~~
太好了
up
确实有点
我想。。。 顶风作案。
支持
强烈支持， 倒分属于可耻行为。
严惩倒分行为！
本身，来csdn就是为了提高水平的，通过回答问题既帮助了他人，自己又有了收获，分多少根本就无所谓。不知道那些倒分的这样做有什么意义，毕竟是虚拟的又不是money,这样做只能让自己更加功利，更加虚假，人品更加差劲。哎，何苦嘛….
分只要够用就好ⷂ𗠼br /> 关键是好多人都是穷人 所以倒吧ⷂ𗼯td>
分不在多..有的用即可
我7月份再倒分。
好像进了“名人堂”似的，这上面的人都太猛了。个个有勋章，一个比一个多，名次一个比一个靠前。
大有一种眼花缭乱，自卑的感觉。哈哈。
严重支持
支持打击倒分，希望不会出现冤案。
我在家使ADSL，IP经常变，公司好像也是ADSL，IP怎么算？
希望主要考察双方的行为，而不是IP。
支持ⷂ𗂷ⷂ𗂷ⷂ𗂷
支持……不能坏了咱们的学习环境啊，
像那些发个帖，然后看见回复后用QQ讨论的怎么办？ 最后结帐时可以在原帖里就一个无关的回复
支持顶上去.
如果是个别情况，版主应该及时删除得分回复，并且警告贴主。
因为CSDN的技术分产生是在CSDN，QQ没有一个过程监督
你可以QQ讨论，但是必须将答案帖上，以便后人分享。
如果是多个情况，则认为倒分。
支持
顶了
严重支持！
噢噢
支持ⷂ𗂷ⷂ𗂷ⷂ𗂷
现在就怕被误判了，我们用的是校园网，估计IP重复的会很多，呵呵
强烈支持~
支持.
飘，
如果是已知同事情况下，建议，应该让您同事请你吃饭，而不是在CSDN随意给分。 
支持~~~~~~~~~~~~~~~ⷂ𗂷
支持一下！！！CSDN确实正规！！！
还没到过。没机会了。╮(╯_╰)╭
呵呵，比方，如果，人家有专家分19000，倒的分数是8000，楼主改如何处罚呢？
这分数有用吗？
能当饭吃吗？
能购买东西吗？
一个勋章排名就导致一帮单纯的IT人士YY不止。
同志们该清醒了！
分数什么都不是，还不如慎重回帖。
自己看点书，看看电视剧！
——我以前一度对分数很着迷，现在觉得很幼稚。
up飘过,跟我没关系,支持下
呵呵,支持!
ps:要是csdn的分能当饭吃就好了.
好东西,我怎么就没想到来的,搞的发贴都没分,技术又不好,回贴分又少,哎!
没有比方，只要参与倒分，处罚是一样的。
如何处罚，需要发贴 列出 倒分名单吗？还有如果我以前倒了分，我如何删帖，删专家分啊，我好像都没有权限啊！
还有我发私信给csdn的时候，直接说我倒过分就好了吧！
我坦白!
抓住一个倒分者。
支持支持！
我过来溜达溜达
趁六月还没到，赶紧倒点分再说
支持一个
来晚了。。。
赶紧顶一个！
支持
早就改整了。呵呵~~
顶一下
尤其要处理 使用灌水机 灌水的.
每个帖子下都自动回复,楼主很不爽.
水源倒分貌似是规则允许的…..
身子歪不怕影子正… 让暴风雨来的更猛烈些吧…
看来倒分是个有前途的职业啊…
想问的是,万一倒分的同志提出的问题被别人解答了.. 他的号和帖子删除,那做了解答的人不是郁闷了…
问：如果某段时间曾经允许倒分到多少额度就可，怎么办？
答：CSDN社区自创建起，为了维护社区专家分体系的稳定，一向是禁止倒分。
任何版面的版规不允许违反CSDN社区基本准则。
请做参考
现在CSDN倒分严重,不结贴的也很严重!
真得支持！以前总是看到XXX昨日得分好几千，很是郁闷，想人家怎么得的啊？但是一想很有可能就是倒分，但是 当时CSDN还没有对这些进行处理。
刚来论坛时候似乎倒过，至于08年以后似乎没有，呵呵，记不起来了，要是被做了就在此立碑留个纪念吧~
有人一个月还有好几万的呢！
顶
我在想怎么把技术分倒成可用分…
嘎嘎
HOHO
05 31st, 2009
sql用的域名,有的客户端能正常连接数据库,现在只出现了一个这样的情况,怎么办?是什么原因
个人认为是客户端那边无法解析域名所引起的,但是他们那边使用ping又正常
第一次与服务端通信正常,也是使用域名连接服务端的,邪门了….
你用ip连接的话
那里会有解析域名连接的问题呢？
我搜索了下
好象是许可权的问题
你可以尝试开放匿名拥护看看
数据库使用了安全模型,设置了权限,其他的客户端都能正常.
我测试了一下,在本地使用天网禁止了客户端连接数据库1433端口就出现这个问题.
1，在不能连接的客户端安装mdac2.8mdactyp.exe
2，在控制面板中手工配制ODBC到服务端的SQL试试（tcpip与named pipes都试试)
外网访问, 用域名绑定动态IP, 连接字符串可以用域名…
如果一样的代码,只有一台机器不能访问, 应该是这台机器的问题吧?
1433是SQL数据库的默认端口
1.先到ODBC里看看直接测试连接,成功,就说明代码有问题.
2.本地访问没有出站,先安装MDAC,再重复1.
3.查看防火墙配置,如本地连接配置,安全软件配置.
4.网络配置,网上邻居属性里面.
5.本机服务启动不完善.如DHCP.
6.本机访问外部使用的用户与数据库服务器要求的用户不一致.比如guest.管理员.
7.可能管道一类的在本地被"优化"掉了..
回复 Leftie 大哥
用户使用的是xp系统,不需要安装mdac2.8,
使用的是字符串直接连接数据库,没有使用数据源
现在已经可以获取 WebBrowser1 的句柄 也能点击到WebBrowser1
但是无法点击WebBrowser1中的FLASH。
请问有什么方法可以点击到吗？
最好能有点代码方面的提示呵呵。各位谢谢了。
Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long
Dim dHwnd As Long
Dim tHwnd As Long
dhwnd=findwindow("ThunderFormDC","Form1")
if dhwnd>0 then
thwnd=findwindowex(dhwnd,byval 0&,"Shell Embedding",vbnullstring)
if thwnd>0 then
thwnd=findwindowex(thwnd,byval 0&,"Shell DocObject View",vbnullstring)
if thwnd>0 then
thwnd=findwindowex(thwnd,byval 0&,"Internet Explorer_Server",vbnullstring)
if thwnd>0 then
thwnd=findwindowex(thwnd,byval 0&,"MacromediaFlashPlayerActiveX",vbnullstring)
end if
end if
end if
end if
这样去获得FlASH的句柄根本得不到，只能得到IE的。
哎，自己搞定了，原来如果你要定义FLSAH就要直接访问FLASH，否则获取不到。
结贴
aa
能说的更具体些吗？
05 30th, 2009
点燃创意火花，增加社区版面凝聚力，也为今后CSDN版面间各项线下活动做好准备。CSDN特组织：『Show出你的创意，秀出你的精彩』CSDN版服设计大赛
活动对象：CSDN所有会员。
活动时间和内容：
1 、5月25日~6月7日，以大版为分类，分别组织版服设计大赛,网友们可以提交自己的创意。
2 、6月8日~10日，各大版进行投票评比，选出设计前2名，参加全CSDN版服设计大赛。
3、 6月11日~12日，限时投票选出CSDN版服大赛优胜者。
注意：截至当天的时间均为16点。如提交到6月7日16点截至。
活动内容及要求
1、突出版面特色，力求构思新颖，简洁大方。
2、原则上在设计时需加上CSDN社区logo，但如果logo的存在的确有碍你的创意迸发，则可以不加。设计时，请同时设计正反两面。
3、参加评选的版服，必须上传到CSDN相册中，以便将来给您的设计做全站推荐。 （如由于相册没有开通的原因无法上传，请用私信的方式给管理员ptwhite留言。 另外，开通的相册必须做为上传参赛图所用，如无使用，则在活动结束后进行关闭。）
4、作品不得侵犯著作权，如牵涉法律责任，由设计者承担。
奖项：
1、所有提交设计图的，每一份设计图，CSDN活动奖励可用分300分。
2、6月10日17点公布大版奖项。
第一名：版服一件+300元代金卷
第二名：版服一件+200元代金卷
3、6月12日17点公布CSDN版服优胜奖。
奖项：最佳人气奖3名
奖品：第一名：无线键盘
第二名：U盘激光笔
第三名：笔记本电脑包
设计模板
官方模板：
支持阿豆
找设计师ing。。。。
支持 ding
设计的不会，接分先。
不会设计，只会投票。
支持
纯 来 接分 》。。
各位不想画图的，不妨出出文字创意。
比如，你觉得那些keyword最能代表VB6的精髓？
希望绿豆把这个建议放到你的顶楼里，让大家都看到。
sub
com
activex
..
越想越多..接分
另外，在社区的主帖里提到：
补充：1、各版以大版主为组织，有效参赛大版，设计图不得少过10份，提交设计图的人员不得少过6人，少过该数则无效。不参与任何评奖。
这个的话，建议取消。估计咱们这里凑这个数有点难度的说
豆豆开这个帖是大版允许了的。 所以已经放进活动专帖了。
ding
同ing…
这是我前几天设计的那个T恤衫样式，请大家开动脑筋继续想些vb所特有的，能很好反映出vb特点的一些东西，谢谢！
这是根据常波同学的提议所改的夏日清凉版
顶
顶顶顶
黑色烟雾版
几米？
哈，没几米
多少钱撒
米是钱嘛
落伍啊斑竹
支持
hoho，我知道你说的是那个意思
现在只是征求设计阶段，还没有印呢，自然是无需多少米咯
来来，赶紧参加也设计一个，兴趣能得大奖哦
我来顶顶
顶
顶
找设计师ing。。。。
写点汉字也行啊，全是英文谁看呐。
VB板怎么才开始啊
modest的好！
to modest: 我喜欢第二个代码的。
建议字体换漂亮点的，颜色也变漂亮点。
VB Modest
为水源义务设计，版权转让，请速联系me。
西西，去设计一个吧。发挥你的智慧…
怎么才能得到这漂亮的衣服。
jf
衣服很漂亮
31楼的不错。
咱们版如果凑不够6个人，是不是就不能参加评奖了？
多多益善
哈哈，看看我上面的回复 看起来好小人啊
一点都不小人啊，年轻人快设计1件吧，为vb版争争面子诶
这个不错。顶！！！
虽然俺是菜鸟，可是不年轻鸟。
另外，为何你和modest都无视人数的问题啊？咱们要是凑不够6个人不是白忙乎么？为嘛不建议那个白雪什么的改改规矩啊？
一来接分二来如果设计好的T恤便宜卖给我等,最好免费
因为这个活动主要是图个热闹，只要大家多发些言把帖子给顶住了，把楼盖上去了，我和老魏也就欣慰了，哈哈
看看我给水源设计的版服
http://topic.csdn.net/u/20090527/16/e21f7aeb-3d9c-4231-8736-1989f4409a24.html
顶一个
不会设计的人来顶了
个人意见，csdn弄这么个活动实在是。。。要是开会什么的都穿个版服，不是说一帮Geek开会么。不明白阿不明白
我靠都是人才。
我就等着出来穿着到处张扬
请问英文老师，geek倒底是贬义还是褒义？
我不人设计，我认为前面中文，背面英文，
个人理解吧，不过大部分人都理解是贬义。调查显示Geek就是那种特别不吸引异性的一个团体
不懂设计，喜欢那个有代码的
Bill Gates版
前面
后面
纯捧场
声明：此乃YY版，仅供娱乐。
没那个艺术细胞~~~~~~~~
路过顶贴…….
喜欢modest 59楼第一张
mark
jf
I,Basic版
前面
后面
爱Basic版
前面
后面
搞笑啊，哈哈
为了响应YY豆的号召,我也去凑个热闹,做了一个样式:
黑底的T恤暂时没有什么能勉强拿得出的方案,先放着吧…..
YY无止境
好象还是放到另一边好些…………..改了一下:
把布局改了,把字体也改了一点,不知道要不要好些.
同志们加油啊~~
YY的老魏…………
汗,相册竟然不能上传了.
刚给小田田发了私信,应该能收到吧.
或者我再发封MAIL?
加油加油
相册可以用了,田MM速度真快……赞一个先.
把背面也发一下:
综合一下.
白版正面:
白版背面:
黑版正面:
黑版背面:
匿.
豆子的洗虾铺好棒啊
这个设计名字叫做：YY无所不在，YY无所不能！
黑色版本
前面
后面
白色版本
前面
后面
恩 YY得好
这是网友lifetimeus设计的
我左VB,右CSDN,Microsoft在头顶,背后有GOV!!!
哈哈.
豆豆的YY衣真漂亮~~~
这些都多好的，啊。
顶!
再来支持
第九个，其他的可以到这里欣赏。
http://album.hi.csdn.net/views/album/474261
豆子 77F 的YY版好象没VB的主题~~~~~~~
那个是为YY版友情设计的
我再来两种款式:
白色正面:
白色背面:
黑色正面:
黑色背面:
嘿嘿,如何?
暂时没创意了,大家一起折腾吧……………….
wasei 创意无限的modest!
87楼最后一张质感很好啊
老马帮助下弄得
顺便说一下，csdn对于Chrome的支持不太好吧，都看不多编辑的那些按钮
雅琪和小雅不只名字相像，连设计也相像。素材撞车了？哈哈哈
这个是小雅设计的：
水源的设计：
http://topic.csdn.net/u/20090527/15/1f811af9-d1d9-4701-90e1-4b985f5d987d.html
再整一款:
黑色正面:
黑色背面:
白色正面:
白色背面:
差不多了,该折腾代码去了…………..
今晚应该能把这代码弄到可全面工作,明天测试一天…..
相册地址:
http://album.hi.csdn.net/views/guestalbum/474490?d=MjAwOS01LTI5IDA6Mzc6MDU=
这都几点了，你们无敌了。
在老马的带动下，我也弄了两个，其中一个是女用的，但是模板没有女装，将就用吧
1. The flame of VB
VB=Passion+Fashion+…Imagination
V=Fire
B=Funky Sunglasses
2. The real meaning of VB… 女孩子穿还可以，男士就看勇气了
VB=Imagination
V+B=hot sexy bikini
经鉴定 clear_zero这回没盗版
顶
哈哈哈，
高高顶起~~~，哈哈，同志们厉害啊
这是来自lidia_tan(伊儿)的作品，偶帮忙发一下
这就是传说中Myjian的同住的女友么？
说实话，这两个轮子着实不错。
这套衣服，取名为：机械时代的环保
呵~~~
汗。。。汗。。。
不是女友~~~
正面放一堆 维生素B的瓶子或用瓶子围成一个VB的的形状。
然后写上：IT没有VB，结果会怎样？
我最近因为一个项目喜欢上VB了!!衣服定完稿后是不是通过CSDN可以定购的?嘿
伊儿做的YY版~~
我也来个YY版………….YY107楼的……………
快匿……….快匿……..
正面
反面
没啥创意，重在参与~~
那个和小雅重复的图是老马作的
我就是让他把 I heart VB 加进去，其他是他自己发挥的
哈，还是这个版型好
欣赏一下………….
^_^
嘿嘿,这个是YY版:
另一张:
我是不是要发水源去?
发错了………自己重发一下吧……
这是送给蒋总的,哇哈哈哈哈~~~
背面就都用这个吧,感觉不错:
随便写点VB的代码放在上面就行了，简洁好看
大大们都很厉害,拜服
厉害，都是人才啊！，特别是clear_zero的作品，嘿嘿，爱漏油！
我喜欢的设计款式`~！
蒋涛是谁？
CSDN总教主
快喊"千秋万代,一统江湖",哈哈.
05 30th, 2009
CSDN以交流IT技术为主的网络社区。 CSDN中的专家分，用来衡量用户的技术水平，以及用户的热心程度。来自于回答其他用户的问题，发帖人结帖时给分所得。
CSDN严格禁止倒分行为。倒分行为破坏了整个社区秩序。
由于发现在过去一年间很多用户进行了马甲倒分，CSDN将在6月集中处理。
鉴于以前一些倒分者已经不再进行倒分，并且对社区做出部分贡献。所以做出以下处理。
1、所以倒分相关帖子得分回复将全部删除处理。
2、对参与倒分的相关ID处理。
a 请自行发私信到CSDN,承认自己参与过倒分。并且已经改正错误。 CSDN将不进行封杀处理，只删除得分帖，不追究其他责任。
注：请在6月5日前发私信到CSDN，超过期者，一律按不承认错误者进行处理。
b 如参与倒分情况严重。并且不承认错误者，直接全站封杀处理。不再进行单个大版封杀。
说明：倒分次数超过5次，参与倒分技术分+水分>500分。则认为情节严重。
3、由于倒分，产生的专家分等级，勋章，社区将统一在6月对版面排行榜以及勋章进行重新生成。
其他：CSDN从6月起，每周管理员会进行一次倒分处理。 也欢迎大家举报非法倒分者。
补充大家提出的问题
问：什么叫做倒分？
简单的理解：一个用户使用马甲帐户提问，将可用分变成专家分的行为。
问：倒分的危害？
答：破坏了社区秩序，并且伤害了真正参与，回答问题的网友感情，严重者，对CSDN积分体系，和勋章体系造成影响。
问:怎么查处倒分？会不会误判？
答：目前每周查处一次的方法。
1、首先会以提问者和回答者的IP进行判断。
2、结帖时间。
3、对提问者的信任等级以及给分规律进行分析。
4、得分者的回答内容。
5、得分者的得分时间
。。。。等条件，
问：我们公司就一个IP出口，所以也许是我同事提到问题，我答了，自然要给我分。
答：我们会以多项条件进行分析判断，从而确定是否倒分。
如果是已知同事情况下，建议，应该让您同事请你吃饭，而不是在CSDN随意给分。
问：如果某段时间曾经允许倒分到多少额度就可，怎么办？
答：CSDN社区自创建起，为了维护社区专家分体系的稳定，一向是禁止倒分。
任何版面的版规不允许违反CSDN社区基本准则。
问：CSDN这次查处倒分有时间段吗?
答：本次统一查处倒分帖的发帖时间段为：2008-1-1日起到2009年5月31日。
问：如果版主参与了倒分呢？
答：做为社区网友的表率，如果版主参与倒专家分的行为，会按已经公布方法处理，并且撤销其版主职务。
支持~
沙发被鸭蛋抢了
支持支持！
象法院贴的布告，不象公告
严重支持
厉害~~
我支持的是以前的就不追究了，以后倒分的严厉处罚ⷂ𗂷ⷼ/td>
倒分为了自己虚荣，但伤害了别人的感情
支持
倒分可不好
支持
应该会删不少帖子..
好，严重支持
2000年倒的分还查不？
呵呵。。。。。。。
oo也倒过？
发现CSDN很有某party的风范
平时不好好做，觉得不行了就来次严打，打完了又恢复原样
有意义吗？
简直是瞎折腾
9年前的事现在也记不起来了，
也许倒过吧，哈哈。。。。。。。
支持。倒分是管理一个环节，平时也要加强管理。
支持
就倒过2次氺分。。
csdn好久没有福利了，穷死
以后每星期会查一次。
有个错误就会改正。
马上就要发福利了
支持
严重支持~~已阅~~
關注
关注
支持
支持
支持，倒分影响大家心情，也破坏社区秩序。
倒分是干什么的？
马上要发福利了，所以严查倒分者。呵呵。
支持，伸张正义！
别人硬塞给我的分怎么办？
这招厉害！
有“倒分”现象，说明CSDN这里的福利是不错的，嘿嘿……
支持。
接分并支持
问下
什么是倒分
顶楼主，顺便问一句。
博文编辑HTML时写入EMBEDDED标签总是失败，能解决么？还是考虑什么安全问题。
jf
就说我的分的涨的不快呀
哈哈
怎么倒法的？
没有听说的？？？？？？？？／
呵呵
up….
以后没机会啦 - -！
强烈支持！严打倒分行为！
支持
封杀他们！！！
支持
坦白从宽，抗拒从严
杀,一个不留
支持!!!
不过不知道什么叫倒分..
有相同的困惑
倒分是什么，最重要的问题都没有说清楚，别人怎样知道他是不是犯了。。。
支持啊！！！
支持
支持ⷂ𗂷ⷂ𗂷ⷂ𗂷
什么叫"到分"?
似乎不少人都弄不清楚…..
有谁可以解释一下吗?
对于发帖数量多，质量过关的，要奖励分，某些同志，分好几万，都是一些无聊的回帖得来的，如何区别一般劳动者和混水摸鱼的？要提高社区帖子的质量和社员的
发帖积极性以及素质！
ding
支持
支持
啊哎， 上次倒的分已经全收回去了，别再封ID了吧
我还不知道倒分是什么，是不是自己用另外一个号给自己加分？
勋章啊 渺茫的东西
强烈支持啊
汗,吓死我了
支持。。。
支持！文明社区！
早就应该这样做了~！
强烈支持！
这个要做一个智能系统来判断.
倒分男想了半天，对马甲说：“拿我的黄裤子来！”
支持！
见识！
哦
想想倒过分没？
倒分怎么算呢？超过70%？还是什么？貌似没超过的……咔咔！~帮别人接生算倒分吗？hoho没违反规则貌似……
up
顶！
支持！
GOOD
up
o
严打
没明白倒分 啥 意思？
怎么没 人 出来 解释一下哈 …
不知道啊
支持
倒分的定义是什么?
什么情况下是倒分?
如何鉴别?
如何监督?
如何申诉?
如何……?
困惑中zzz～～～～
LZ是不是应该先声明一下倒分是什么？
何为倒分？
不行！以前的也必须追究！
只不过自己承认的仅删除所倒之分即可；
被举报的，不仅要删除所倒之分，还要成比例地删除他本来的分。
支持 `
看到了．．支持哟．．．
支持!
支持
是该处理一下。
不知道倒分有什么用，难道是虚荣心来了？？
可用分多发点，以前每周回帖即可以得到88个可用分的，怎么取消了，搞了个万恶的淘宝，真是对CSDN失望了
可用分多发点，以前每周回帖即可以得到88个可用分的，怎么取消了，搞了个万恶的押宝游戏，真是对CSDN失望了
支持，顶！！
支持下
支持下
啥叫倒分？？？
你们能给出个标准么？
说一套做一套，整天没事干神经乱抽风
顶。
1. 什么是倒分？
2. 什么是马甲倒分？
3. CSDN根据什么原则，判定是倒分或者马甲倒分？
4. 要是搞出了冤假错案了怎么办？
对后进来的人很不公平呀
呵呵，严打整治……
养肥了再宰……..
相当nice
怎么判定是不是倒分呢,不是那么容易吧
木倒过。。
什么是倒分？
不是有"技术分"和"非技术分"之分吗?
又一个问题来了……
什么是"马甲帐户"呢?
是多注册一个帐户吗????
求解~~~~
…
支持
几家欢喜几家愁啊～
是开二个帐号么 ?
还是不明白什么是倒分 .. 反正 要求严打 ..
CSDN中的福利是什么啊？？？？？？？？
没听说过啊？？？？？
支持一下，建议要有长效管理制度，只要倒分就应该一视同仁的做处理。
坦白了就可以得到豁免，这不是好办法。
支持
本来不知道倒分为何物，你却提醒了我，哈哈
短工，都不知道怎么样得分，哈哈！
顶个
支持支持
“1、所以倒分相关帖子得分回复将全部删除处理。”
是不是说
“1、所有倒分相关帖子得分回复将全部删除处理” 的意思？
了解，，抵制倒分行为~~
太好了
up
确实有点
我想。。。 顶风作案。
支持
强烈支持， 倒分属于可耻行为。
严惩倒分行为！
本身，来csdn就是为了提高水平的，通过回答问题既帮助了他人，自己又有了收获，分多少根本就无所谓。不知道那些倒分的这样做有什么意义，毕竟是虚拟的又不是money,这样做只能让自己更加功利，更加虚假，人品更加差劲。哎，何苦嘛….
分只要够用就好ⷂ𗠼br /> 关键是好多人都是穷人 所以倒吧ⷂ𗼯td>
分不在多..有的用即可
我7月份再倒分。
好像进了“名人堂”似的，这上面的人都太猛了。个个有勋章，一个比一个多，名次一个比一个靠前。
大有一种眼花缭乱，自卑的感觉。哈哈。
严重支持
支持打击倒分，希望不会出现冤案。
我在家使ADSL，IP经常变，公司好像也是ADSL，IP怎么算？
希望主要考察双方的行为，而不是IP。
支持ⷂ𗂷ⷂ𗂷ⷂ𗂷
支持……不能坏了咱们的学习环境啊，
像那些发个帖，然后看见回复后用QQ讨论的怎么办？ 最后结帐时可以在原帖里就一个无关的回复
支持顶上去.
如果是个别情况，版主应该及时删除得分回复，并且警告贴主。
因为CSDN的技术分产生是在CSDN，QQ没有一个过程监督
你可以QQ讨论，但是必须将答案帖上，以便后人分享。
如果是多个情况，则认为倒分。
支持
顶了
严重支持！
噢噢
支持ⷂ𗂷ⷂ𗂷ⷂ𗂷
现在就怕被误判了，我们用的是校园网，估计IP重复的会很多，呵呵
强烈支持~
支持.
飘，
如果是已知同事情况下，建议，应该让您同事请你吃饭，而不是在CSDN随意给分。
支持~~~~~~~~~~~~~~~ⷂ𗂷
支持一下！！！CSDN确实正规！！！
还没到过。没机会了。╮(╯_╰)╭
呵呵，比方，如果，人家有专家分19000，倒的分数是8000，楼主改如何处罚呢？
05 29th, 2009
用vba 导出查询到excel文件，怎么跟在access里查询到的结果不一样？
建立查询“select * from 帐户统计之支行净增”和导出文件有一行记录不同，其他的都一样，会不会是 Rs_Data.Open strOpen, Adocn, adOpenStatic, adLockOptimistic造成的？
Public Sub 导出支行净增()
'*********************************************************
'* 名称：ExporToExcel
'* 功能：导出数据到EXCEL
'* 用法：ExporToExcel(sql查询字符串)
'*********************************************************
Dim Rs_Data As New ADODB.Recordset
Dim Irowcount As Integer
Dim Icolcount As Integer
Dim Adocn As New ADODB.Connection
Dim strOpen As String
Dim xlApp As New Excel.Application
Dim xlBook As Excel.Workbook
Dim xlSheet As Excel.Worksheet
Dim xlQuery As Excel.QueryTable
Dim strSQL As String
Dim Cnn As New ADODB.Connection
Dim Rst As New ADODB.Recordset
Dim i%
strSQL = "select 支行 from 支行"
Set Cnn = CurrentProject.Connection
Rst.Open strSQL, Cnn, adOpenKeyset, adLockOptimistic
If Not Rst.EOF Then
Rst.MoveFirst
Do While Not Rst.EOF
Set Adocn = CurrentProject.Connection
Adocn.CursorLocation = adUseClient
strOpen = "select * from 帐户统计之支行净增"
Rs_Data.Open strOpen, Adocn, adOpenStatic, adLockOptimistic
If Rs_Data.RecordCount >= 1 Then
Set Cnn = CurrentProject.Connection
Set xlApp = CreateObject("Excel.Application")
Set xlBook = Nothing
Set xlSheet = Nothing
Set xlBook = xlApp.Workbooks().Add
Set xlSheet = xlApp.Sheets.Add
' Set xlBook = xlApp.Workbooks().Add
Set xlSheet = xlApp.Sheets.Add
Set xlSheet = xlBook.Worksheets("sheet5")
Irowcount = Rs_Data.RecordCount
Icolcount = Rs_Data.Fields.Count
Set xlQuery = xlSheet.QueryTables.Add(Rs_Data, xlSheet.Range("a1"))
With xlSheet
.Range(.Cells(1, 1), .Cells(1, Icolcount)).Font.Size = 15 '.Name = "黑体"
.Range(.Cells(1, 1), .Cells(Irowcount + 1, Icolcount)).Borders.LineStyle = xlContinuous
.PageSetup.CenterHeader = "&""宋体,加粗""&18支行帐户情况&""宋体,常规"""
.PageSetup.RightMargin = 1
.PageSetup.LeftMargin = 30
End With
xlQuery.FieldNames = True '显示字段名
xlQuery.Refresh
xlSheet.Name = "支行帐户情况"
xlBook.SaveAs "D: emp帐户情况-" & Rst!支行 & ".xls" 'App.Path & "" & filename & ".xls"
End If
Set xlSheet = Nothing
xlApp.Application.Quit
Set xlBook = Nothing
Set xlApp = Nothing
Rs_Data.Close
Rst.MoveNext
Loop
End If
End Sub
就是有一行记录的一个字段差1，原来应为23，结果却为22，换了台电脑都一样的结果
看下Rs_Data的值
临时用
xlSheet.Range("A2").CopyFromRecordset Rs_Data
替代
Set xlQuery = xlSheet.QueryTables.Add(Rs_Data, xlSheet.Range("a1"))
看看结果
RSDATA一大堆的值，看不出什么
看你认为错误的那一行
个人建议：
1、先对数据库进行一下压缩，然后重试。
2、代码分块、分段排查。
PS：拙见，仅供参考。
还是解决不了
这段代码本应该写的再简洁些的！
老兄指点一下，哪里可以做改进，给个思路也行，我的代码要运行半个小时。
strOpen = "select * from 帐户统计之支行净增"
这句话没有加支行条件。
2，调试的话，这个追加 [=23] 的那条记录的条件，这样你调试起来就不是半小时了。
看看数据库里面 23的字段的数据类型，再看看excel里面的数据类型是不是一致。
差1？带小数点的吗？会不会是精度的问题。单元格属性需要设置一下吧
都是整型的，属性没问题
没办法了。只好把查询生成表了，就能正常了
05 29th, 2009
Option Explicit
Event MouseDown(ByVal HWnd As Long, Button As Integer, Shift As Integer, X As Single, Y As Single, Cancel As Boolean)
Event MouseMove(ByVal HWnd As Long, Button As Integer, Shift As Integer, X As Single, Y As Single, Cancel As Boolean)
Event MouseUp(ByVal HWnd As Long, Button As Integer, Shift As Integer, X As Single, Y As Single, Cancel As Boolean)
Event DblClick(ByVal HWnd As Long, Cancel As Boolean)
'——————————————————————————-
' Class_Initialize
'——————————————————————————-
' Adds the address of this object to the gcolMouseEventObjects collection
' and activates the mouse hook.
Private Sub Class_Initialize()
'Add the address of the object to the collection, using the
'address as a key.
gcolMouseEventObjects.Add ObjPtr(Me), CStr(ObjPtr(Me))
InstallMouseHook
End Sub
'——————————————————————————-
' Class_Terminate
'——————————————————————————-
' Removes this object from the gcolMouseEventObjects collection
' and deactivates the keyboard hook.
Private Sub Class_Terminate()
gcolMouseEventObjects.Remove CStr(ObjPtr(Me))
RemoveMouseHook
End Sub
'——————————————————————————-
' RaiseDblClick
'——————————————————————————-
' Raises the DblClick event.
Friend Sub RaiseDblClick(ByVal HWnd As Long, Cancel As Boolean)
RaiseEvent DblClick(HWnd, Cancel)
End Sub
'——————————————————————————-
' RaiseMouseDown
'——————————————————————————-
' Raises the MouseDown event.
'
Friend Sub RaiseMouseDown(ByVal HWnd As Long, Button As Integer, Shift As Integer, X As Single, Y As Single, Cancel As Boolean)
RaiseEvent MouseDown(HWnd, Button, Shift, X, Y, Cancel)
End Sub
'——————————————————————————-
' RaiseMouseMove
'——————————————————————————-
' Raises the MouseMove event.
'
Friend Sub RaiseMouseMove(ByVal HWnd As Long, Button As Integer, Shift As Integer, X As Single, Y As Single, Cancel As Boolean)
RaiseEvent MouseMove(HWnd, Button, Shift, X, Y, Cancel)
End Sub
能解释一下这段程序吗
这里的OCX 是什么，许多东西不懂啊
能不能具体点？
05 29th, 2009
点燃创意火花，增加社区版面凝聚力，也为今后CSDN版面间各项线下活动做好准备。CSDN特组织：『Show出你的创意，秀出你的精彩』CSDN版服设计大赛
活动对象：CSDN所有会员。
活动时间和内容：
1 、5月25日~6月7日，以大版为分类，分别组织版服设计大赛,网友们可以提交自己的创意。
2 、6月8日~10日，各大版进行投票评比，选出设计前2名，参加全CSDN版服设计大赛。
3、 6月11日~12日，限时投票选出CSDN版服大赛优胜者。
注意：截至当天的时间均为16点。如提交到6月7日16点截至。
活动内容及要求
1、突出版面特色，力求构思新颖，简洁大方。
2、原则上在设计时需加上CSDN社区logo，但如果logo的存在的确有碍你的创意迸发，则可以不加。设计时，请同时设计正反两面。
3、参加评选的版服，必须上传到CSDN相册中，以便将来给您的设计做全站推荐。 （如由于相册没有开通的原因无法上传，请用私信的方式给管理员ptwhite留言。 另外，开通的相册必须做为上传参赛图所用，如无使用，则在活动结束后进行关闭。）
4、作品不得侵犯著作权，如牵涉法律责任，由设计者承担。
奖项：
1、所有提交设计图的，每一份设计图，CSDN活动奖励可用分300分。
2、6月10日17点公布大版奖项。
第一名：版服一件+300元代金卷
第二名：版服一件+200元代金卷
3、6月12日17点公布CSDN版服优胜奖。
奖项：最佳人气奖3名
奖品：第一名：无线键盘
第二名：U盘激光笔
第三名：笔记本电脑包
设计模板
官方模板：
支持阿豆
找设计师ing。。。。
支持 ding
设计的不会，接分先。
不会设计，只会投票。
支持
纯 来 接分 》。。
各位不想画图的，不妨出出文字创意。
比如，你觉得那些keyword最能代表VB6的精髓？
希望绿豆把这个建议放到你的顶楼里，让大家都看到。
sub
com
activex
..
越想越多..接分
另外，在社区的主帖里提到：
补充：1、各版以大版主为组织，有效参赛大版，设计图不得少过10份，提交设计图的人员不得少过6人，少过该数则无效。不参与任何评奖。
这个的话，建议取消。估计咱们这里凑这个数有点难度的说
豆豆开这个帖是大版允许了的。 所以已经放进活动专帖了。
ding
同ing…
这是我前几天设计的那个T恤衫样式，请大家开动脑筋继续想些vb所特有的，能很好反映出vb特点的一些东西，谢谢！
这是根据常波同学的提议所改的夏日清凉版
顶
顶顶顶
黑色烟雾版
几米？
哈，没几米
多少钱撒
米是钱嘛
落伍啊斑竹
支持
hoho，我知道你说的是那个意思
现在只是征求设计阶段，还没有印呢，自然是无需多少米咯
来来，赶紧参加也设计一个，兴趣能得大奖哦
我来顶顶
顶
顶
找设计师ing。。。。
写点汉字也行啊，全是英文谁看呐。
VB板怎么才开始啊
modest的好！
to modest: 我喜欢第二个代码的。
建议字体换漂亮点的，颜色也变漂亮点。
VB Modest
为水源义务设计，版权转让，请速联系me。
西西，去设计一个吧。发挥你的智慧…
怎么才能得到这漂亮的衣服。
jf
衣服很漂亮
31楼的不错。
咱们版如果凑不够6个人，是不是就不能参加评奖了？
多多益善
哈哈，看看我上面的回复 看起来好小人啊
一点都不小人啊，年轻人快设计1件吧，为vb版争争面子诶
这个不错。顶！！！
虽然俺是菜鸟，可是不年轻鸟。
另外，为何你和modest都无视人数的问题啊？咱们要是凑不够6个人不是白忙乎么？为嘛不建议那个白雪什么的改改规矩啊？
一来接分二来如果设计好的T恤便宜卖给我等,最好免费
因为这个活动主要是图个热闹，只要大家多发些言把帖子给顶住了，把楼盖上去了，我和老魏也就欣慰了，哈哈
看看我给水源设计的版服
http://topic.csdn.net/u/20090527/16/e21f7aeb-3d9c-4231-8736-1989f4409a24.html
顶一个
不会设计的人来顶了
个人意见，csdn弄这么个活动实在是。。。要是开会什么的都穿个版服，不是说一帮Geek开会么。不明白阿不明白
我靠都是人才。
我就等着出来穿着到处张扬
请问英文老师，geek倒底是贬义还是褒义？
我不人设计，我认为前面中文，背面英文，
个人理解吧，不过大部分人都理解是贬义。调查显示Geek就是那种特别不吸引异性的一个团体
不懂设计，喜欢那个有代码的
Bill Gates版
前面
后面
纯捧场
声明：此乃YY版，仅供娱乐。
没那个艺术细胞~~~~~~~~
路过顶贴…….
喜欢modest 59楼第一张
mark
jf
I,Basic版
前面
后面
爱Basic版
前面
后面
搞笑啊，哈哈
为了响应YY豆的号召,我也去凑个热闹,做了一个样式:
黑底的T恤暂时没有什么能勉强拿得出的方案,先放着吧…..
YY无止境
好象还是放到另一边好些…………..改了一下:
把布局改了,把字体也改了一点,不知道要不要好些.
同志们加油啊~~
YY的老魏…………
汗,相册竟然不能上传了.
刚给小田田发了私信,应该能收到吧.
或者我再发封MAIL?
加油加油
相册可以用了,田MM速度真快……赞一个先.
把背面也发一下:
综合一下.
白版正面:
白版背面:
黑版正面:
黑版背面:
匿.
豆子的洗虾铺好棒啊
这个设计名字叫做：YY无所不在，YY无所不能！
黑色版本
前面
后面
白色版本
前面
后面
恩 YY得好
这是网友lifetimeus设计的
我左VB,右CSDN,Microsoft在头顶,背后有GOV!!!
哈哈.
豆豆的YY衣真漂亮~~~
这些都多好的，啊。
顶!
再来支持
第九个，其他的可以到这里欣赏。
http://album.hi.csdn.net/views/album/474261
豆子 77F 的YY版好象没VB的主题~~~~~~~
那个是为YY版友情设计的
我再来两种款式:
白色正面:
白色背面:
黑色正面:
黑色背面:
嘿嘿,如何?
暂时没创意了,大家一起折腾吧……………….
wasei 创意无限的modest!
87楼最后一张质感很好啊
老马帮助下弄得
顺便说一下，csdn对于Chrome的支持不太好吧，都看不多编辑的那些按钮
雅琪和小雅不只名字相像，连设计也相像。素材撞车了？哈哈哈
这个是小雅设计的：
水源的设计：
http://topic.csdn.net/u/20090527/15/1f811af9-d1d9-4701-90e1-4b985f5d987d.html
再整一款:
黑色正面:
黑色背面:
白色正面:
白色背面:
差不多了,该折腾代码去了…………..
今晚应该能把这代码弄到可全面工作,明天测试一天…..
相册地址:
http://album.hi.csdn.net/views/guestalbum/474490?d=MjAwOS01LTI5IDA6Mzc6MDU=
这都几点了，你们无敌了。
在老马的带动下，我也弄了两个，其中一个是女用的，但是模板没有女装，将就用吧
1. The flame of VB
VB=Passion+Fashion+…Imagination
V=Fire
B=Funky Sunglasses
2. The real meaning of VB… 女孩子穿还可以，男士就看勇气了
VB=Imagination
V+B=hot sexy bikini
经鉴定 clear_zero这回没盗版
顶
哈哈哈，
高高顶起~~~，哈哈，同志们厉害啊
这是来自lidia_tan(伊儿)的作品，偶帮忙发一下
这就是传说中Myjian的同住的女友么？
说实话，这两个轮子着实不错。
这套衣服，取名为：机械时代的环保
呵~~~
汗。。。汗。。。
不是女友~~~
正面放一堆 维生素B的瓶子或用瓶子围成一个VB的的形状。
然后写上：IT没有VB，结果会怎样？
我最近因为一个项目喜欢上VB了!!衣服定完稿后是不是通过CSDN可以定购的?嘿
伊儿做的YY版~~
我也来个YY版………….YY107楼的……………
快匿……….快匿……..
正面
反面
没啥创意，重在参与~~
那个和小雅重复的图是老马作的
我就是让他把 I heart VB 加进去，其他是他自己发挥的
哈，还是这个版型好