ئەسسالامۇئەلەيكۇم !
تۆۋەندە مەن بەش مىنۇت ئىچىدە ئاددى asp تىلىدا مۇنبەر پىروگىراممىسى يېزىش ئۇسۇلىنى چۈشەندۈرۈپ چىقىمەن . ھەم نەق مەيداندا سىناپ كۆرسىتىمەن .
ئەمىسە تۆۋەندىكى چۈشەندۈرۈش ۋە كودلارغا ياخشىراق دېققەت قىلىڭ ، 飚车،传奇 ئويناپ ئۆتۈپ كەتمەيلى ئۇيغۇر ياشىلىرى 1.ساندان قۇرۇش ،يوللانغان تېمىلارنى ساقلايدۇ ،
ئانا تىلدا يېزىلىشى (سانلىق مەلۇماتلار ئامبرى) قۇشۇمچە تىلىدكى يېزىلىشى (数据库)
2. سانداننى چوقۇم تور بەتكە ئۇلاش كېرەك ،ساندان ئۇلاشقا ئىشلىتىدىغان ھۆججىتىمىزنىڭ ئىسمى conn.asp بولۇپ بۇنىڭغا سانداننىڭ ئورنىنى يېزىپ قويىمىز .
3.تىما يوللايغان ھۆججەتنى بىز yezix.asp دەپ ئىشلەتتۇق، بۇنىڭغا ئاساسلىقى ساندانغا خاتېرلەيدىغان ئۇچۇرلارنىڭ كىرگۈزۈش رامكىسى ، ساندانغا يېزىش بىتىگە يوللاپ بېرىش كودى قاتارلىقلار بار .
ئانا تىلدىكى يېزىلىشى (كىرگۈزۈش رامكىسى) قوشۇمچە تىلدىكى يېزىلىشى (输入框) ئېنگلىس تىلدىكى يېزىلىشى (input)
4.تېما يېزىش بىتىدىن كەلگەن ئۇچۇرلارنى ساندانغا خاتېرلەش بىتى بولۇپ ، بۇنىڭ ئىسمىنى بىز yezilix.asp دەپ ساقلىدۇق.
5.بۇ بىزنىڭ مۇنبەرنىڭ باش بىتى بولۇپ، سانداندىكى ئۇچۇرلارنى كۆرسىتىش بېتى ، بۇنىڭدا ساندانغا يېزىلغان تېمىلارنى كۆرسىتىش كودى يېزىلىدۇ .
6.بۇ ھۆججەت تېمىلارنىڭ ئايرىم كۆرۈش بىتى بولۇپ ، مەخسۇس بىرلا تېمىنىڭ يوللىغۇچىسى ۋە مەزمۇنىنى كۆرسىتىپ بېرىدۇ .بۇ ھۆججەتنىڭ بىز kurux.asp دەپ ساقلىۋالدۇق .
------------------------ئەمىسە يېزىشنى باشلايلى --------------------------------
1. ئاۋال ساندان (数据库) قۇرايلى ،ساندان ئىسمىنى salkin.mdb دەپ ساقلاڭ .
ساندانغا بىر جەدىۋەل (表) قۇرۇپ ئىسمىنى salkin دەپ ساقلاڭ. بۇنىڭ ئىچىدە 4 قۇر سۆز بۆلىكى (字段) قۇرۇڭ .
سۆز بۆلىكىنىڭ بىرىنجىسىنى ID دەپ قۇرۇپ بۇنىڭ خاراكتېرىنى ئاپتوماتتىك نومۇر تاللاش (自动编号) قىلىپ ساقلاڭ .
ئىككىنجى سۆز بۆلىكىنىنىڭ ئىسمىنى ismi ،خاراكتېرىنى تېكىسىت يەنى (文本) قىلىپ ساقلاپ خەت كىرگۈزۈش چەكلىمىسىنى 255 قىلىڭ، بۇنىڭدىن چوڭ قىلغىلىمۇ بولمايدۇ ، ئەڭ چوڭ چەكلىمىسى شۇ ، بىز مۇنۇ سۆز بۆلىكىگە يوللىغۇچىنىڭ ئىسمىنى ساقلايمىز.
ئۈچىنجى سۆز بۆلىكىنىڭ ئىسمىنى mawzu دەپ ، خاراكتېرىنى تېكىسىت (文本)، بۇنىڭ ئۇزۇنلىقىنىمۇ 255 قىلىڭ،بۇ مۇنۇ سۆز بۆلىكىگە تېمىنىڭ ماۋزۇسىنى ساقلايمىز .
تۆتىنجى سۆز بۆلىكىنىڭ ئىسمىنى mezmun دەپ ، خاراكتېرىنى text (备注) قىلىپ ساقلاڭ ،text دېگىمىزمۇ تېكىست كىرگۈزۈش سۆز بۆلىكى بولۇپ بۇنىڭ سىغىمى بىر قەدەر چوڭ، بۇنى بىز تېما مەزمۇنىنى خاتېرلەشكە ئىشلىتمىز .
2. ساندانغا ئۇلاش ھۆججىتى conn.asp
ئەسلى كودى :
كود كۆچۈرۈش-
- <%
- Server.scriptTimeout="10"
- connstr="DBQ="+server.mappath("salkin.mdb")+";DefaultDir=;DRIVER={Microsoft Access Driver (*.mdb)};"
- set conn=Server.CreateObject("ADODB.connection")
- Response.CodePage =65001
- Response.CharSet = "utf-8"
- conn.open connstr
- %>
|
3.تېما يېزىش بىتى يەنى yezix.asp
ئەسلى كودى :
4.تېما يېزىش بىتى ئەۋەتكەن ئۇچۇرلارنى ساندانغا يېزىش بىتى يەنىyezilix.asp
ئەسلى كودى
كود كۆچۈرۈش- <%@ codepage="65001" %>
-
-
-
- <%
- ismi=Replace(Request.Form("ismi"),"'","''")
- mawzu=Replace(Request.Form("mawzu"),"'","''")
- mezmun=Replace(Request.Form("mezmun"),"'","''")
- %>
- <%if ismi="" or mawzu="" or mezmun="" then%>
قايتىشمەزمۇنىنى تولۇق يېزىڭ - <%else%>
- <%set savesalkin=conn.execute("insert into salkin(ismi,mawzu,mezmun)values('"&ismi&"','"&mawzu&"','"&mezmun&"')")%>
- يوللاش مۇۋەپپىقىيەتلىك بولدى!باش بەتكە قايتىش
-
- <%end if
- set savesalkin=nothing
- %>
|
5.مۇنبەر باش بىتى ، تېما كۆرسىتىش بىتى يەنى index.asp
ئەسلى كودى:
كود كۆچۈرۈش-
-
-
- تىما يوللاش
- <%i=1
- set salkin=conn.execute("select*from salkin order by id desc")
- do while not salkin.eof
- %>
- <%i=i+1
- if i>50 then exit do
- salkin.movenext
- Loop
- salkin.Close
- set salkin=nothing
- %>
|
6. تېما كۆرۈش بىتى يەنى kurux.asp
ئەسلى كودى :
كود كۆچۈرۈش-
-
-
- <%
- id=request.querystring("id")
- %>
- <%
- set kurux=conn.execute("select*from salkin where id="&id&"")
- %>
-
- باشبەتكە قايتىش
- تېما يوللاش
-
يوللىغۇچى : <%=kurux("ismi")%> | ماۋزۇ : <%=kurux("mawzu")%> | مەزمۇنى : <%=kurux("mezmun")%> | <%set kurux=nothing%>
|
بەك ئالدىراش بولغانلىقىم ئۈچۈن كودلارنى تولۇق چۈشەندۈرۈپ ماڭالمىدىم شۇڭا ئاستىدىكى قۇشۇمچە ھۆججەتتىن بەتنىڭ ئۈلگىسىنى چۈشۈرۈپ ، تور بىتىڭىزنىڭ مۇندەرىجىسىگە ياكى IIS تا سىناپ باقسىڭىز بولىدۇ .
[ بۇ يازماقېيۇمجانتەرپىدىن2009-02-04 13:26دە قايتا ت ]