程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> 更多編程語言 >> 編程問題解答 >> 如何制作一個Web日程安排表?

如何制作一個Web日程安排表?

編輯:編程問題解答

chunfeng.asp

' 該頁面可以看到已安排了哪些事情,並在底部鏈接可按月前後翻動.

' 該代碼包含獲得數據連接的函數,如果數據源一旦有變化,則只有一個位置需要編輯連接信息(服務器、用戶和口令).

  <@ LANGUAGE="VBscript"

  ENABLESESSIONSTATE = False %>

  <%

  ' 表頭包括用來啟動所有頁的文件,包括全局函數.

  Option Explicit

  Response.Buffer = True

  Response.Expires = 0

  sub Dochunfeng(strtitle)

  %>

  <html>

     <head>

     <META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=gb2312">

     <title>星河影動之精英日程安排<%= strtitle %></title>

     </head>

     <body bgcolor="white" link="blue" alink="blue" vlink="blue">

     <basefont face="Verdana, Arial">

     <center><h1>我的日程安排</h1>

     <h3><%= strtitle %></h3>

  <%

  ' 創建數據庫連接.

  end sub

' 調用Connection 對象 Execute 方法,將希望執行的命令的文本字符串傳入,一旦有了記錄集,就可在其中循環.

  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命令傳出新連接.

  set GetDataConnection = oConn

  end function

  %>

 

Calendar.sql

-- 建立SQL服務器端.只需保存表明事件性質的一個文本字符串(最長為100個字符)即可.

 

-- 創建表

  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

[1]

  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved