konhon

忘掉過去,展望未來。找回自我,超越自我。
逃避不一定躲的过, 面对不一定最难过, 孤单不一定不快乐, 得到不一定能长久, 失去不一定不再拥有, 可能因为某个理由而伤心难过, 但我却能找个理由让自己快乐.

Google

BlogJava 首页 新随笔 联系 聚合 管理
  203 Posts :: 0 Stories :: 61 Comments :: 0 Trackbacks

#

<? xml version="1.0" encoding="UTF-8" ?>

<! DOCTYPE hibernate-mapping PUBLIC
 "-//Hibernate/Hibernate Mapping DTD 3.0//EN"
 "http://hibernate.sourceforge.net/hibernate-mapping-3.0.dtd"
>

< hibernate-mapping >
  
< class  name ="Tuser"  table ="T_User" >
    
< id  name ="id"  column ="id"  type ="java.lang.Integer" >
      
< generator  class ="native" />
    
</ id >
    
< property  name ="name"  column ="name"  type ="java.lang.String" />
    
<!-- <property name="age" column="age" type="java.lang.Integer"/> -->
    
<!-- <property name="email" column="email" type="EMailList"/> -->
    
<!-- <property name="image" column="image" type="java.sql.Blob"/> -->
    
< property  name ="resume"  column ="resume"  type ="clob" />
  
</ class >
</ hibernate-mapping >

復合主鍵
<?xml version="1.0" encoding="UTF-8"?>

<!DOCTYPE hibernate-mapping PUBLIC
 "-//Hibernate/Hibernate Mapping DTD 3.0//EN"
 "http://hibernate.sourceforge.net/hibernate-mapping-3.0.dtd"
>

<hibernate-mapping>
  
<class name="TUser2" table="T_User2">
    
<composite-id name="userPk" class="TUserPk">
      
<key-property name="firstName" column="firstname" type="java.lang.String"/>
      
<key-property name="lastName" column="lastname" type="java.lang.String"/>
    
</composite-id>
    
<property name="age" column="age" type="java.lang.Integer"/>    
  
</class>
</hibernate-mapping>

DISCRIMINATOR
<?xml version="1.0" encoding="UTF-8"?>

<!DOCTYPE hibernate-mapping PUBLIC
 "-//Hibernate/Hibernate Mapping DTD 3.0//EN"
 "http://hibernate.sourceforge.net/hibernate-mapping-3.0.dtd"
>

<hibernate-mapping>
  
<class name="TItem" table="T_Item">
    
<id name="id" column="id">
      
<generator class="native"/>
    
</id>
    
<discriminator column="category" type="java.lang.String"/>
    
<property name="manufacturer" column="manufacturer"/>
    
<property name="name" column="name"/>    
    
<subclass name="TBook" discriminator-value="1">
      
<property name="pageCount" column="pagecount"/>
    
</subclass>
    
<subclass name="TDVD" discriminator-value="2">
      
<property name="regionCode" column="regionCode"/>
    
</subclass>
  
</class>
</hibernate-mapping>
posted @ 2006-04-05 21:45 konhon 优华 阅读(677) | 评论 (0)编辑 收藏

<! DOCTYPE hibernate-configuration PUBLIC
    "-//Hibernate/Hibernate Configuration DTD 3.0//EN"
    "http://hibernate.sourceforge.net/hibernate-configuration-3.0.dtd"
>

< hibernate-configuration >
  
< session-factory >
    
< property  name ="hibernate.connection.url" >
       jdbc:Microsoft:sqlserver://192.168.10.236:1433;databaseName=Sample
    
</ property >
    
< property  name ="hibernate.connection.driver_class" >
       com.microsoft.jdbc.sqlserver.SQLServerDriver
    
</ property >
    
< property  name ="hibernate.connection.username" >
       sa
    
</ property >
    
< property  name ="hibernate.connection.password" >
       55
    
</ property >
    
