安卓課程表源代碼
㈠ 例如這樣的課程表如何製作呢是否有現成的源碼(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我,給張圖片看看。
㈡ 想做一個Android系統課程表手機軟體開發,需要哪些教程,開發平台工具,給些推薦或參考網站
你就看你們JAVA課本最後幾章的內容 用eclipse就行 這個比較好用 好多方法和類都可以自動添內加什麼的容 比較省事 47744390這是個JAVA學習群 人雖然雜但是有問題一般都給解決 CSDN論壇更專業一些
㈢ 高分求一個Android手機課程表軟體的源代碼,畢業設計參考用,時間不多,求大神們速度,感激不盡
給一個android源碼下載地址,裡面有很多的相關源碼可供下載: 一、Android開發圖書推薦:http://book.apkbus.com/ 二、Android開發精選源碼推薦:http://demo.apkbus.com/ 三、Android 開發 UI設計http://www.apkbus.com/design/ 四、 Android開發系列教程合集http://dev.apkbus.com/ 五、Android開發入門到精通http://android.apkbus.com/ 游戲類
㈣ 開發一個安卓手機課程表分為幾步
大哥。這個好像比較難啊,這么強的技術課題不應該在這問,不一定能有人回答正確啊,建議你找技術型的論壇發帖子,那肯定有知道的跟帖,望採納
㈤ 求一個簡單的安卓課程表代碼(eclipse的)
如果是Android源碼的話,可到源碼天堂去下載,Android源碼頻道就可以了
㈥ 找一個帶有鬧鍾功能的安卓課程表軟體有這么難嗎
不會啊,我用的超級課程表就有鬧鍾功能的
我是用手機上的應用寶下載的這個軟體內
你打開軟體以後先導容入你的課表
然後可以設置每節課的時間
然後每天晚上它就會提醒你第二天要上什麼課
還可以通過它來和同學交流什麼的
挺好玩的,希望你會喜歡
㈦ 求超級課程表或者課程格子 oc語言源代碼文件
太天真了, 商業性的app,源代碼可能公開嗎?相反,一般這類公司在源代碼上會混合多種API調用,為的就是生成的可執行文件不容易被反匯編破解。 而且軟體開發公司一般都會簽保密協議,如果泄漏源代碼對公司造成損失是違法的。
㈧ 我寫了一個安卓課程表,基本功能都有了,現在想與我們學校的教務處接一起,自動導入課程怎麼弄呢
抓取學校教務處的介面,或者模擬登陸再用正則獲取課程信息