亚洲AV永久无码天堂影院,在线观看午夜亚洲一区,亚洲av成人无码久久精品

�|�明 — Fri, 20 Jul 2007 01:33:00 GMT

复制下面的JavaScript代码�q�粘贴到地址栏�?看看效果 : )


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



把代码中的images�Ҏ(gu��)��links再试�?: )

转蝲�?a >http://weblogs.java.net/blog/kirillcool/archive/2007/07/a_silly_trick_w.html

  

�|�明 2007-07-20 09:33 发表评论



用Perl实现HTTP�|�络下蝲�E�序
�|�明 — Wed, 03 Jan 2007 13:00:00 GMT

		
		
		先讲讲做�q�个���程序的动机吧，昨天看了�?a title="哈工大��Y件学院新��d���?  target="_blank">以前学院的新�?/a>�Q�没什么更斎ͼ�但发现列表很长，保留�?003�q?月至今的所有新闅R�?br />
�q�个新闻列表是大学期间我们了解学院信息的主要来源�Q�都��L��了每天先看新��d���?a title="哈工大��丁香BBS"  target="_blank">BBS的习惯。在大连实习期间更是如此�Q�也���是产生感情了^__^�Q�所以。。。决定把�q?00+新闻全部保存下来...

需求：指定一个网址�Q�将�q�个�|�页和里面所有的子链接页面都下蝲下来�Q�保存到指定的文件夹中�?br />
如下图所�C�：



需求有了，怎么完成呢？�?a  target="_blank">�q�雷下蝲全部链接�Q�嗯�Q�这是个好主意，�Q�我���实也这么做了一�ơ，�q�接数开得太多了�Q�差点被���orz �Q�，但咱们是搞��Y件的@_@�Q�这个小功能是不是写个程序就能搞定，�?a  target="_blank">Java�Q�想到那一堆Stream的封装（new BufferedReader(new BufferedOutputStream(new FileOutputStream(new File("blabla.html"))))�Q?..我就头晕�?br />
���程序用脚本语言�Q�应该不错！

�?a  target="_blank">Perl�q�是Python�Q�。。。经�q�一番网上查询论证，��g���Q�Perl语法复杂�Q�但����l�，API库也�����多；Python语法清晰易懂�Q�有点像Java�Q�适合开发大型应用�?br />
Java是我的最爱，也算熟�?zh��n)�了，���学点bt的吧�Q�用Perl

完成代码期间主要参考了Perl文档中URL�Q�HTML::LinkExtor�Q�HTTP::Request的用法，Perl中国的一���文�?a  target="_blank">《LWP与WEB的基本��用�?/a>�Q�还占用了J2EE的上课时间来�~�写�E�序。。�?br />

		
				 1
				
				#
				
						

				
				 2
				
						# Copyright (C) 2007 �|�明 

				 3
				
						#
				
						

				
				 4
				
						
				
				
						

				
				 5
				
						
				
				use
				 strict 
				"
				vars
				"
				; 
				#
				严格遵��@my scope定义
				
						

				
				 6
				
						
				
				
						

				
				 7
				
						
				
				use
				 LWP
				::
				Simple;

				 8
				
						
				
				use
				 HTML
				::
				LinkExtor;

				 9
				
						
				
				use
				 HTTP
				::
				Request
				::
				Common;

				10
				
						
				
				use
				 LWP
				::
				UserAgent;

				11
				
						
				
				use
				 URI
				::
				URL;

				12
				
						
						

				
				13
				
						
				
				#
				 从命令行参数中取�ȝ����地址和保存文件夹
				
						

				
				14
				
						
				
				my
				 
				$url
				 
				=
				 
				$ARGV
				[
				0
				]; 

				15
				
						
				
				my
				 
				$location
				 
				=
				 
				$ARGV
				[
				1
				];

				16
				
						
						

				
				17
				
						
				
				#
				 子程序，解析�ȝ����中的链接地址
				
						

				
				18
				
						
				
				my
				 
				@urls
				 
				=
				 ();

				19
				
						
				
				sub
				 urlCallback

				20
				
						{

				21
				
						    
				my
				(
				$tag
				,
				 
				%attr
				) 
				=
				 
				@_
				;

				22
				
						    
				return
				 
				if
				 
				$tag
				 ne 
				'
				a
				'
				;

				23
				
						    
				push
				(
				@urls
				,
				 
				values
				 
				%attr
				);

				24
				
						}

				25
				
						
						

				
				26
				
						
				
				#
				 用于解析链接的LinkExtractor
				
						

				
				27
				
						
				
				my
				 
				$p
				 
				=
				 HTML
				::
				LinkExtor
				->
				new(
				\&
				urlCallback);

				28
				
						
						

				
				29
				
						
				
				#
				 载入�ȝ����内容，及解析链接地址
				
						

				
				30
				
						
				
				my
				 
				$ua
				 
				=
				 LWP
				::
				UserAgent
				->
				new;

				31
				
						
				
				my
				 
				$res
				 
				=
				 
				$ua
				->
				request(HTTP
				::
				Request
				->
				new(GET 
				=>
				 
				$url
				)
				,
				 
				sub
				{
				$p
				->
				parse(
				$_
				[
				0
				])});

				32
				
						
						

				
				33
				
						
				
				#
				 ���链接的相对路径转换为绝对�\�?/span>
				
						

				
				34
				
						
				
				my
				 
				$base
				 
				=
				 
				$res
				->
				base;

				35
				
						
				
				@urls
				 
				=
				 
				map
				 {
				$_
				 
				=
				 url(
				$_
				,
				 
				$base
				) 
				->
				 
				abs
				} 
				@urls
				;

				36
				
						
						

				
				37
				
						
				
				#
				 ���网��写入文�?/span>
				
						

				
				38
				
						
				
				$ua
				->
				request(GET(
				$url
				)
				,
				 
				$location
				 
				.
				 
				'
				\\index.html
				'
				);

				39
				
						
				
				my
				 
				$index
				 
				=
				 
				1
				;

				40
				
						
				
				foreach
				(
				@urls
				)

				41
				
						{

				42
				
						    
				$ua
				->
				request(GET(
				$_
				)
				,
				 
				$location
				 
				.
				 
				'
				\\
				'
				 
				.
				 
				$index
				 
				.
				 
				'
				.html
				'
				);

				43
				
						    
				$index
				+=
				1
				;

				44
				
						}
		
		
				