< property  name ="dialect" >
       org.hibernate.dialect.SQLServerDialect
    
</ property >
    
< property  name ="hibernate.show_sql" >
       true
    
</ property >
    
< property  name ="hibernate.transaction.factory_class" >
       org.hibernate.transaction.JDBCTransactionFactory
    
</ property >
    
< mapping  resource ="TItem.hbm.xml" />     
  
</ session-factory >
</ hibernate-configuration >
posted @ 2006-04-05 21:42 konhon 优华 阅读(3936) | 评论 (2)编辑 收藏

Save
// 新增名為"Emma"的用戶記錄
Tuser user = new Tuser();
user.setName("Emma");
session.save(user);

Get
// 假設T_User表中存在ID = 1的記錄
Tuser user = (Tuser)session.get(Tuser.class, new Integer(1));

Delete
// 假設T_User表中存在ID = 1的記錄
Tuser user = (Tuser)session.get(Tuser.class, new Integer(1));
session.delete(user);

// 也可以通過HQL指定刪除條件
Session.delete(" from Tuser where id = 1");

// 通過Query接口進於基於HQL的刪除操作
Stirng hql = "delete Tuser where id = 1";
Query query = session.createQuery(hql);
query.executeUpdate();

Find
// 通過Query接口進行數據查詢
String hql="from Tuser user where user.name like ?";
Query query = session.createQuery(hql);
query.setParameter(0, "Cartier");

List list = query.list();

Iterator it = list.iterator();
while(it.hasNext()){
  Tuser user = (Tuser)it.next();
  System.out.println(user.getName());
}

// 通過Criteria接口進行數據查詢
Criteria criteria = session.createCriteria(Tuser.class);
criteria.add(Expression.eq("name","Cariter"));

List list = criteria.list();

Iterator it = list.iterator();
while(it.hasNext()){
  Tuser user = (Tuser)it.next();
  System.out.println(user.getName());
}

posted @ 2006-04-04 20:37 konhon 优华 阅读(425) | 评论 (0)编辑 收藏

使用MiddleGen for Hibernate工具.

配置./config/database下的mssql.xml文件

     <!--  ===================================================================  -->
   
<!--  ant properties/targets for MS SQL Server                             -->
   
<!--  note: this is not a proper xml file (there is no root element)       -->
   
<!--        it is intended to be imported from a *real* xml file           -->
   
<!--  ===================================================================  -->

   
< property  name ="database.script.file"            value ="" />
   
< property  name ="database.driver.file"            value ="${lib.dir}/mssqlserver.jar" />
   
< property  name ="database.driver"                 value ="com.microsoft.jdbc.sqlserver.SQLServerDriver" />
   
< property  name ="database.url"                    value ="jdbc:Microsoft:sqlserver://192.168.10.236:1433;databaseName=Sample" />
   
< property  name ="database.userid"                 value ="sa" />
   
< property  name ="database.password"               value ="kidsland%55" />
   
< property  name ="database.schema"                 value ="dbo" />
   
< property  name ="database.catalog"                value ="Sample" />

   
< property  name ="jboss.datasource.mapping"        value ="MS SQLSERVER" />
   
<!-- property name="jboss.datasource.mapping"       value="MS SQLSERVER2000"/ -->

注意: database.schema 與 database.catalog 不能為空.

posted @ 2006-04-04 02:42 konhon 优华 阅读(397) | 评论 (0)编辑 收藏

如何混合使用Jsp和SSI #include?
在JSP中可以使用如下方式包含纯HTML:
<!--#include file="data.inc"-->
但是如果data.inc中包含JSP CODE ,我们可以使用:
<%@include file="data.inc"%>


如何执行一个线程安全的JSP?
只需增加如下指令
<%@ page isThreadSafe="false" %>


JSP如何处理HTML FORM中的数据?
通过内置的request对象即可,如下:
<%
String item = request.getParameter("item");
int howMany = new Integer(request.getParameter("units")).intValue();
%>


