求救：ASP.NET的图书管理系统

你的意思好像就是想要别人做起来给你一样，如果想要代码你可以上CSDN上找一个，如果只是想了解业务我就介绍下：

图书管理系统可以分为两个角色1.管理员 2.借书者（学生）

基础信息管理可以包括：用户管理、图书管理、角色管理、权限管理（可以将权限管理集成到角色管理中）

日常 *** 作可以包括：图书查询、图书预订、借书、还书和延期等功能；

预订和延期应该是借书者应该拥有的权限；借书和还书应该是在借书者将书还给管理员时，管理员进行的 *** 作；查询 *** 作应该是所有人都有的权限；

以上是图书管理系统的基本功能，当然如果有特殊要求也可以添加新功能模块，

比如：图书分类，可以有利于用户查询

<%

' ============================================

' 格式化时间(显示)

' 参数：n_Flag

' 1:"yyyy-mm-dd hh:mm:ss"

' 2:"yyyy-mm-dd"

' 3:"hh:mm:ss"

' 4:"yyyy年mm月dd日"

' 5:"yyyymmdd"

' 6:"yyyymmddhhmmss"

' ============================================

Function Format_Time(s_Time, n_Flag)

Dim y, m, d, h, mi, s

Format_Time = ""

If IsDate(s_Time) = False Then Exit Function

y = cstr(year(s_Time))

m = cstr(month(s_Time))

If len(m) = 1 Then m = "0" &m

d = cstr(day(s_Time))

If len(d) = 1 Then d = "0" &d

h = cstr(hour(s_Time))

If len(h) = 1 Then h = "0" &h

mi = cstr(minute(s_Time))

If len(mi) = 1 Then mi = "0" &mi

s = cstr(second(s_Time))

If len(s) = 1 Then s = "0" &s

Select Case n_Flag

Case 1

' yyyy-mm-dd hh:mm:ss

Format_Time = y &"-" &m &"-" &d &" " &h &":" &mi &":" &s

Case 2

' yyyy-mm-dd

Format_Time = y &"-" &m &"-" &d

Case 3

' hh:mm:ss

Format_Time = h &":" &mi &":" &s

Case 4

' yyyy年mm月dd日

Format_Time = y &"年" &m &"月" &d &"日"

Case 5

' yyyymmdd

Format_Time = y &m &d

case 6

'yyyymmddhhmmss

format_time= y &m &d &h &mi &s

End Select

End Function

'myint 数字

'n 格式化的长度

function Format_Int(myInt,n)

dim i,s,l

l=len(myint)

for i=1 to n-l

s=s &"0"

next

format_Int=s &cstr(myint)

end function

%>

输出

<%=response.write(format_time(now(),6) &format_int(1,3))%>

---