QQ登录

只需一步,快速开始

登录 | 注册 | 找回密码

三维网

 找回密码
 注册

QQ登录

只需一步,快速开始

展开

通知     

goto3d 说: 在线网校重磅上线MC2022&Inventor2022全新课程,虞为民老师、大表哥同事精彩讲解,快去围观!
2021-06-25
查看: 1019|回复: 1
收起左侧

[讨论] 欢迎进来讨论:做网站的一些经验与技巧!

[复制链接]
发表于 2008-7-11 17:07:11 | 显示全部楼层 |阅读模式 来自: 中国广东珠海

马上注册,结识高手,享用更多资源,轻松玩转三维网社区。

您需要 登录 才可以下载或查看,没有帐号?注册

x
欢迎进来讨论:做网站的一些经验与技巧!4 r' G4 T9 k& `5 _2 m: F5 n: O
1.几个常用函数
% [( g, v, D4 g1 Z! q/ [" Z6 _Round(pi, 2) 四舍五入 0 v9 u6 i$ G# W7 C8 f" ^2 U! m
FormatNumber(k,4) ' 把 k 格式化为带四位小数点的数。   `3 [+ m: R0 g* E8 A8 S8 s
eg. 如果k =20000则显示为20,000.00;如果把formatnumber(k,0)则为20,000 ! h7 O/ d$ Z4 e
Replace(expression,find,replacewith) '返回一字符串,其中指定的子串已被另一个子串替换 5 r4 T) y" j( f) p1 a
Left(String,Length) '返回指定数目的从字符串的左边算起的字符串。
; {1 y" b  i& T+ \Split(expression[, delimiter[, count[, start]]]) '返回基于 0 的一维数组,其中包含指定数目的子字符串。
5 g6 |/ y6 ?6 `$ O" x* Qeg. 常用这个 Split(String,[delimiter]) ' 用delimiter(用于标识子字符串界限的字符)来划分字符串 ) Y( L  z9 k, p: }- q
Instr(String1,String2) '返回某字符串在另一字符串中第一次出现的位置
! Y/ b1 \3 W0 k1 a$ i" O. Meg1. if instr(addation,"密码配置表")<>0 then '说明存在
/ }: n) F5 g5 u6 ]2 \eg2. if instr(str,”AP”) >0 不好区分str = (AP,AP&AC),此时只要变为(’AP’,’AP&AC’),再用instr(str,”’AP’”)
: N8 t5 h, f( s% b+ D2. 弹出窗口Pick值
' c6 m0 a/ V' Y8 c6 ffunction pickupSP(spdisid,pjnum,pdcode)
* P! D6 r8 l  j5 ?7 @9 }{
3 K2 F5 }% w7 zwindow.opener.<%=theForm%>.RefNum<%=Spid%& U# o4 O* J4 [, Y1 s3 z- q4 s
>.value=spdisid; 9 L9 v$ e& f  l+ c+ n0 y# F" b6 b
window.opener.<%=theForm%>.LineS<%=Spid%9 f7 Y# H) y* V; \
>.value=pjnum;
6 w' `% c( a7 Q1 n6 h$ s) B+ M  kwindow.opener.<%=theForm%>.kokey<%=Spid%
/ v1 C& a  |3 s& [>.value=pdcode;
* z. K. q& E. v4 `  ]* ?* s9 kwindow.close(); / i% _9 E( Y8 |7 K
} % c1 c( l, G! v" x: `0 u/ M4 E3 r$ u
3. ASP控制图片显示的大小(等比例缩放)
- D. A& ~# V! x  d<HTML>
/ F' B, G; y0 g5 E8 c1 ~4 }<HEAD> ) i1 l4 w; g# [9 c' z
<TITLE> New Document </TITLE>
0 i; b4 W# |* @<script language="JavaScript">
" b7 @) N3 j5 S) D1 F6 `8 A<!--
  v2 _6 }+ \  D. f# evar flag=false;
* J0 V- {! K; W: h6 dfunction DrawImage(ImgD){
" T' A+ A9 A* T( y, i! c3 X, O) hvar image=new Image();
6 |0 c7 m8 @0 J. X6 nimage.src=ImgD.src; 5 D5 A$ c1 A) x9 m7 |* u7 P
if(image.width>0 && image.height>0){ 2 o0 Z% @6 R: ~) U9 R
flag=true; 4 q' h" W" ]. i1 L9 l1 H! f3 D
if(image.width/image.height>= 164/112){ ! j% I7 B( L" F! X5 S) t; Z
if(image.width>164){
  K2 m& g, b* E$ @( xImgD.width=164; 3 n% I- v' U6 j# S) s4 O1 h. S
ImgD.height=(image.height*164)/image.width;
' Y6 i/ m9 w( ]/ M: t* L9 p% T}else{
( w; H2 l, [% k9 x$ JImgD.width=image.width;
; u3 w& c; l! c3 v. |) PImgD.height=image.height; " S6 j5 z& r9 a$ F( k- m! _
}
- |2 {& g4 r4 _1 E4 T. n1 WImgD.alt=image.width+"x"+image.height; . D# L: ~. `; ^" A7 U  T
}
9 h1 A4 a7 K! o8 a+ ?( z, Selse{
$ U$ L  X) f4 O2 B6 \/ g- e4 Wif(image.height>112){ 3 I, s+ M& d8 s" l" R, R1 z% m
ImgD.height=112; , C0 H5 S) j0 d# Q/ N. d0 F, V
ImgD.width=(image.width*112)/image.height;
$ A2 v; Y4 l% o/ J* l% A}else{ # s4 Q+ Y0 G! M) f3 A* _
ImgD.width=image.width;
. w0 x) M3 h! E# OImgD.height=image.height;
/ y; [% L, Y5 K2 Q} # Q4 p# M  P" O
ImgD.alt=image.width+"x"+image.height;
) v- \$ B' ?$ X9 C9 W* x* V} . ~, u: `* y1 _) S( G8 d- e* s8 _
} ) b+ Z' A; o& y- ^" ]9 D
} 2 J- k! f8 ~# a% u- v5 m
//--> 8 g/ k5 o0 ^+ e, N2 Z! }
</script>
# S( X, e6 ]+ W% W</HEAD>
% r8 T; k, N/ w/ v' [- Y( H; V3 \7 i<BODY> + z3 m" C7 v/ t
<a href="./img.jpg" target="_blank"><img
. e: ]/ ~' _0 i% q  S+ ~src="./img.jpg" border="0" width="164" height="112"
: R7 D9 y6 N$ b3 L: nonload=DrawImage(this);"></a> : Y' @+ q: E4 r2 ]
</BODY> / m8 n  u# W6 B/ ~+ U4 O* Z
</HTML>
' M* b) V0 @3 s& t* Z4. ASP中对数据库表的操作(INSERT/UPDATE/DELETE),可使用
( a- z' z  j* _. ]. w9 k5 N事务处理,并支持多事务处理. 8 I  U. ?% y: @3 E! ^  w
在ASP的数据库对象链接对象中,提供了一下属性: % Z7 c! m  `6 L, J: h
BeginTrans 事务开始 + ^) n& a0 a, V
CommitTrans 事务提交 6 n6 ^) v" d7 D/ ]& _. U0 [
RollbackTrans 事务回滚 ! w6 L- c3 L8 ~' u  S5 v5 {
<% 8 L: c5 a2 [9 H. Q
On Error Resume Next ’错误发生后继续处理 'Asp中使用事务
! e, i& R' z3 T- WSet conn=Server.CreateObject("ADODB.Connection")   ]3 ~( K3 n5 a3 o' v3 y4 u! w  z
conn.Open
) H8 G/ }) I: z% g"course_dsn","course_user","course_password"
; j4 B/ b6 I+ ~. @3 V9 Jconn.begintrans '开始事务
  g5 q0 @/ W7 Z3 l2 ysql="delete from user_info" ; U8 ^. K: V4 |/ `" |3 E
set rs=server.createobject("adodb.recordset")
4 A: d6 D  n& h2 Z0 p2 M8 rrs.open sql,conn,3,3
( @& J  R; ]  R# Jif conn.errors.count>0 then '有错误发生 1 U4 N* v9 W0 Y! V1 Q/ l3 {( l) q9 P
conn.rollbacktrans '回滚 6 x# b9 X$ w4 w# F* j
set rs=nothing
- }9 Z8 W1 G( e, t5 L6 L! Cconn.close
" X- E1 P* Y. V1 |set conn=nothing
; h" J& N: f2 V6 @response.write "交易失败,回滚至修改前的状态!"
( r) k4 x2 n0 R, Y; zresponse.end " q- D5 H* F/ h4 [3 j$ ~
else - J  s4 `/ a) u: ]7 Y- c( I
conn.committrans '提交事务 8 q1 Z4 B2 a' e* v9 p( I1 ]5 I
set rs=nothing
' C/ N# @) e, ^3 `# ?* n2 xconn.close
# G3 k$ C3 w. Yset conn=nothing
+ C& ]9 n  R+ n! U+ Mresponse.write "交易成功!" / p! r) g! C2 E# B/ }
response.end
5 d  m# E7 H3 Q$ \+ u5 y, Dend if
0 Z0 D" Z$ T; V# B1 z  @6 `+ X% [%>
( k. K/ z' h8 e' r9 e8 e' b在ASP中,不提供事务的结束,BeginTrans只作用于自己的域,类似于变量声明一样,如果在函数体内BeginTrans,则事物只8 F( r% @9 w8 a  i+ ?  m
作用于本函数体,如果BeginTrans在函数体外,处于页面级,则事务的作用域从BeginTrans开始,到页面的结束均处于事务的9 x; M, I  D, H- T
管理状态下. % z  e* E; j% a# M
http://b.todayisp.com/bbs/760x90h.gif
  Z! [5 b' I- I8 z2 J4 c3 [3 L; Q介绍几款不错 的虚拟主机给大家!适合建各种大中型电子商/ R( ?7 _8 c  m
务网站!金牌注册机构,"全国五强"主机注册商!祝大家好运!/ h. S- n0 K4 G3 s$ ^( m
▲标准商务C型主机 +.CN:原价2050元/年,特价只需1415元/年 ,免费加送域名,送基本C型主机一台;CDN网站加速器送繁简通网络简装版
# n$ Q; u/ J6 @1 [支持WAP手机上网. u' W1 i0 R( [$ G+ ~0 ]0 P
     500独立空间,支持ASP/ASP.NET免费送800Mb邮箱Win20
; r* z! h1 Z' m1 i$ o& s  Y. `/ P- D     03,IIS 6.0,支持50M SQLSERVER 2005ACCESS 数据库 + u; X/ e( j; c  ~
     提供计数器,留言板脚本列表 ASP ASP.NET Active # b! F  |+ H1 w8 c
   Perl CGIASP.NET 2.0 Microsoft Front Page 2000 扩展7 P: P: V# H& l
免费申请试用:  http://www.now.cn/vhost/order.net?IDProduct=2035* Q% |& Q! j! p/ r: o
▲智强商务C型 +.CN 原价1952元/年,现特价1588元/年 WindowsServer2003 操作系统 ,支持ASP.NET/ASP 1000MB独立空间体积 ,SQLSERVER( M/ U/ v# Z7 E6 n+ ~
数据库, 送1000MB邮局空间 ,支持$ T- _' W! h. l$ E8 ~
▲至尊专用C型主机+.CN:  现特价3957元/年  WindowsServer2003  操作系统  ,支持ASP.NET/ASP,3000MB独立空间体积,独立带宽,SQLSERVER
, P3 @4 B6 A* r1 W4 R  N数据库  ,数据库空间不限大小;  数据库自动备份,1000MBVIP集团邮局  ,免费送繁简通商务版  GCDN  网站加速器,  支持WAP  多子网站镜像5 O  ^+ ~# R& d9 S; m3 r; u
加速  高级访问统计系统  " S6 b3 R# F3 U8 I* f
WAP,CDN网站加速器 送繁简通网络简装版
! U( ?# J+ w* y) ?8 R: R5 s7 w6 N3 q时代网,时代主机牌子比较老,口碑也不错,以我用他们产品的经验来说,还是比较满意的。服务器稳定,速度可以,服务也好。有需要的朋友可以
: g. l/ X  ?7 n1 f# R0 ~$ N去他们网站看看:http://www.now.cn/vhost/  电话:0756-2623871   QQ :168075865  祝大家财运亨通哦!
! g1 [( h4 T# p***********************************************************************************
/ Z$ L) f! T0 [6 h; M. p( |多年购买低至七折!
发表于 2008-7-11 18:56:19 | 显示全部楼层 来自: 中国广东佛山
看不明白,资质差
发表回复
您需要登录后才可以回帖 登录 | 注册

本版积分规则


Licensed Copyright © 2016-2020 http://www.3dportal.cn/ All Rights Reserved 京 ICP备13008828号

小黑屋|手机版|Archiver|三维网 ( 京ICP备2023026364号-1 )

快速回复 返回顶部 返回列表