加入收藏 | 设为首页 | 会员中心 | 我要投稿 银川站长网 (https://www.0951zz.com/)- 云通信、基础存储、云上网络、机器学习、视觉智能!
当前位置: 首页 > 站长学院 > Asp教程 > 正文

用ASP和SQL达成基于Web的事件日历

发布时间:2023-08-28 12:21:56 所属栏目:Asp教程 来源:
导读:本文介绍如何建立基于Web的日历,同时为不熟悉Active Server Pages(ASP)、SQL和ADO的开发者提供建立Web站点的过程介绍,也为有经验的开发者提供了Web站点可伸缩性方面的技巧。 随着网络应用的发展,基于Web的日历越来

本文介绍如何建立基于Web的日历,同时为不熟悉Active Server Pages(ASP)、SQL和ADO的开发者提供建立Web站点的过程介绍,也为有经验的开发者提供了Web站点可伸缩性方面的技巧。 

随着网络应用的发展,基于Web的日历越来越受到人们的重视,对于显示诸如最后期限或日程安排之类的重要事件,或显示谁在什么时候休假,基于Web的日历都是有用的。本文描述了如何使用IIS和SQL Server内的ASP建立一个非常简单的基于Web的日历,并允许你与其他人共享你的日程表或管理一组人员的日历。 

对Web日历而言,我们在服务器端仅需保存表明事件性质的一个文本字符串即可,字符串最长为100个字符。设计源代码如下: 

Calendar.sql

-- 创建表

create table Schedule

(

idSchedule smallint identity primary key,

dtDate smalldatetime not null,

vcEvent varchar(100) not null

)

go

-- 存储过程

create procedure GetSchedule (@nMonth tinyint, @nYear smallint)

as

select idSchedule, convert(varchar, datepart(dd, dtDate)) 'nDay', vcEvent

from Schedule

where datepart(yy, dtDate) = @nYear and datepart(mm, dtDate) = @nMonth

order by datepart(dd, dtDate)

go

create procedure AddEvent (@vcDate varchar(20), @vcEvent varchar(100))

as

insert Schedule

select @vcDate, @vcEvent 

go

create procedure DeleteEvent (@idSchedule smallint)

as

delete Schedule where idSchedule = @idSchedule

go  

另外,使用底部的链接可以在日历中按月前后翻动。 

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>

(编辑:银川站长网)

【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容!

    推荐文章