在JSP如何包含一个静态文件?
静态包含如下:<%@ include file="copyright.html" %>
动态包含如下:<jsp:include page="copyright.html" flush="true"/>


在JSP中如何使用注释?
主要有四中方法:
1。<%-- 与 --%>
2。//
3。/**与**/
4。<!--与-->


在JSP中如何执行浏览重定向?
使用如下方式即可:response.sendRedirect("http://ybwen.home.chinaren.com/index.html");
也能物理地改变HTTP HEADER属性,如下:
<%
response.setStatus(HttpServletResponse.SC_MOVED_PERMANENTLY);
String newLocn="/newpath/index.html";
response.setHeader("Location",newLocn);
%>


如何防止在JSP或SERVLET中的输出不被BROWSER保存在CACHE中?
把如下脚本加入到JSP文件的开始即可:
<%
response.setHeader("Cache-Control","no-store"); //HTTP 1.1
response.setHeader("Pragma","no-cache"); //HTTP 1.0
response.setDateHeader ("Expires", 0); //prevents caching at the proxy server
%>


在JSP中如何设置COOKIE?
COOKIE是作为HTTP HEADER的一部分被发送的,如下方法即可设置:
<%
Cookie mycookie = new Cookie("aName","aValue");
response.addCookie(mycookie);
%>


在JSP中如何删除一个COOKIE?
<%
Cookie killMyCookie = new Cookie("mycookie", null);
killMyCookie.setMaxAge(0);
killMyCookie.setPath("/");
response.addCookie(killMyCookie);
%>


在一个JSP的请求处理中如何停止JSP的执行
如下例:
<%
if (request.getParameter("wen") != null) {
// do something
} else {
return;
}
%>


在JSP中如何定义方法
你可以定义方法,但是你不能直接访问JSP的内置对象,而是通过参数的方法传递。如下:
<%!
public String howBadFrom(HttpServletRequest req) {
HttpSession ses = req.getSession();
...
return req.getRemoteHost();
}
%>
<%
out.print("in general,lao lee is not baddie ");
%>
<%= howBadFrom(request) %>


如果BROWSER已关闭了COOKIES,在JSP中我如何打开SESSION来跟踪
使用URL重写即可,如下:
hello1.jsp
<%@ page session="true" %>
<%
Integer num = new Integer(100);
session.putValue("num",num);
String url =response.encodeURL("hello2.jsp");
%>
<a href=&#39;<%=url%>&#39;>hello2.jsp</a>

hello2.jsp
<%@ page session="true" %>
<%
Integer i= (Integer )session.getValue("num");
out.println("Num value in session is "+i.intValue());
%>


在JSP中能发送EMAIL吗
可以使用SUN的专用包:sun.net.smtp包。如下脚本使用SmtpClient类发送EMAIL。
<%@ page import="sun.net.smtp.SmtpClient, java.io.*" %>
<%
String from="ybwen@sina.com";
String to="hewenjun@yeah.net, lei@who.com.cn";
try{
SmtpClient client = new SmtpClient("mail.xxxxx.xxx");
client.from(from);
client.to(to);
PrintStream message = client.startMessage();
message.println("To: " + to);
message.println("Subject: Sending email from JSP!");
message.println("This was sent from a JSP page!");
message.println();
message.println("Cool! ");
message.println();
message.println("Good Boy");
message.println("I&#39;m in genius.com");
message.println();
client.closeServer();
}
catch (IOException e){
System.out.println("ERROR SENDING EMAIL:"+e);
}
%>


在SERVLET中我能调用一个JSP错误页吗
当然没问题,如下展示了如何在一个SERVLET控制逻辑单元内调用一个JSP错误页面。
protected void sendErrorRedirect(HttpServletRequest request,
HttpServletResponse response, String errorPageURL,
Throwable e)
throws ServletException, IOException {
request.setAttribute ("javax.servlet.jsp.jspException", e);
getServletConfig().getServletContext().
getRequestDispatcher(errorPageURL).forward(request,
response);
}