�ȝ����保存�ؓindex.html�Q�子�|�页�?�?�?排序生成1.html�?.html�{?br />
因�ؓ�?a  target="_blank">Google Desktop�Q�即使文件名�?.html...�Q�搜索�v来也是很方便的。也可以扩充下，��?lt;a>中的新闻主题抽出来作为文件名。但�q�个�E�序�Ҏ(gu��)��来说已经���_��了，所以就不���l�做了�?br />
�ȝ��来说用Perl�q�是很简单的�Q�库也很多，写�v来挺方便�Q�但是要记得常翻��?a  target="_blank">Perl手册�Q�呵�?br />
Technorati Tag :  Perl LWP  Download  web  script


�|�明 2007-01-03 21:00 发表评论


��Z��么用PreparedStatement而不是直接用"+"�q�接SQL语句
�|�明 — Wed, 01 Nov 2006 12:18:00 GMT

		最开�?我在�E�序里��用SQL讉K��数据库时�Q�都是直接用�?”将字段值嵌到SQL中。�?
		
				
				String sql 
				=
				 
				"
				select s.name from student s where s.id='
				"
				 
				+
				 sId 
				+
				 
				"
				'
				"�Q?/span>
		
		

		
				
后来我开始���?strong>PreparedStatement�Q�在SQL里��用“？”标记参敎ͼ�然后用setXXX�Ҏ(gu��)���l�参数赋倹{��当时只知道�q�样用是因�ؓ�?strong>setDate�Q�setTimeStamp�q�些用�?”连接不能直接嵌入的倹{�?br />
感觉PreparedStatement�?strong>性能斚w��应该也能快点�Q�可能DBMS会重用，但不明底层原理�?br />
�q�次《数据库实现》课�E�终于让我弄懂了�Q?strong>每个SQL语句都要通过 语法分析 -> 生成逻辑查询计划 -> 逻辑优化 -> 物理优化 �{�步骤生成具体的执行计划�Q�用PreparedStatement���可以生成一个执行计划，以后只是参数改变�Q�相当于执行计划�?strong>执行环境改变�Q�，前面的四个步骤也�?strong>省略�Q�从而提高了效率�?br />
如果一个SQL语句要被反复多次执行�Q�或多用户同时操作，则应选用PreparedStatement�Q?/p>


�|�明 2006-11-01 20:18 发表评论


Web2.0的时代到来了吗？
�|�明 — Fri, 10 Mar 2006 03:42:00 GMT
      有越来越多的�q�象表明Web2.0之类的东西渐渐深入网�l�的各个角落�Q�无论是Google Maps�Q�Gmail�Q�Flickr�q�是国内�?63邮箱�?65kit、豆瓣网�Q�都把Ajax之类代表Web2.0的技术发挥得淋漓���致�Q�撇开他们用的技术不���，单从他们提高的用户交互“流畅感”，���可以说是对Web技术的一�ơ改革�?BR>
      以前的Web应用从功能方面考虑的因素比较多�Q�对提升用户体验度所做的工作很少�Q�现在的Web2.0应用则从用户的角度入手，把提升用户体验度当成�W�一目标。以前不喜欢搞Web开发，更不喜欢用JavaScript�Q�感觉那些东东只能做些美化界面的�z�，做些动画什么的�Q�因为当初认为它只能在客��L��发挥作用�Q�而现在JavaScript和异步传输结合，���把服务器的地盘也夺�q�来了�?BR>
      如今�Q�Web2.0应用的复杂度已经可以与大型应用媲���了�Q�很多提高用户体验度的东东都要在后台做大量有技术难度的工作�Q�如365kit的通讯录同步功能，���p��在与Outlook、MSN、手��Z��互中下很大工夫�?BR>
      现在�q�没有时��_��要忙着做项目和毕业设计�Q�等�q�一阵子�Q�一定要研究一下Ajax和JavaScript�Q��ƈ做出个像��L��应用来。也希望以后能做��Z��好的应用�Q�有市场的，慢慢把它做大�Q�推�q�，现在不流行网�l�创业吗�Q�呵呵，而且门槛也比较低�Q�要的硬件和资金不多�Q�主要是应用要有市场、有创意�Q?BR>
      Web2.0火了�Q�我们又多了一条�\�Q?BR>
�Q�写得不好，�Ƣ迎大家拍砖�Q?BR>

�l�：
RIA应该也是一�U�实现Web2.0的技术？ 

Web2.0应该是一�U�思想�Q�是通过提高用户体验度来赢得市场�Q�实现它的技术有很多�Q�只要能辑ֈ�提高用户体验度的目的�Q�我们就可以说它“是”Web2.0�Q�不是吗�Q?

RIA技术我知道的好像有三种�Q?、Flex 2、Eclipse RCP 3、Ajax  4、Java Web Start


�|�明 2006-03-10 11:42 发表评论


使应用具有快速更换数据库能力
�|�明 — Thu, 06 Oct 2005 07:49:00 GMT
问题虚拟背景�Q?BR>A��目�l�要实现一个基于Sql Server的应用，但工作环境只安装有MySql�Q�公司对开源比较看�? )�Q�，而且客户有可能会转移到Oracle数据库环境。要求应用具有数据库�U�L��能力和快速更换能力，使应用在工作环境调试成功后能�q�速�{�U�d��客户的Sql Server环境�Q�而且���来可以方便地�{向Oracle�?/P>
Andy提出的可用方案：
1、��用标准JDBC
2、��用抽象类定义数据讉K��单元
3、定义具体数据源讉K��单元�l�承2中接�?/P>
代码�C�Z���Q?BR>定义数据讉K��单元抽象�c�，包含数据讉K��逻辑
public abstract class DataManager
{
 protected static String conString = null;
 protected static String urlString = null;
 public DataType[ ] getData()
 {
   //fetch data using standard JDBC with conString and urlString
 }

 public void setData(DataType[ ] dataArray)
 {
   //store data using standard JDBC with conString and urlString
 }
}

定义具体数据源访问单�?/P>
public class HsqlDataManager extends DataManager
{
 static
 {
  conString = "org.hsqldb.jdbcDriver";
  urlString = "jdbc:hsqldb:db/YourDatabaseName";
 }
}

public class OdbcBlogManager extends AbstractBlogManager
{
 static
 {
  conString = "sun.jdbc.odbc.JdbcOdbcDriver";
  urlString = "jdbc:odbc:db/YourDatabaseName";
 }
}

在调用数据访问层�Ӟ��可以声明一个DataManager的引用，然后在构造器中实例化为具体子�c�，如：
public class Andy
{
 private DataManager dataManager = null;
 
 public Andy
 {
  dataManager = new HsqlDataManager();
  //或者在资源文�g里填写具体子�c�，然后在这里动态加载�ƈ实例�?/SPAN>
 } 

 public void doSomething()
 {
  dataManager.getData();
  
 }
}

以后要迁�U�d��另一个数据库�Q�有JDBC驱动�Q�，只需定义具体子类�l�承DataManager�Q�如HsqlDataManager�Q�，然后修改资源文�g中的DataManager名称�Q�或者将new的类名改一下）�Q�不需要修改代码�?/P>
�q�兴许可以解释另一个问题：不赞成��用存储过�E�，而应���SQL语句嵌在代码中（适用于Java�Q�微软注�?Net不会有��^台移植性，数据库大都用Sql Server�Q�所以写存储�q�程�q�是比较好的�Q��?BR>
�Q�我在我的一个Eclipse RCP��目里��用了�q�种模式�Q�从Sql server 2000到Hsql�Q�特别方便，看�v来感觉也比较好）

�Ƣ迎大家拍�{�Q�^_^


�|�明 2005-10-06 15:49 发表评论


�q�样可以使用户不能关闭IE吗？
�|�明 — Sun, 12 Jun 2005 20:45:00 GMT
我们在IE里编辑blog�Ӟ��如果按下关闭按钮�Q�会弹出一个确认对话框�Q�点“取消”之后IE不会关闭�?/P>
�q�是不是能实现rt功能�Q�是什么促使对话框的弹出，是JS�q�是内嵌的word或其他？
以前有�h问过怎么避免用户误关闭IE�Q�当时觉得不可能实现�Q�那不成病毒�|�页了吗�Q�）�Q�现在发现好像还是可以的�Q�山外有山啊�Q�！�Q?/P>
得出一个道�? 多接触一点东西，���现在年�?/P>

�|�明 2005-06-13 04:45 发表评论