正在阅读：用ASP和SQL实现基于Web的事件日历用ASP和SQL实现基于Web的事件日历

2004-04-07 14:31 出处：中国计算机报作者：金志立责任编辑：sdq

设计ASP客户端

　　下图是Web日历的主要用户界面，用户可以看到哪些事件是已安排的。另外，使用底部的链接可以在日历中按月前后翻动。

　　ASP的实现代码如下：

header.asp
<@ LANGUAGE="VBSCRIPT"
ENABLESESSIONSTATE = False ％>
<％
' 目的：表头包括用来启动所有页的文件
' 还包括全局函数
Option Explicit
Response.Buffer = True
Response.Expires = 0
sub Doheader(strTitle)
％>
<html>
　　 <head>
　　 <META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">
　　 <title>Event Calendar - <%= strTitle %></title>
　　 </head>
　　 <body bgcolor="white" link="blue" alink="blue" vlink="blue">
　　 <basefont face="Verdana, Arial">
　　 <center><h1>Event Calendar</h1>
　　 <h3><%= strTitle %></h3>
<％
end sub
function GetDataConnection()
dim oConn, strConn
Set oConn = Server.CreateObject("ADODB.Connection")
strConn = "Provider=SQLOLEDB; Data Source=adspm; Initial Catalog=TeamWeb; "
strConn = strConn && "User Id=TeamWeb; Password=x"
oConn.Open strConn
set GetDataConnection = oConn
end function
％>

察看评论详细内容我要发表评论