public void doPost(HttpServletRequest request,HttpServletResponse response) {
try {
// do something
} catch (Exception ex) {
try {
sendErrorRedirect(request,response,"/jsp/MyErrorPage.jsp",ex);
} catch (Exception e) {
e.printStackTrace();
}
}
}


JSP和APPLET如何通讯
JSP如何与EJB SessionBean通讯
下面的代码段作了很好的示范
<%@ page import="javax.naming.*, javax.rmi.PortableRemoteObject,
foo.AccountHome, foo.Account" %>
<%!
//定义一个对SessionBeanHome接口实例的全局引用
AccountHome accHome=null;

public void jspInit() {
//获得Home接口实例
InitialContext cntxt = new InitialContext( );
Object ref= cntxt.lookup("java:comp/env/ejb/AccountEJB");
accHome = (AccountHome)PortableRemoteObject.narrow(ref,AccountHome.class);
}
%>
<%
//实例化SessionBean
Account acct = accHome.create();
//调用远程方法
acct.doWhatever(...);
// 如此等等
%>


当我使用一个结果集时,如何防止字段为"null"的字域显示在我的HTML输入文本域中?
可以定义一个简单的函数来达到目的,如下:
<%!
String blanknull(String s) {
return (s == null) ? "" : s;
}
%>

然后在JSP的FORM中,可以这样使用
<input type="text" name="shoesize" value="<%=blanknull(shoesize)%>">


如何中SERVLET或JSP下载一个文件(如:binary,text,executable)?
现提供两个解决方案:
A:使用HTTP,如
点击下载网络恐龙图片(这个地址是假的)

B:在Servlet中,通过设置ContentType和使用java.io包的Stream等类可作到.例如:
response.setContentType("application/x-msword");
然后想输出缓冲中写一些东东即可。

使用useBean标志初始化BEAN时如何接受初始化参数
使用如下两标签即可:
<jsp:getProperty name="wenBean" property="someProperty"/>
<jsp:setProperty name="wenBean" property="someProperty" value="someValue"/>
posted @ 2006-03-31 03:43 konhon 优华 阅读(458) | 评论 (0)编辑 收藏

偉送頁 to.jsp

<%@ page contentType="text/html; charset=big5" %>
<a href="from.jsp?word=<%=java.net.URLEncoder.encode("二廠成型","big5")%>">傳送字符</a>

接收頁 from.jsp

<%@ page contentType="text/html; charset=big5" %>

<%
request.setCharacterEncoding("big5");

if(request.getParameter("word") != null){
        String bb = request.getParameter("word");
        out.print(bb);
}        
%>

posted @ 2006-03-31 03:15 konhon 优华 阅读(436) | 评论 (0)编辑 收藏

     摘要: 我喜欢解决算法问题 哈哈为了解决这个问题 我写了一个树状数据结构根节点为世界(我想这个根够大了吧)下面有两个子节点 分别为亚洲 欧洲亚洲的下面还有几个节点分别是中国 韩国......中国下面的几个节点分别是 福建省 湖北省......以次类推就是一个树啦 (不知道这个树是不是楼主需要的 反正没事写着玩呗 起码能对楼主有所启发吧)下面是代码首先是 Type (一个对象是一条记录)package be...  阅读全文
posted @ 2006-03-31 02:54 konhon 优华 阅读(439) | 评论 (0)编辑 收藏

1. oncontextmenu="window.event.returnValue=false" 将彻底屏蔽鼠标右键
<table border oncontextmenu=return(false)><td>no</table> 可用于Table

2. <body onselectstart="return false"> 取消选取、防止复制

3. onpaste="return false" 不准粘贴

4. oncopy="return false;" oncut="return false;" 防止复制

5. <link rel="Shortcut Icon" href="favicon.ico"> IE地址栏前换成自己的图标

