 |
|
|
 首页 |
名片设计 CorelDRAW Illustrator AuotoCAD Painter 其他软件 Photoshop Fireworks Flash |
|
!--#include File="clsDay.asp"--> <% Dim objChinaDay Dim sDay, sWeekDay, sChinaDay, sChinaYear,sChinaAni Set objChinaDay = New ChinaDay Call objChinaDay.Action("",sDay,sWeekDay,sChinaYear,sChinaDay,sChinaAni) Set objChinaDay = Nothing \\\'Response.Write sDay&"<BR>" \\\'Response.Write sWeekDay&"<BR>" \\\'Response.Write sChinaYear&"<BR>" \\\'Response.Write sChinaDay&"<BR>" \\\'Response.Write sChinaAni&"<BR>" %> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <title>农历日历</title> <style> .itm {font-family: 宋体; font-size: 14px;} .chn {font-family: 宋体; font-size: 12px} .chnred {font-family: 宋体; color: #FF0000; font-size: 12px} .chnblue {font-family: 宋体; color: #0000FF; font-size: 12px} </style> </head> <body bgcolor="#FFFFFF"> <!--显示站点日历--> <table border="1" cellspacing="1" width="110" bgcolor="#EAEAEA" bordercolor="#FFFFFF" bordercolorlight="#000000"> <tr> <td><center><table> <tr> <td class="chnblue" align="center" valign="middle"><%=sDay%> </td> </tr> <tr> <td class="chnred" align="center" valign="middle"><%=sWeekDay%> </td> </tr> <tr> <td class="chnblue" align="center" valign="middle"><%=sChinaYear & "(" & sChinaAni & ")"%> </td> </tr> <tr> <td class="chnred" align="center" valign="middle"><%=sChinaDay%> </td> </tr> </td> </tr> </table> </table> </body> </html> 返回类别: 教程 上一教程: 提高ASP执行权限的问题 下一教程: 在红蜻蜓中实现多房间 您可以阅读与"纯ASP代码之公历转农历实现(含属相)-例子代码"相关的教程: · 纯ASP代码之公历转农历实现(含属相)--例子代码 · 纯ASP代码之公历转农历实现(含属相) · 在ASP中通过GETROWS实现数据库记录分页的一段代码 · 如何用ASP代码实现虚拟主机 · ASP + SERV-U 实现FTP的代码 |
  |
| 快精灵印艺坊 版权所有 |
首页 会员中心在线印刷在线编辑付款方式索取样品设计指南连锁门店
|
||
