博文
日本触到这条底线就意味着中国将不宣而战转自(2006-05-06 22:44:00)
摘要： 日本触到这条底线就意味着中国将不宣而战转自81.china.com
《联合早报》转自81.china.com
转自81.china.com
转自81.china.com
转自81.china.com
目前的中日关系以达到空前紧张的程度，双方相互仇视，大有剑拔弩张一触即发之势。其结果必然导致双方共输，中方的损失更大。最大的赢家将是美国。因为按目前的政治、军事格局，无论是台湾问题还是中日问题，发展到一定阶段，美国都握有走向控制权。处理好目前及长远的中日关系对中国的意义极其重大。当前特别是近十几年，中国政府在处理这一问题上没有给予充分、清醒的认识，没有表现出大国的政治智慧。应反思自身的外交策略。 转自81.china.com
转自81.china.com
首先，对日本政府及日本民族应有清晰的认识、灵活的态度、认真的对待。 转自81.china.com
转自81.china.com
二战后的日本好似一个被阉革的矮个丑男，促其躁动的就是兜里的金钱。笔挺的经济西装打扮出白天的自信，晚上的无能又寄希望于军事的荷尔蒙促其雄起；人群外踮脚听戏数十载，买的却贵宾票，寄希望于外交的垫脚石使其能在国际舞台上哗众。也想成为一个风度翩翩的体面人，心灵的创伤却导致心灵的变态，想认错又怕把仅有的一点面子丢光。 转自81.china.com
转自81.china.com
客观地说，近十几年，日本是努力与中国修好的，向中国提供低息、无息巨额经济贷款援助，比起欧美的贷款，条件是最好的；发展中日间的经贸关系，鼓励在日商中国投资，这一切除其自身需要外，国民上下也含有悔过和补偿的心理，被褒奖的期许。当中国没有认识到日本政府及国民的这一心态，没有象大人对待坏孩子做了好事一样，给予适当的赞许和鼓励，相反，表......
Visual Basic6编程中的汉字处理(2006-05-05 22:33:00)
摘要：在DOS时代，拥有一个华丽的汉字菜单几乎是每个高档中文应用程序必须的包装。中文Windows操作系统的出现使得高级开发平台实现全中文的提示和界面非常容易和方便。在一般的应用程序中已经很少需要去专门考虑汉字处理的问题。
但是在许多工程控制和字符串处理的环境中，汉字字符的处理仍然有别于西文字符的处理，需要加以专门的考虑。
一、VB6对汉字处理的支持
对汉字处理，VB6主要是提供了一些输入法设置方面的支持。它提供了一个ImeMode属性和ImeStatus函数来确定和设置输入法的状态。而且此属性和方法只在VB6的东亚区版本中有效。
IMEStatus函数返回一个整数，用来指定当前Windows的输入法(IME)方式。
下面是中文地区的返回值：
常数 值 描述
vbIMENoOP 0 不安装IME(缺省)
vbIMEOn 1 打开IME
ImeMode属性返回或者设置被选定的对象的 IME (Input Method Editor，输入方法编辑器)状态。
可以先用ImeStatus函数来检测当前的输入状态，并用IMEMode来控制其输入状态。
如Text1.IMEMode=0(预定值)、=1(切换为中文输入)、=2(切换为英文输入)
对于简体汉字和繁体汉字 IME，只能使用设置 0 到 2。设置 3 到 10 对于汉字系统是无效的。
VB6功能上对汉字处理的直接支持也仅限于此。对于汉字字符串的处理，VB6并没有提供专门的函数和方法。
二、确定汉字字符串的长度
各个版本的VB对汉字字符的长度定义并不相同。在Windows 3.x中，VB3中认为每个汉字的长度为2字节。VB自从32位版本以後，不管中英文字，均以2 bytes来储存，这与中文Win95的汉字内核有关。但是VB4以后，VB认为每个汉字的长度为1。这在处理包含汉字的字符串时带来很多的不便。
由于Len、Left、Mid等字符串函数认为一个汉字和一个西文字符的长度都为1，因此处理汉字字符串时有一定的难度。实现上必须要能把汉字按照两个字符(字节)的形式读出。因此在截取汉字字符串的子串时需特别注意。
由于汉字处理和汉字字模存储的特殊性，在许多情况下我们希望汉字字符的长度为2，英文字符为1。......
用VB进行移位操作(2006-05-05 22:28:00)
摘要：用VB进行移位操作
VB没有提供移位操作的指令和函数,只提供and(与)、or(或)、xor(异或)、eqv(同或)、not(非)等几个运算符,
而编程时有时需要对一个字节进行移位操作(如进行加密),怎么办?其实只用and、or二个运算符即可搞掂。
例如要将变量byte1的第八位置1(假设byte1的二进制值为01001101),则只需byte1 or &h80 (即01001101 or 10000000),
如要将第八位置0，则只需byte1 and &h7f。请看下面程序段是如何实现循环左移的：
Public Function byteleft(byte1 As Byte, n As Integer) As Byte '将byte1左移n位
Dim intem As Byte '临时变量
Dim intem1 As Byte '临时变量
Dim x, y As Integer
intem1 = byte1
For x = 1 To n '移多少位就循环多少次
For y = 8 To 1 Step -1 '从第八位(左边第一位)开始循环左移
Select Case y
Case 8
If (intem1 And &H80) = &H80 Then '如果临时变量intem1的第八位是1,
intem = &H1 '则将临时变量intem置1,
Else
intem = &H0 '反之置0
End If
Case 7
If (intem1 And &H40) = &H40 Then '如果临时变量intem1的第七位是1,
intem1 = intem1 Or &H80 '则将其第八位置1(其它位不变),
Else
intem1 = intem1 And &H7F '反之将第八位置0(其它位不变)
End If
Case 6
If (intem1 And &H20) = &H20 Then '操作与上面相同
intem1 = intem1 Or &H40
Else
intem1 = i......
VB串口编程的几个问题(2006-05-05 22:21:00)
摘要：
VB串口编程的几个问题作者：易兵 已阅读503次
目次：
串口数据接收方式
如何处理不定长数据的接收
用字符方式收发码值大于127的字符数据
串口通讯问答2
串口数据接收方式
1、 在OnComm 事件中接收数据：
这种方式能充分MSCOMM控件的特性。OnComm 事件还可以检查和处理通讯错误；可以通过检查CommEvent 属性的值来查询事件和错误；对于不定长数据以及对数据进行处理比较复杂的情况，此法不是很方便。
Private Sub MSComm_OnComm ()
Select Case MSComm1.CommEvent
' 错误
Case comEventBreak ' 收到 Break。
Case comEventCDTO ' CD (RLSD) 超时。
Case comEventCTSTO ' CTS Timeout。
Case comEventDSRTO ' DSR Timeout。
Case comEventFrame ' Framing Error
Case comEventOverrun '数据丢失。
Case comEventRxOver'接收缓冲区溢出。
Case comEventRxParity' Parity 错误。
Case comEventTxFull '传输缓冲区已满。
Case comEventDCB '获取 DCB] 时意外错误
' 事件
Case comEvCD ' CD 线状态变化。
Case comEvCTS ' CTS 线状态变化。
Case comEvDSR ' DSR 线状态变化。
Case comEvRing ' Ring Indicator 变化。
Case comEvReceive ' 收到 RThreshold # of chars.
Case comEvSend ' 传输缓冲区有 Sthreshold 个字符 '
Case comEvEof ' 输入数据流中发现 E......
数据加密技术(论文)(2006-05-05 22:17:00)
摘要：
数据加密技术(论文)
文章出处： 发布时间：2005-05-12 点击次数：1252
google_ad_client = "pub-5920153652866057";google_ad_width = 336;google_ad_height = 280;google_ad_format = "336x280_as";google_ad_type = "text_image";google_ad_channel ="9395858272";google_color_border = ["FFFFFF","DFF2FD","6699CC","FF4500"];google_color_bg = ["FFFFFF","DFF2FD","003366","FFEBCD"];google_color_link = ["000000","0000CC","FFFFFF","DE7008"];google_color_url = ["000000","008000","AECCEB","E0AD12"];google_color_text = ["000000","000000","AECCEB","8B4513"];
我们经常需要一种措施来保护我们的数据，防止被一些怀有不良用心的人所看到或者破坏。在信息时代，信息可以帮助团体或个人，使他们受益，同样，信息也可以用来对他们构成威胁，造成破坏。在竞争激烈的大公司中，工业间谍经常会获取对方的情报。因此，在客观上就需要一种强有力的安全措施来保护机密数据不被窃取或篡改。数据加密与解密从宏观上讲是非常简单的，很容易理解。加密与解密的一些方法是非常直接的，很容易掌握，可以很方便的对机密数据进行加密和解密。
一：数据加密方法
在传统上，我们有几种方法来加密数据流。所有这些方法都可以用软件很容易的实现，但是当我们只知道密文的时候，是不容易破译这些加密算法的（当同时有原文和密文时，破译加密算法虽然也不是很容易，但已经是可能的了）。最好的加密算法对系统性能几乎没有影响，并且还可以带来其他内在的优点。例如，大家都知道的pkzi......
一个大学女生总结的大学生活 (2006-05-04 21:55:00)
摘要：能成为十大话题 又被荐了
实属荣幸
感谢了
首先谢谢你们顶贴
这不是我的生活
看看《粉红四年》你们就明白了
还要感谢那个告诉我出处的跟贴
再谢了
看看你的大学生活是不是也这样呢？？？？？？
1. 任何一个学校，平庸的大学生是相似的，不平庸的大学生各有各的辉煌。
2．高中时代，爱情是奢侈品，少数人拥有得起。大学时代，爱情是日常用品，没有很寒酸。
3．悲剧的形成的性格根源就是那个人不是什么好人也不是什么坏人，非善非恶。
4．容貌这问题在一定程度上也会影响女生寝室人际关系。
5．女生大一时急着找男朋友是因为刚解放要尝新鲜！女生大二时急着找男朋友是因为终于发现了大学生活是多么的空虚和无聊。大三时急着找男朋友常常是出于攀比，因为身边的女生好象都有男朋友了，大四时时急着找男朋友的往往是在寻找长期饭票或者跳板。
6．女人的竞争，无处不在，见缝插针。
7．一个女人若是有很多男人追，要么她特别有魅力，各方面条件都非常优越；要么她深谙男人的心理，能够做到知己知彼，百战不殆。
8．而真正的泡妞高手是从来不会主动去粘女孩子的。真正的高手自有女孩子寻死觅活的要去投怀送抱。就如真正有魅力有品位的男人会明白这世界上多数女人对他而言可以弄上床，少数女人可以让他上眼，极少数女人能够让他上心。优秀男人的三上理论。这些，男人泡到一定的程度就全都明白了。
9．所有的面试都是另一种意义上的轮*，你被一群人一一试过一番，再决定要不要把你留在身边多享用几次，伺候得好以后还可以扶正什么的。
10.等在大学里混了半年才知道，爱情是随处可拾，图书馆篮球场食堂都可以成为爱情发源地。可正因如此，才显贱价。
11.我忽然觉得这种竞争毫无意义。彼此都象井底之蛙，就算争得鱼死网破，一方把另一方置于死地那意义又何在？意义仅仅在于，输者逃离这个井，或者死在井底的角落，或者一跃而出，而胜者沾沾自喜的继续做井底之蛙，自以为抬头的一片天就是她的天下了。
12.谁不是在伤害中成长？谁不是在被欺骗后才学会算计？彼此彼此。
13.在......
asp关于数据库连接的一点个人见解(2006-04-30 23:05:00)
摘要：最近经常见到有人问如何连接数据库效率最高，耗费资源最低，在这里我谈一下我的看法。连接数据库不外乎三种方法，一种是将数据库连接放到session变量中，一种是放到application变量中，再一种就是在页面中使用时打开，用完立刻关闭。尽管前两种方法用起来比较方便，但应该说第三种方法是最好的，下面我分别讲一下，由于水平所限，错误难免，请大家指正。
session:用session的缺点显而易见，服务器会为每一个用户创建一个数据连接，直到这个用户离开或session超时，这样就会大大浪费服务器资源，如果访问量大的话，系统资源就会被耗尽，或者数据库连结数到达上界，就会造成程序出错。
application:既然用session会出现这么多问题，那是不是用application最节省资源呢？只建立一条连接就够了，大家共用。不是这样的，如果无论多少用户只建立一条连接，同样会带来很多问题，首先是如果访问量大，一条连接肯定无法满足需要，同样会造成程序出错；其次，如果你用了私人临时表或光标，那麻烦就来了。私人临时表和光标只对当前连接可见，可是如果大家都用一条连接，那么就会产生冲突，造成程序错误。
最后一种方法（即开即用即关）：这是最好的一种方法，原因如下:打开数据库连接，使用完立即关闭，是一种良好的编程习惯，其实不仅是数据库连接对象如此，所有对象也就是说server.creatobject出来的对象理论上生存期都不能超过0.01秒(国外有人做过测试的，不是我信口开河），如果超过就会对效率产生影响。那么也许你会说每个页面都会打开一个连接，那打开的连接数不是更多，效率不是更低吗？错了，讲到这里就不能不提一下连接池（也叫共享池的概念），现在的大型数据库包括odbc本身都提供连接池的功能，他的基本原理是这样的，一个连接申请关闭时系统并不是真的关闭它，而是将它放到共享池中，如果这时有相同的连接请求，系统就会把这个连接从共享池中取出来给用户，这样就省去了关闭和打开连接的系统开销，只有当这个连接长时间不被请求时并且共性池中的连接饱和，系统才会真的干掉它。明白这个道理，你就明白尽管你在程序中请求打开和关闭连接，但系统并不一定要增加这些开销的。
道理讲完了，现在给例子。下面是打开和关闭数据库连接的两个函数，你可以把它存为一个in......
如何增强ASP程序性能_简介(2006-04-30 23:02:00)
摘要：简介
性能是一个很重要的特征。你需要事先设计好性能指标，否则日后就要为此重新编写程序。就是说：要设想好怎样最佳化地执行ASP程序？
本文提出了一些优化ASP应用和VBScript的技巧，许多技巧和缺陷都经过了研讨。这里列出的建议已经在http://www.microsoft.com 和其他站点上进行了测试，都工作得非常好。本文假设你具备ASP开发的基本知识，包括VBScript或者JScript，ASP应用程序，ASP Session，以及其他ASP内置对象（Request，Response和Server）。
通常，ASP的执行性能远远不仅仅依赖ASP代码本身！在本文的尾部列出了与性能相关的资源，它们含概了ASP和非ASP的部分，包含ActiveX Data Objects（ADO），Component Object Model（COM），数据库（Database），以及Internet信息服务器（IIS）的配置。除了这些，还有一些非常好的链接值得你一看。
典型的情况是：ASP页面从后台存储中取回数据，然后以超文本标记语言（HTML）的形式形成结果。不管数据库的速度如何，从内存中取回数据要比从后台存储设备中快得多。从本地硬盘读取数据通常也非常快。所以，提高性能可以通过缓存服务器上的数据来实现，无论是将数据缓存在内存中，或者本地硬盘中。
缓存是经典的“空间换时间”的折中方式。如果缓存得恰当，就可以看到显著的性能提升。为了让缓存有效，必须保证缓存数据是经常要重用的，而且也是计算起来繁琐的。装满陈旧数据的缓存是对内存的浪费。
不经常改变的数据是缓存的较好对象，因为不需要随时考虑这些数据更新后的同步操作。组合框、参考表格、DHTML代码、扩展标记语言串、菜单以及站点配置变量（包括数据源名字DSNS，Internet协议地址IP以及Web路径）都是很好的缓存对象。注意：要缓存数据表达式而不是数据本身。如果一个ASP页面经常变化并且很费力去缓存（比如整个产品目录），就要考虑预产生HTML，而不是每次发生请求时再描述它。
ASP中的Application和Session对象是在内存中缓存数据的便利容器。你可以将数据赋值给Application和Session对象，这些数据在HTT......
ASP实例(2006-04-30 23:00:00)
摘要：如何处理ASP中的图象
在用ASP编程中，很多时侯要用到图象。对于单纯从数据库中处理一个图象，方法大家讲了很多，也不难，
可以看下面的代码：
这里假设你有个数据库名字叫：PUBS，在数据库中有一个叫：PUB_INFO的表，在表中有一个LOGO
的BLOB列。我们查出PUB_ID=0736的人的相片。
FILE: SHOWIMG.ASP
***************************************
<%@ LANGUAGE="VBSCRIPT" %>
<%
' Clear out the existing HTTP header information
Response.Expires = 0
Response.Buffer = TRUE
Response.Clear
' Change the HTTP header to reflect that an image is being passed.
Response.ContentType = "image/gif"
Set cn = Server.CreateObject("ADODB.Connection")
' The following open line assumes you have set up a System DataSource
' by the name of myDSN.
cn.Open "DSN=myDSN;UID=sa;PWD=;DATABASE=pubs"
Set rs = cn.Execute("SELECT logo FROM pub_info WHERE pub_id='0736'")
Response.BinaryWrite rs("logo")
Response.End
%>
*****************************************
执行这个ASP文件就可以看到你存在数据库中的图......
ASP神奇FSO(2006-04-30 22:56:00)
摘要：在ASP中，FSO的意思是File System Object，即文件系统对象。我们将要操纵的计算机文件系统，在这里是指位于web服务器之上。所以，确认你对此拥有合适的权限。理想情况下，你可以在自己的机器上建立一个web服务器，这样就能方便地进行测试。如果运行于Windows平台，请试一试微软公司的免费个人Web服务器PWS。
FSO 模型对象
Drive Object：驱动器对象 供存取磁盘或者网络驱动器
FileSystemObject Object：文件系统对象 供存取计算机的文件系统
Folder Object：文件夹对象 供存取文件夹的所有属性
TextStream Object：文本流对象 供存取文件内容
你可以使用上面的对象做计算机上的任何事情，也包括破坏活动 ;-( 所以，请小心使用FSO。在web环境中，存储信息是非常重要的，比如用户信息，日志文件，等等。FSO提供了一个强大且简单的方法高效率地保存数据。在这篇文章里面，着重讨论FileSystemObject和TextStream对象。
FSO由微软公司提供支持，对于非Windows系统，大概不能再使用ASP。
怎么样使用FSO？
为了使用FSO来执行所有的工作，首先要创建对象，代码就象下面这样：
< %
Set fso = Server.CreateObject("Scripting.FileSystemObject")
% >
这样就建立了FSO并且赋予变量fso，接着就可以使用熟悉的object.method语法来执行文件系统的操作〔查看Visual Basic文档，获取更多的关于对象和对象向导编程的知识〕。在这里，我们可以使用fso.method 或者 fso.property，这些将在下面的例子中看到。
FSO模型位于由微软提供的脚本运行时间DLL文件中，它是scrrun.dll。你可以在任何应用程序中引用这个DLL文件，比如MS Access，Word。 就是说，并非仅仅限制在ASP中应用它。
这里有一个简要的FSO方法列表：
FSO方法 ......