6. <link rel="Bookmark" href="favicon.ico"> 可以在收藏夹中显示出你的图标

7. <input style="ime-mode:disabled"> 关闭输入法

8. 永远都会带着框架
<script language="JavaScript"><!--
if (window == top)top.location.href = "frames.htm"; //frames.htm为框架网页
// --></script>

9. 防止被人frame
<SCRIPT LANGUAGE=JAVASCRIPT><!--
if (top.location != self.location)top.location=self.location;
// --></SCRIPT>

10. 网页将不能被另存为
<noscript><iframe src=*.html></iframe></noscript>

11. <input type=button value=查看网页源代码
onclick="window.location = "view-source:"+ "http://www.pconline.com.cn"">

12.删除时确认
<a href="javascript:if(confirm("确实要删除吗?"))location="boos.asp?&areyou=删除&page=1"">删除</a>

13. 取得控件的绝对位置
//Javascript
<script language="Javascript">
function getIE(e){
var t=e.offsetTop;
var l=e.offsetLeft;
while(e=e.offsetParent){
t+=e.offsetTop;
l+=e.offsetLeft;
}
alert("top="+t+"/nleft="+l);
}
</script>

//VBScript
<script language="VBScript"><!--
function getIE()
dim t,l,a,b
set a=document.all.img1
t=document.all.img1.offsetTop
l=document.all.img1.offsetLeft
while a.tagName<>"BODY"
set a = a.offsetParent
t=t+a.offsetTop
l=l+a.offsetLeft
wend
msgbox "top="&t&chr(13)&"left="&l,64,"得到控件的位置"
end function
--></script>

14. 光标是停在文本框文字的最后
<script language="javascript">
function cc()
{
var e = event.srcElement;
var r =e.createTextRange();
r.moveStart("character",e.value.length);
r.collapse(true);
r.select();
}
</script>
<input type=text name=text1 value="123" onfocus="cc()">

15. 判断上一页的来源
javascript:
document.referrer

16. 最小化、最大化、关闭窗口
<object id=hh1 classid="clsid:ADB880A6-D8FF-11CF-9377-00AA003B7A11">
<param name="Command" value="Minimize"></object>
<object id=hh2 classid="clsid:ADB880A6-D8FF-11CF-9377-00AA003B7A11">
<param name="Command" value="Maximize"></object>
<OBJECT id=hh3 classid="clsid:adb880a6-d8ff-11cf-9377-00aa003b7a11">
<PARAM NAME="Command" VALUE="Close"></OBJECT>
<input type=button value=最小化 onclick=hh1.Click()>
<input type=button value=最大化 onclick=hh2.Click()>
<input type=button value=关闭 onclick=hh3.Click()>
本例适用于IE

17.屏蔽功能键Shift,Alt,Ctrl
<script>
function look(){
if(event.shiftKey)
alert("禁止按Shift键!"); //可以换成ALT CTRL
}
document.onkeydown=look;
</script>

18. 网页不会被缓存
<META HTTP-EQUIV="pragma" CONTENT="no-cache">
<META HTTP-EQUIV="Cache-Control" CONTENT="no-cache, must-revalidate">
<META HTTP-EQUIV="expires" CONTENT="Wed, 26 Feb 1997 08:21:57 GMT">
或者<META HTTP-EQUIV="expires" CONTENT="0">

19.怎样让表单没有凹凸感?
<input type=text style="border:1 solid #000000">

<input type=text style="border-left:none; border-right:none; border-top:none; border-bottom:

1 solid #000000"></textarea>

20.<div><span>&<layer>的区别?
<div>(division)用来定义大段的页面元素,会产生转行
<span>用来定义同一行内的元素,跟<div>的唯一区别是不产生转行
<layer>是ns的标记,ie不支持,相当于<div>

21.让弹出窗口总是在最上面:
<body onblur="this.focus();">

