用AspJpeg组件,按宽高比例,真正生成缩略图

laifangsong's .NET blog

取长补短,精益求精。 (打个广告,想做手机网站和asp/asp.net网站的可以跟我联系.QQ:25313644)
  博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理

2006年11月30日

摘要: 网址: asp: "http://([\w-]+\.)+[\w-]+(/[\w- ./?%&=]*)?" dotnet: @"http://([\w-]+\.)+[\w-]+(/[\w- ./?%&=]*)?" js: /http:\/\/([\w-]+\.)+[\w-]+(\/[\w-\s .\/?%&=]*)?/gi 阅读全文

posted @ 2006-11-30 10:51 laifangsong 阅读(205) 评论(0) 推荐(0) 编辑

2006年11月28日

摘要: c语言: /*筛选法取得 1-N的所有素数*/#include "math.h"#define MAX 100main(){ int a[MAX]; int i,j; a[0]=0; for(i=1;in) { return 1; } else { return 0; }} 阅读全文

posted @ 2006-11-28 09:13 laifangsong 阅读(767) 评论(0) 推荐(0) 编辑

2006年11月24日

摘要: c语言: /*二分法查找*/#define N 6main(){ int a[N]={1,2,3,5,7,10}; int searchNum=5; int index; index=search(a,searchNum); if(index!=-1) printf("a[%d]=%d",index,searchNum); else ... 阅读全文

posted @ 2006-11-24 15:59 laifangsong 阅读(667) 评论(0) 推荐(0) 编辑

2006年10月27日

摘要: 想按自己的思路重写一些经典算法,以提高编程水平,请高手多执教。问题:一个小孩买了价值少于1美元的糖,并将1美元的钱交给售货员。售货员希望用数目最少的硬币找给小孩。假设提供了数目不限的面值为2 5美分、1 0美分、5美分、及1美分的硬币。售货员分步骤组成要找的零钱数,每次加入一个硬币。选择硬币时所采用的贪婪准则如下:每一次选择应使零钱数尽量增大。为保证解法的可行性(即:所给的零钱等于要找的零钱数),... 阅读全文

posted @ 2006-10-27 18:02 laifangsong 阅读(4241) 评论(1) 推荐(0) 编辑

2006年10月26日

摘要: 经常做数据库访问性能测试时,需要用到数据量很大的表,自己动手写一段TSQL语句即可。TSQL_生成表结构: /**//****** 对象: 表 [dbo].[LargeTable] 脚本日期: 2006-10-26 15:40:27 ******/if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[Lar... 阅读全文

posted @ 2006-10-26 15:48 laifangsong 阅读(1615) 评论(0) 推荐(1) 编辑

2006年10月24日

摘要: 用AspJpeg组件,按宽高比例,真正生成缩略图 博客原发! 阅读全文

posted @ 2006-10-24 12:18 laifangsong 阅读(2999) 评论(3) 推荐(0) 编辑

摘要: 阅读全文

posted @ 2006-10-24 08:31 laifangsong 阅读(1077) 评论(3) 推荐(0) 编辑

2006年10月18日

摘要: asp: CLng(a_Data(j)) Then k = j End If Next t = a_Data(i) a_Data(i) = a_Data(k) a_Data(k) = t Next SelectSort = a_DataEnd Function'快速排序Fu... 阅读全文

posted @ 2006-10-18 15:12 laifangsong 阅读(776) 评论(0) 推荐(0) 编辑

摘要: asp: 人数:" & num & "" Response.Write "报数间隔:" & spe & "" Response.Write "结果:" Dim s For i=num To 1 Step -1 s = s & aNum(i) & "," Next s = Left(s, Len(s)-1) Response.Write s... 阅读全文

posted @ 2006-10-18 10:15 laifangsong 阅读(1561) 评论(0) 推荐(0) 编辑

2006年10月17日

摘要: bound Then Response.Write s & "" Exit Function End If For i = 0 To bound If IsExists(s, a_Num(i)) = False Then Call Combination(n_Cur+1, a_Num, s & a_Num(i... 阅读全文

posted @ 2006-10-17 15:02 laifangsong 阅读(516) 评论(0) 推荐(0) 编辑