管制加一课程表
㈠ WORD文档课程表
以word2003为例,具体方法如下:
1、新建一个word文档,单击“文件”-“保存”, 保存文件名为“课程表”, 在文档中输入“某某班级课程表”;如下图所示;
11、整个表制作好了,可以直接打印,或者在表格中输入课程名之后再打印。大家可以根据自己的需要灵活处理。
㈡ 例如这样的课程表如何制作呢是否有现成的源码(asp)
帮你写一个,自己加入到网站中去:
1,建立库,在原来的库上加一个表也可以,现在假设新建一个名叫book的库,ACCSEE型,表名叫Test_book
库名=book
表(Test_book):id(自动编号),bookdate(日期,文本50),booktime(时间,文本50),bookname(课程名,文本50),BookClass(数字,课程分期)
2,conn.asp//库链接及通用函数页
将下面的代码保存为conn.asp
<%
dimconn,connstr,db,BookClassName
BookClassName="执业医师"'课程类名称,请修改
db="book.mdb"
ConnStr="Provider=Microsoft.Jet.OLEDB.4.0;DataSource="&Server.MapPath(db)
OnErrorResumeNext
SetConn=Server.CreateObject("ADODB.Connection")
Conn.OpenConnStr
IfErrThen
err.Clear
SetConn=Nothing
Response.Write"DATABASEISERR!"
Response.End
EndIf
FunctionShowpage(totalnumber,maxperpage,filename,cpage)
iftotalnumbermodmaxperpage=0then
n=totalnumbermaxperpage
else
n=totalnumbermaxperpage+1
endif
Response.Write"总课程"&totalnumber&",每页"&maxperpage&"/第"&cpage&"页/共"&n&"页"&VbCrLf
ifcpage<2then
Response.Write"首页上页"&VbCrLf
else
Response.Write"<ahref="&filename&"?page=1>首页</a>"&VbCrLf
Response.Write"<ahref="&filename&"?page="&cpage-1&">上页</a>"&VbCrLf
endif
ifn-cpage<1then
Response.Write"下页末页"&VbCrLf
else
Response.Write"<ahref="&filename&"?page="&cpage+1&">下页</a>"&VbCrLf
Response.Write"<ahref="&filename&"?page="&n&">末页</a>"&VbCrLf
endif
Endfunction
SubBookCss()
Response.Write"<styletype=""text/css"">"&VbCrLf
Response.Write"BODY{margin:0;Padding:0;COLOR:#444;font-family:宋体;font-size:9pt}"&VbCrLf
Response.Write"TD{COLOR:#444;font-family:Verdana;font-size:9pt}"&VbCrLf
Response.Write"form{margin:5,0,0,0}"&VbCrLf
Response.Write"input{border-width:1;border-color:#000000;background-color:#efefef;font-family:宋体;font-size:9pt;COLOR:#333;line-height:14px}"&VbCrLf
Response.Write"textarea{border-width:1;border-color:#000000;background-color:#efefef;font-family:宋体;font-size:9pt;}"&VbCrLf
Response.Write"select{border-width:1;border-color:#000;background-color:#eee;font-family:宋体;font-size:9pt;}"&VbCrLf
Response.Write"A{COLOR:#444;font-family:Verdana}"&VbCrLf
Response.Write"A:link{color:0000aa;TEXT-DECORATION:none}"&VbCrLf
Response.Write"A:visited{color:0000aa;TEXT-DECORATION:none}"&VbCrLf
Response.Write"A:hover{COLOR:#ff2200;TEXT-DECORATION:none}"&VbCrLf
Response.Write".headdiv{height:105px;width:100%;margin:0;padding:10;background:#f8f8f8}"&VbCrLf
Response.Write".Linediv1{border-bottom:#ccc2pxsolid;width:100%;margin:0;padding:0;line-heignt:1px;;height:1px}"&VbCrLf
Response.Write".Linediv{border-top:#9991pxsolid;width:100%;margin:0;padding:0;line-heignt:1px;height:1px}"&VbCrLf
Response.Write".Listdiv{width:550px;padding:10;background:#eee}"&VbCrLf
Response.Write".cpagediv{margin-top:5px;padding-left:10px;color:#999}"&VbCrLf
Response.Write".adddiv{width:100%;margin-bottom:5px;padding-left:60px}"&VbCrLf
Response.Write".li1{width:250px;line-height:16px;font-size:12px;list-style:none;color:069}"&VbCrLf
Response.Write"</style>"&VbCrLf
EndSub
%>
3.BookMain.asp//课程管理,仅提供添加和删除,若要修改功能请联系。
将下面的代码保存为BookMain.asp,和conn.asp在同一目录
<!--#includefile="Conn.asp"-->
<%
DimFileName
FileName="BookMain.asp"
CallMain()
Conn.Close:SetConn=Nothing
SubMain()
CallBookCss()
SelectCaseRequest("action")
Case"DelBook"
CallDelBook(Trim(Request("Id")),Trim(Request("page")))
Case"AddBook"
CallBookSave()
CallBookList()
CaseElse
CallUpdateMain()
CallBookList()
EndSelect
Conn.Close:SetConn=Nothing
EndSub
SubUpdateMain()
DimClassNum
ClassNum=1
SetRs=Conn.execute("SelectTop1BookclassFromTest_BookOrderByIdDesc")
IfNot(rs.bofandrs.eof)ThenClassNum=Rs(0)+1
Rs.Close:SetRs=Nothing
Response.Write"<DIVclass=headdiv>"&VbCrLf
Response.Write"<div><b>添加新课程</b></div>"&VbCrLf
Response.Write"<formmethod=POSTaction=""?action=AddBook""name=form1>"&VbCrLf
Response.Write"<div>"&VbCrLf
Response.Write"课程名称:<inputtype=""text""name=""bookname""value=""""size=20>"&VbCrLf
Response.Write"课程期数:<inputtype=""text""name=""BookClass""value="""&ClassNum&"""size=5>填写数字</div>"&VbCrLf
Response.Write"<div>"&VbCrLf
Response.Write"开课日期:<inputtype=""text""name=""Bookdate""value=""""size=20>"&VbCrLf
Response.Write"开课时间:<inputtype=""text""name=""booktime""value=""""size=20></div>"&VbCrLf
Response.Write"<divclass=adddiv><inputtype=""submit""value=""确定添加""name=""button1""></div>"&VbCrLf
Response.Write"</form>"&VbCrLf
Response.Write"</DIV>"&VbCrLf
Response.Write"<DIVclass=linediv></DIV>"&VbCrLf
EndSub
SubBookSave()
DimBookName,BookClass,BookDate,BookTime,BMark
BookClass=Trim(Request("BookClass"))
IfIsnumeric(BookClass)=FalseThenExitSub
BookClass=Cint(BookClass)
BookName=Trim(Request("BookName"))
BookDate=Trim(Request("BookDate"))
BookTime=Trim(Request("BookTime"))
Conn.Execute("insertIntoTest_Book(BookName,BookClass,BookDate,BookTime)Values('"&BookName&"','"&BookClass&"','"&BookDate&"','"&BookTime&"')")
Response.Write"<DIVclass=headdiv>"&VbCrLf
Response.Write"<div><b>课程添加成功!</b></div>"&VbCrLf
Response.Write"<formmethod=POSTaction=name=form2>"&VbCrLf
Response.Write"<div>第"&BookClass&"期课程,"&BookName&","&BookDate&Booktime&"开课。<ahref=""?action=Main"">>>继续添加</a>"&VbCrLf
Response.Write"</div>"&VbCrLf
Response.Write"</form>"&VbCrLf
Response.Write"</DIV>"&VbCrLf
Response.Write"<DIVclass=linediv> </DIV>"&VbCrLf
EndSub
SubBookList()
DimMaxPage,totalPut,cpage,Infonum,k,i
cpage=1
IfRequest("page")<>""then
IfIsnumeric(Request("page"))=FalseThen
cpage=1
Else
cpage=Cint(Request("page"))
EndIf
EndIf
Infonum=1
MaxPage=15
Response.Write"<DIVStyle=""width=:100%;margin:0;"">"&VbCrLf
Response.Write"<div><b>课程管理</b></div>"&VbCrLf
Response.Write"<divclass=Listdiv>"&VbCrLf
SetRs=Server.CreateObject("ADODB.RecordSet")
Sql="Select*FromTest_bookOrderByIdDesc"
Rs.OpenSql,Conn,1,1
IfRs.eofandrs.bofthen
Response.write"<p>暂时没有任何课程。</p>"&VbCrLf
Else
i=0
totalPut=Rs.Recordcount
Ifcpage<1thencpage=1
If(cpage-1)*MaxPage>totalputthen
If(totalPutmodMaxPage)=0then
cpage=totalPutMaxPage
Else
cpage=totalPutMaxPage+1
EndIf
Endif
Ifcpage<>1then
If(cpage-1)*MaxPage<totalPutthen
Rs.move(cpage-1)*MaxPage
BMark=Rs.bookmark
Else
cpage=1
EndIf
EndIf
InfoNum=totalPut-(cpage-1)*MaxPage
k=4-len(InfoNum)
Dowhilek>0
k=k-1
InfoNum="0"&InfoNum
loop
Response.Write"<divclass=cpagediv>"&VbCrLf
showpagetotalput,MaxPage,filename,cpage
Response.Write"</div>"&VbCrLf
Response.Write"<tablewidth=540border=0cellspacing=2cellpadding=0>"&VbCrLf
Response.Write"<tralign=centerbgcolor=""#C2CCE2"">"&VbCrLf
Response.Write"<tdwidth=""10%""height=24>序号</td>"&VbCrLf
Response.Write"<tdwidth=""20%"">日期</td>"&VbCrLf
Response.Write"<tdwidth=""20%"">时间</td>"&VbCrLf
Response.Write"<tdwidth=""30%"">课程名称</td>"&VbCrLf
Response.Write"<tdwidth=""10%"">期数</td>"&VbCrLf
Response.Write"<tdwidth=""10%"">操作</td>"&VbCrLf
Response.Write"</tr>"&VbCrLf
DowhilenotRs.eofandmaxpage>0
i=i+1
Response.Write"<tralign=centerbgcolor=""DFE8EE"">"&VbCrLf
Response.Write"<tdheight=24>"&InfoNum&"</td>"&VbCrLf
Response.Write"<td>"&rs(1)&"</td>"&VbCrLf
Response.Write"<td>"&rs(2)&"</td>"&VbCrLf
Response.Write"<td>"&rs(3)&"</td>"&VbCrLf
Response.Write"<td>"&rs(4)&"期</td>"&VbCrLf
Response.Write"<td><ahref=0.asp?Id="&rs(0)&"&action=DelBookonClick=""returnconfirm('警告:您的操作不可恢复,确定删除选定的程序记录?')"">删除</a></td>"&VbCrLf
Response.Write"</tr>"&VbCrLf
Ifi>=MaxPageThenExitDo
Rs.movenext
InfoNum=InfoNum-1
k=4-len(InfoNum)
Dowhilek>0
k=k-1
InfoNum="0"&InfoNum
loop
Loop
Response.Write"</table>"&VbCrLf
EndIf
Rs.Close:SetRs=Nothing
Response.Write"<div>"&VbCrLf
Response.Write"</DIV>"&VbCrLf
EndSub
SubDelBook(Id,page)
Conn.Execute("Delete*FromTest_BookwhereId="&Id)
Response.redirect"0.asp?page="&page
EndSub
%>
4.课程显示页面:Showbook.asp
将下面的代码存为Showbook.asp,如果不和conn.asp不在同一目录,注意修改conn.asp路径:
我晕,好象是字数超限了,几次贴不上来,就贴到这里,还有一页HI我,给张图片看看。
㈢ WORD做课程表怎么做
1、新建一个word文档,单击“文件”-“保存”, 保存文件名为“课程表”, 在文档中输入“某某班级课程表”,如下图所示;
㈣ 如何用Word制作课程表
新建一个word文档,单击“文件”-“保存”, 保存文件名为“课程表”, 在文档中输入“某某班级课程表”;
点击“表格”-“插入”-“表格”,打开“插入表格”对话框,在行列中输入我们需要的行和列,我们在行中输入8,在列中输入6。即我们一天一般七节课和一个星期五天,各加一个表头。
在插入的表格中输入数据,表头列为星期一到星期天,行为第一节到第七节;
我们把光标移动到边框线上对表格宽度进行调整, 调整后选中整个表格,右击,在弹出的菜单中选择“平均分布各行”,同理,再执行一次操作,选择“平均分布各列”。
把光标移动支第一个单元格,选择“表格”菜单,执行“绘制斜线表头”命令,在弹出的对话框中选择 一种表头样式,我们选择“样式一”,字体大小选择五号字;在行标题中输入“星期”,列标题中输入“节次”;
绘制斜线表头就制作好了,我们稍微调整好位置,让表头美观。
选择整个表格,点击右键,在弹出的菜单中选择“单元格对齐方式”,我们找到居中对齐;文字就上下左右全部居中了,再次选择表格,我们对文字格式进行设置,选择加粗,四号字;
选择文字“某某班级课程表”,设置为二号字大小,加粗显示,居中,仿宋字体;设置好与表格的间距;
选择“星期一”到“星期五”单元格,右击,在弹出的菜单中选择“边框和底纹”;在打开的“边框和底纹”选项卡中找到底纹,我们选择一种颜色作为单元格的底纹。
设置好后,点击“确定”,返回到编辑区,同上面的方法,我们选择第一节到第七节单元格,设置节次的底纹,全部设置好后;
整个表制作好了,我们可以直接打印,或者在表格中输入课程名之后再打印。大家可以根据自己的需要灵活处理。
㈤ 怎么用电脑做课程表
1.新建一个word文档,单击“文件”-“保存”, 保存文件名为“课程表”, 在文档中输入“某某班级课程表”;
2.点击“表格”-“插入”-“表格”,打开“插入表格”对话框,在行列中输入需要的行和列,在行中输入8,在列中输入6。即我们一天一般七节课和一个星期五天,各加一个表头。
3.在插入的表格中输入数据,表头列为星期一到星期天,行为第一节到第七节;
4.把光标移动到边框线上对表格宽度进行调整, 调整后选中整个表格,右击,在弹出的菜单中选择“平均分布各行”,同理,再执行一次操作,选择“平均分布各列”。
5.把光标移动支第一个单元格,选择“表格”菜单,执行“绘制斜线表头”命令,在弹出的对话框中选择 一种表头样式,我们选择“样式一”,字体大小选择五号字;在行标题中输入“星期”,列标题中输入“节次”;
6.绘制斜线表头就制作好了,稍微调整好位置,让表头美观,;
7.选择整个表格,点击右键,在弹出的菜单中选择“单元格对齐方式”,找到居中对齐;文字就上下左右全部居中了,再次选择表格,对文字格式进行设置,选择加粗,四号字;
8.选择文字“某某班级课程表”,设置为二号字大小,加粗显示,居中,仿宋字体;设置好与表格的间距;
9.选择“星期一”到“星期五”单元格,右击,在弹出的菜单中选择“边框和底纹”;在打开的“边框和底纹”选项卡中找到底纹,选择一种颜色作为单元格的底纹。
10.设置好后,点击“确定”,返回到编辑区,同上面的方法,选择第一节到第七节单元格,设置节次的底纹,全部设置好后,效果如下图;
㈥ 怎么在电脑上做课程表,要过程
1.新建一个word文档,单击“文件”-“保存”, 保存文件名为“课程表”, 在文档中输入“某某班级课程表”;
2.点击“表格”-“插入”-“表格”,打开“插入表格”对话框,在行列中输入需要的行和列,在行中输入8,在列中输入6。即我们一天一般七节课和一个星期五天,各加一个表头。
3.在插入的表格中输入数据,表头列为星期一到星期天,行为第一节到第七节;
4.把光标移动到边框线上对表格宽度进行调整, 调整后选中整个表格,右击,在弹出的菜单中选择“平均分布各行”,同理,再执行一次操作,选择“平均分布各列”。
5.把光标移动支第一个单元格,选择“表格”菜单,执行“绘制斜线表头”命令,在弹出的对话框中选择 一种表头样式,我们选择“样式一”,字体大小选择五号字;在行标题中输入“星期”,列标题中输入“节次”;
6.绘制斜线表头就制作好了,稍微调整好位置,让表头美观,;
7.选择整个表格,点击右键,在弹出的菜单中选择“单元格对齐方式”,找到居中对齐;文字就上下左右全部居中了,再次选择表格,对文字格式进行设置,选择加粗,四号字;
8.选择文字“某某班级课程表”,设置为二号字大小,加粗显示,居中,仿宋字体;设置好与表格的间距;
9.选择“星期一”到“星期五”单元格,右击,在弹出的菜单中选择“边框和底纹”;在打开的“边框和底纹”选项卡中找到底纹,选择一种颜色作为单元格的底纹。
10.设置好后,点击“确定”,返回到编辑区,同上面的方法,选择第一节到第七节单元格,设置节次的底纹,全部设置好后,效果如下图;
㈦ EXCEL,多个课程表,格式相同,内容直接合并。
用&连接各单元格内容就可以了,如:=Sheet1!A1&Sheet2!A1,然后公式填充就行啦
㈧ 怎么在WORD上绘制课程表
WORD上绘制课程表:
1、新建一个word文档,单击“文件”-“保存”, 保存文件名为“课程表”, 在文档中输入“某某班级课程表”;
2、点击“表格”-“插入”-“表格”,打开“插入表格”对话框,在行列中输入需要的行和列,在行中输入8,在列中输入6。即一天一般七节课和一个星期五天,各加一个表头。
3、在插入的表格中输入数据,表头列为星期一到星期天,行为第一节到第七节;
4、把光标移动到边框线上对表格宽度进行调整, 调整后选中整个表格,右击,在弹出的菜单中选择“平均分布各行”,同理,再执行一次操作,选择“平均分布各列”。
5、把光标移动支第一个单元格,选择“表格”菜单,执行“绘制斜线表头”命令,在弹出的对话框中选择 一种表头样式,我们选择“样式一”,字体大小选择五号字;在行标题中输入“星期”,列标题中输入“节次”;
6、绘制斜线表头就制作好了,稍微调整好位置,让表头美观;
7、选择整个表格,点击右键,在弹出的菜单中选择“单元格对齐方式”,找到居中对齐;文字就上下左右全部居中了,再次选择表格,对文字格式进行设置,选择加粗,四号字;
8、选择文字“某某班级课程表”,设置为二号字大小,加粗显示,居中,仿宋字体;设置好与表格的间距;
9、选择“星期一”到“星期五”单元格,右击,在弹出的菜单中选择“边框和底纹”;在打开的“边框和底纹”选项卡中找到底纹,选择一种颜色作为单元格的底纹。
10、设置好后,点击“确定”,返回到编辑区,同上面的方法,选择第一节到第七节单元格,设置节次的底纹,全部设置好。
11、整个表制作好了,可以直接打印,或者在表格中输入课程名之后再打印。
㈨ 幼儿园大班课程表
早上早读时观察他们的精神状况;上午
第一节课用游戏方式回顾昨天的类容;
第二节同样用游戏方式给幼儿讲今天的新课程。
下午第一节课让幼儿看看电视或者老师带着做游戏
唱歌等,第二节课
让有儿写写作业练习。
日期
内容 周一 周二 周三 周四 周五
上 午
学习性区域活动 学习性区域活动 学习性区域活动 学习性区域活动 学习性区域活动
活动一 语言 科学 艺术 健康 社会
活动二 阅读经典诵读 阅读经典诵读 阅读经典诵读 阅读经典诵读 阅读经典诵读
户 外活 动 拍球比赛 科学探索室 扭扭车 跑步比赛 蒙特梭利室
下 午
活动三 英语 英语 英语 英语 英语
艺术
兴趣活动 舞蹈美术电子琴 舞蹈美术电子琴 舞蹈美术电子琴 舞蹈美术电子琴 舞蹈美术电子琴
户外
游戏
活动 科学探索室 +
讲故事 体育游戏活动 +
英语儿歌欣赏 打篮球 +
英语拼图游戏 拍球比赛 +
中文歌曲欣赏 律动游戏 +
折纸游戏
㈩ 超级课程表只能加一个学校的
课程表是可以加其他学校的,要是更改学校只有3次机会,超过了只能找表表客服处理了。