app دېتالى

asp دا utf-8 فورماتىدىكى html بەت ھاسىل قىلىش

ۋاقتى:2010-02-15 09:55مەنبە: يوللىغۇچى:نۇرئەلى چېكىلىشى:قىتىم

ئۈندىدارغا ئورتاقلىشىڭ|تېلېفوندا كۆرۈڭ

QR code


asp دا html چىقىرىش، يەنى ھەرىكەتچان ھالەتتىكى asp بەتتىن تىنىچ ھالەتتىكى html بېتى ھاسىل قىلىپ، ھاسىل بولغان مەزمۇن بىلەن سانداننىڭ مۇناسىۋىتىنى پۈتۈنلەي ئايرىۋېتىپ يەككە ھالەتتە ساقلاپ، مۇلازىمېتىرنىڭ يۈكىنى يەڭگىلىتىدىغان بىرخىل ئۇسۇل. بۇ ئۇسۇلنىڭ بىخەتەرلىكى كۈچلۈك، سۈرئەت جەھەتتىن تېز بولۇشتەك ئالاھىدىلىكلىرى بولغاچقا، كۆپ قىسىم تور بېكەتلەر مۇشۇ خىل ئۇسۇلنى ئىشلەتمەكتە، asp ئۇيغۇرچىلاشتۇرىۋاتقانلار پات پات مۇشۇ مەسلىگە ئۇچراپ تۇرىدۇ، تۆۋەندە asp دا html چىقىرىدىغان ئاددى بىر مىسالنى كۆرۈپ باقايلى.

بۇ مەزمۇن ئىز تورىدىن كۆچۈرۈلگەن



پروگرامما كودى

<%
filename="html.htm"
if request("body")<>"" then
'set fso = Server.CreateObject("s cripting.FileSystemObject")
'set fout = fso.CreateTextFile(server.mappath(""&filename&""))
[باشقلارنىڭ ئەمگكىنى ھۆرمەتلەڭ]

Uyezish server.mappath(""&filename&""),request("body")
mskrindex="ok"
end if
Sub Uyezish(ulanma, mezmun)
dim stm
Set stm = server.CreateObject("adodb.stream")
stm.Type = 2
ئىز تورى ئىز تورى ئىز تورى ئىز تورى ئىز تورى ئىز تورى ئىز تورى ئىز تور

stm.mode = 3
stm.Charset = "utf-8"
stm.open
stm.WriteText mezmun
stm.SaveToFile ulanma, 2
stm.flush
stm.Close
Set stm = Nothing
End Sub
%>

مەزمۇننى تولدۇرۇپ بولغاندىن كېيىن، ھاسىل قىلىش كۇنۇپكىسى بېسىلسا ئاپتوماتىك ھالدا ھۆججەت نامى html.htm بولغان بىر دانە htm ھۆججىتى ھاسىل بولىدۇ. بەتنىڭ ئومۇمىي كودى:

www.iz.la



پروگرامما كودى





asp da html hasil qilish



<%
filename="html.htm"
if request("body")<>"" then
'set fso = Server.CreateObject("s cripting.FileSystemObject") بۇ مەزمۇن ئىز تورىدىن كۆچۈرۈلگەن
'set fout = fso.CreateTextFile(server.mappath(""&filename&""))
Uyezish server.mappath(""&filename&""),request("body")
mskrindex="ok"
end if
Sub Uyezish(ulanma, mezmun)
ئىز تورى www.iz.la

dim stm
Set stm = server.CreateObject("adodb.stream")
stm.Type = 2
stm.mode = 3
stm.Charset = "utf-8"
stm.open
stm.WriteText mezmun
stm.SaveToFile ulanma, 2
stm.flush
stm.Close ى ئىز تورى ئىز تورى ئىز تورى ئىز تورى
Set stm = Nothing
End Sub
%>

ئىز تورى بەك ياخشى


بۇ مەزمۇن ئىز تورىدىن كۆچۈرۈلگەن