22.不要滚动条?
让竖条没有:
<body style="overflow:scroll;overflow-y:hidden">
</body>
让横条没有:
<body style="overflow:scroll;overflow-x:hidden">
</body>
两个都去掉?更简单了
<body scroll="no">
</body>

23.怎样去掉图片链接点击后,图片周围的虚线?
<a href="#" onFocus="this.blur()"><img src="logo.jpg" border=0></a>

24.电子邮件处理提交表单
<form name="form1" method="post" action="mailto:****@***.com" enctype="text/plain">
<input type=submit>
</form>

25.在打开的子窗口刷新父窗口的代码里如何写?
window.opener.location.reload()

26.如何设定打开页面的大小
<body onload="top.resizeTo(300,200);">
打开页面的位置<body onload="top.moveBy(300,200);">

27.在页面中如何加入不是满铺的背景图片,拉动页面时背景图不动
<STYLE>
body
{background-image:url(logo.gif); background-repeat:no-repeat;
background-position:center;background-attachment: fixed}
</STYLE>

28. 检查一段字符串是否全由数字组成
<script language="Javascript"><!--
function checkNum(str){return str.match(//D/)==null}
alert(checkNum("1232142141"))
alert(checkNum("123214214a1"))
// --></script>

29. 获得一个窗口的大小
document.body.clientWidth; document.body.clientHeight

30. 怎么判断是否是字符
if (/[^/x00-/xff]/g.test(s)) alert("含有汉字");
else alert("全是字符");

31.TEXTAREA自适应文字行数的多少
<textarea rows=1 name=s1 cols=27 onpropertychange="this.style.posHeight=this.scrollHeight">
</textarea>
32. 日期减去天数等于第二个日期
<script language=Javascript>
function cc(dd,dadd)
{
//可以加上错误处理
var a = new Date(dd)
a = a.valueOf()
a = a - dadd * 24 * 60 * 60 * 1000
a = new Date(a)
alert(a.getFullYear() + "年" + (a.getMonth() + 1) + "月" + a.getDate() + "日")
}
cc("12/23/2002",2)
</script>

33. 选择了哪一个Radio
<HTML><script language="vbscript">
function checkme()
for each ob in radio1
if ob.checked then window.alert ob.value
next
end function
</script><BODY>
<INPUT name="radio1" type="radio" value="style" checked>Style
<INPUT name="radio1" type="radio" value="barcode">Barcode
<INPUT type="button" value="check" onclick="checkme()">
</BODY></HTML>

34.脚本永不出错
<SCRIPT LANGUAGE="JavaScript">
<!-- Hide
function killErrors() {
return true;
}
window.onerror = killErrors;
// -->
</SCRIPT>

35.ENTER键可以让光标移到下一个输入框
<input onkeydown="if(event.keyCode==13)event.keyCode=9">

36. 检测某个网站的链接速度:
把如下代码加入<body>区域中:
<script language=Javascript>
tim=1
setInterval("tim++",100)
b=1
var autourl=new Array()
autourl[1]="www.njcatv.net"
autourl[2]="javacool.3322.net"
autourl[3]="www.sina.com.cn"
autourl[4]="www.nuaa.edu.cn"
autourl[5]="www.cctv.com"
function butt(){
document.write("<form name=autof>")
for(var i=1;i<autourl.length;i++)
document.write("<input type=text name=txt"+i+" size=10 value=测试中……> =》<input type=text
name=url"+i+" size=40> =》<input type=button value=GO

onclick=window.open(this.form.url"+i+".value)><br>")
document.write("<input type=submit value=刷新></form>")
}
butt()
function auto(url){
document.forms[0]["url"+b].value=url
if(tim>200)
{document.forms[0]["txt"+b].value="链接超时"}
else
{document.forms[0]["txt"+b].value="时间"+tim/10+"秒"}
b++
}
function run(){for(var i=1;i<autourl.length;i++)document.write("<img src=http://"+autourl+"/"+Math.random()+" width=1 height=1

onerror=auto("http://"+autourl+"")>")}
run()</script>

37. 各种样式的光标
auto :标准光标
default :标准箭头
hand :手形光标
wait :等待光标
text :I形光标
vertical-text :水平I形光标
no-drop :不可拖动光标
not-allowed :无效光标
help :?帮助光标
all-scroll :三角方向标
move :移动标
crosshair :十字标
e-resize
n-resize
nw-resize
w-resize
s-resize
se-resize
sw-resize

38.页面进入和退出的特效
进入页面<meta http-equiv="Page-Enter" content="revealTrans(duration=x, transition=y)">
推出页面<meta http-equiv="Page-Exit" content="revealTrans(duration=x, transition=y)">
这个是页面被载入和调出时的一些特效。duration表示特效的持续时间,以秒为单位。transition表示使用哪种特效,取值为1-23:
  0 矩形缩小
  1 矩形扩大
  2 圆形缩小
  3 圆形扩大
  4 下到上刷新
  5 上到下刷新
  6 左到右刷新
  7 右到左刷新
  8 竖百叶窗
  9 横百叶窗
  10 错位横百叶窗
  11 错位竖百叶窗
  12 点扩散
  13 左右到中间刷新
  14 中间到左右刷新
  15 中间到上下
  16 上下到中间
  17 右下到左上
  18 右上到左下
  19 左上到右下
  20 左下到右上
  21 横条
  22 竖条
  23 以上22种随机选择一种

39.在规定时间内跳转
<META http-equiv=V="REFRESH" content="5;URL=http://www.51js.com">

40.网页是否被检索
<meta name="ROBOTS" content="属性值">
  其中属性值有以下一些:
  属性值为"all": 文件将被检索,且页上链接可被查询;
  属性值为"none": 文件不被检索,而且不查询页上的链接;
  属性值为"index": 文件将被检索;
  属性值为"follow": 查询页上的链接;
  属性值为"noindex": 文件不检索,但可被查询链接;
  属性值为"nofollow": 文件不被检索,但可查询页上的链接。
posted @ 2006-03-31 02:42 konhon 优华 阅读(582) | 评论 (0)编辑 收藏

// 將日期2005-02-30轉為"200502"
Function YearMonth(DateArg)
  Dim lYear, lMonth
  If DateArg = Null Or CStr(DateArg) = "" Then
    YearMonth = ""
  Else
    lYear = Year(DateArg)
    lMonth = Month(DateArg)
    YearMonth = CStr(lYear) + Right("0" + CStr(lMonth), 2)
  End If
End Function

// 將數字2030轉為"20:30"
Function ConvertToTime(Arg)
  Dim lHour, lMinute
  lHour = CStr(Left(Arg, 2))
  lMinute = CStr(Right(Arg, 2))
  If lHour > "24" Or lHour < "0" Or lMinute > "60" Or lMinute < "0" Then
    ConvertToTime = ""
  Else
    ConvertToTime = IIf(lHour = Null Or lHour = "", "", lHour + ":" + lMinute)
  End If
End Function

// 計算兩個時間的差
Function TimeDiff(BeginArg, EndArg)
  Dim lHour, lMinute
  lMinute = DateDiff("n", BeginArg, EndArg)
  lHour = Int(lMinute / 60)
  lMinute = lMinute - lHour * 60
  TimeDiff = CStr(lHour + lMinute / 60)
End Function

 

posted @ 2006-03-29 21:10 konhon 优华 阅读(589) | 评论 (0)编辑 收藏

     摘要: < description >   < display >   < icon > 這三個元素提供了Web容器部署工具用描述應用的信息. < icon > ...  阅读全文
posted @ 2006-03-28 22:52 konhon 优华 阅读(1258) | 评论 (0)编辑 收藏

仅列出标题
共21页: First 上一页 3 4 5 6 7 8 9 10 11 下一页 Last