亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb

首頁 > 編程 > ASP > 正文

ASP網頁開發過程中的幾個小技巧_ASP教程

2024-05-04 11:03:21
字體:
來源:轉載
供稿:網友

推薦:用asp自動解析網頁中的圖片地址
現在基于WEB頁的HTML的編輯器在新聞系統,文章系統中用得越來越廣,一個網頁一粘就可以保持原來的樣式,同時圖片也可以在這個頁中保持。但是在使用過程中,如果所粘貼頁中的圖片被刪除,就會在

ASP是Microsoft公司推出的一種用以取代通用網關接口的技術,英文全稱Active Server Pages。它是一個Web服務器端的運行環境。ASP本身包含了VBScript和javascript引擎,使得腳本可以直接嵌入HTML中?,F將我們在ASP運用過程中的幾個小技巧與大家分享。

一、新聞欄

大多數網頁上有新聞欄,用以顯示最近新聞的主題,點擊此主題即可查看詳細報道。倘若每天都一條條寫在網頁上,再依次建立鏈接太過麻煩。如何讓其可以根據文件自動更新呢?

1.預備工作:

1)建一個文件夾,起名為"news",假設存于D:/ASP/目錄下;

2)把每條新聞的詳細內容寫入文件,且此文件的命名形式為:x (newstime).htm。其中x為此條新聞的主題,newstime為此條新聞發布的時間(按年-月-日順序寫)。為什么要這樣寫呢?看了下面的算法思想和源程序就知道了。

2.算法思想:對于news文件夾中的文件,依據它們文件名中新聞發布的時間(即括號內的內  容),從大到小排序。這樣一來,最新的新聞排在最上面,只要在網頁相應位置顯示 news文件夾中最上面的若干個文件名,因為文件名的命名方式如1中所述,就可以在新聞欄中顯示最新新聞了。

3.源程序段(用VBScript編寫的)

以下為引用的內容:
<%
Dim fs, f, f1, fc, filenum
dim count
dim i,j,t1,t2
dim file(100)
dim mystr(100) '標志文件中日期的字符串
count=0
Set fs = CreateObject("Scripting.FileSystemObject")
Set f = fs.GetFolder("D:/ASP/news ")
Set fc = f.Files
for each f1 in fc
count=count 1 '計文件個數
file(count)=fs.getbasename(f1) '標記文件基名
mypos=InStr(1, file(count), "(") ')在文件基名中的位置
'文件基名中的日期字符串
mystr(count) = Mid(file(count), mypos 1, Len(file(count)) - (mypos 1))
next
for i=1 to count
for j=1 to count-i
if mystr(j)<mystr(j 1) then
t1=file(j)
file(j)=file(j 1
file(j 1)=t1
t2=mystr(j)
mystr(j)=mystr(j 1)
mystr(j 1)=t2
end if
next
next
j=1
if count<10 then '新聞欄中共顯示10條新聞
temcount=count
else
temcount=10
end if
do while j<=temcount%>
<a href="file:///D:/ASP/news/<%=file(j)%>.htm" target="new_window"><%=file(j)%> </a>
<%
j=j 1
loop
%>
  
4.新聞欄內容更新:

只要養成良好的書寫習慣,使得新聞的名稱遵照1的要求,再把寫好的文件存入news文件夾,新聞欄就會自動顯示出最新的10條新聞了。

二、公告欄

除了新聞欄之外,較常用的就是公告欄了,公告欄主要用來顯示一些重要的通知。當然這些通知是要經常變化的。讓用戶每次更改公告內容時都到源程序里去修改嗎?當然不行,我們必須提供一個維護的界面給用戶,使得用戶只要輸入通知,網頁上的公告欄里自然就會顯示通知內容了。

1.解決這一問題的關鍵在于靈活應用FileSystemObject對象和TextStream對象。在實際應用中,你無需自行建立TextStream對象,因為只要利用FileSystemObject對象打開了文件,系統便自動建立TextStream對象。也就是說,一旦調用OpenTextFile或CreateTextFile方法,便會傳回TextStream對象。

2.所需相關文件有三個:更新.asp、公告.asp、維護文本.txt,把它們存入d:/ASP/maintain目錄下。

3.三個文件的主要功能和源程序段:

1)更新.asp

主要功能是讓用戶輸入欲顯示的公告,檢驗輸入內容是否為空,若不為空,則提交給”公告.asp”程序處理。

以下為引用的內容:

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>更新公告欄內容</title>
</head>
<body>
<script language=vbscript>
function datacheck()
dim msg,errflag
errflag=true
if len(trim(maintain.t1.value))=0 then
focusto(0)
errflag=false
msg="請輸入需提交的公告內容"
end if
if (errflag=false) then
msgbox msg,64,"oh no!"
exit function
end if
datacheck=errflag
maintain.submit
end function
sub focusto(x)
document.maintain.elements(x).focus()
end sub
</script>
①<form method="POST" action="公告.asp" name="maintain">
<p><input type="text" name="t1" size="84"><input type="reset" value="重寫" name="B2">
<input type="button" value="提交" name="B1" onclick="datacheck()"></p>
<hr color=#FF99FF size=1>
</form>
</body>
</html>

語句①中的action="公告.asp"部分,指出了在form提交后要啟動的程序為“公告.asp”。

2)公告.asp

通過FileSystemObject對象和TextScream對象對"維護文本.txt"文件進行讀寫操作,使得此文件最上面5行的內容為要在公告欄里顯示的公告。

以下為引用的內容:

<%
dim str
str=request.form(t1)
dim s(5)
const forreading=1,forwriting=2
dim fso,myfile
set fso=server.createobject("scripting.FileSystemObject")
set myfile=fso.opentextfile("維護文本.txt",forreading)'以Reading模式打開文件
for i=1 to 5 '公告欄共顯示5條公告
s(i)=myfile.readline'讀取文件內容
next
myfile.close
set myfile=fso.opentextfile("維護文本.txt",forwriting,true) '以writing模式打開文件
myfile.writeline str
for i=1 to 4
myfile.writeline s(i) '將數據寫回文件
next
myfile.close
%>

3)維護文本.txt

此文件開始為空,從”更新.asp”顯示的界面輸入公告后,此文件內容被自動寫入。

4.在主頁文件(通常是default.asp)欲顯示公告位置的代碼段中加入如下代碼,即可顯示出更新后的公告。

以下為引用的內容:

<marquee scrollamount="2" scrolldelay="50" direction="up" width="223" height="133" id="a" onmouseover="a.stop()" onmouseout="a.start()">'公告欄上下滾動
<%
Dim s(20)
Dim fso, MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.OpenTextFile("D:/ASP/maintain/維護文本.txt",1,true)
for i=1 to 5
ReadLineTextFile=MyFile.ReadLine
s(i)=ReadLineTextFile
response.write "★ " & s(i)
response.write "<br>"
next
%>
</marquee>

上述兩個小技巧舉一反三,可以解決很多此類問題。網頁設計愛好者們不妨一試。

分享:session和cookie的最深刻理解
先說session對SESSION的爭論好象一直沒有停止過,不過幺麼能理解SESSION的人應該占90以上。但還是講講,別嫌老~有一些人贊成用SESSION,有一些人不贊成。但這個問題到底要怎么說。不妨聽聽

發表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發表
亚洲香蕉成人av网站在线观看_欧美精品成人91久久久久久久_久久久久久久久久久亚洲_热久久视久久精品18亚洲精品_国产精自产拍久久久久久_亚洲色图国产精品_91精品国产网站_中文字幕欧美日韩精品_国产精品久久久久久亚洲调教_国产精品久久一区_性夜试看影院91社区_97在线观看视频国产_68精品久久久久久欧美_欧美精品在线观看_国产精品一区二区久久精品_欧美老女人bb
91视频免费在线| 亚洲国产成人精品久久久国产成人一区| 精品欧美一区二区三区| 国外成人在线直播| 国产97人人超碰caoprom| 国产精品一区专区欧美日韩| 久久国产精品偷| 日韩电影在线观看免费| 精品久久久久久亚洲国产300| 欧美在线国产精品| 久久在线免费视频| 国产在线98福利播放视频| 国产91ⅴ在线精品免费观看| 国产精品视频网址| 亚洲自拍偷拍视频| 欧美天天综合色影久久精品| 国产精品色悠悠| 亚洲天堂视频在线观看| 欧美有码在线观看| 欧美在线视频免费播放| 精品国产91乱高清在线观看| 亚洲图片欧洲图片av| 97超碰国产精品女人人人爽| 97精品一区二区视频在线观看| 国产精品狼人色视频一区| 国产国语videosex另类| 美日韩精品免费观看视频| 欧美人与性动交a欧美精品| 久久天天躁狠狠躁夜夜躁| 久久精品在线视频| www.久久草.com| 亚洲最大av网站| 亚洲精品在线观看www| 911国产网站尤物在线观看| 日韩性xxxx爱| 在线观看国产精品日韩av| 欧美日韩中文字幕在线| 成人精品在线视频| 欧美高跟鞋交xxxxhd| 丝袜美腿精品国产二区| 午夜精品福利在线观看| 日韩电视剧在线观看免费网站| 色综合天天狠天天透天天伊人| 91中文字幕在线| www.日本久久久久com.| 免费不卡在线观看av| 97精品在线视频| 日韩美女在线播放| 国产国语videosex另类| 欧美激情视频免费观看| 欧美成人激情图片网| 日韩av免费网站| 亚洲2020天天堂在线观看| 久久琪琪电影院| 亚洲3p在线观看| 久久精品国产清自在天天线| 日韩电影在线观看永久视频免费网站| 日韩av三级在线观看| 国产一区香蕉久久| 国产黑人绿帽在线第一区| 中文字幕亚洲第一| 国产精品偷伦免费视频观看的| 国产91精品视频在线观看| 26uuu亚洲伊人春色| 欧美精品中文字幕一区| 久久精品色欧美aⅴ一区二区| 欧美午夜女人视频在线| 久99久在线视频| 国产精品精品国产| 成人午夜黄色影院| 亚洲aaaaaa| 在线日韩中文字幕| 91精品国产高清自在线| 国产精品免费久久久久影院| 日本精品视频在线| 日韩av理论片| 日韩中文字幕网址| 欧美激情视频网址| 成人黄色生活片| 欧美丰满少妇xxxx| 91系列在线播放| 91九色国产社区在线观看| 亚洲精品免费一区二区三区| 国产精品福利久久久| 日韩精品免费看| 亚洲综合小说区| 性欧美xxxx视频在线观看| 国产精品久久av| 日韩在线观看视频免费| 亚洲国产一区二区三区四区| 91精品国产高清久久久久久久久| 色悠悠国产精品| 欧美在线一区二区三区四| 国产亚洲精品久久久久久牛牛| 国产亚洲精品91在线| 欧美精品免费在线观看| 国产精品男人爽免费视频1| 国产精品精品久久久久久| 欧美剧在线观看| 日韩成人xxxx| 欧美夫妻性生活视频| 亚洲国产女人aaa毛片在线| 国产精品视频专区| 午夜欧美不卡精品aaaaa| 97在线视频免费看| 国产成人精品视频在线观看| 欧美日韩国产一区在线| 亚洲精品网站在线播放gif| 日韩精品免费观看| 日韩美女视频免费在线观看| 欧美大尺度在线观看| 色哟哟亚洲精品一区二区| 成人黄色免费看| 欧美极品少妇与黑人| 亚洲欧美日韩一区二区三区在线| 国产精品午夜视频| 中文字幕日韩视频| 日本高清+成人网在线观看| 国产91av在线| 国产精品视频网| 91色在线视频| 欧美成年人在线观看| 久久影院在线观看| 日韩在线观看高清| 亚洲国产精品久久久久秋霞不卡| 国产精品96久久久久久又黄又硬| 日韩在线观看免费全| 国产精品嫩草视频| 国产精品日韩在线观看| 国产一区二区黑人欧美xxxx| 日韩av中文在线| 久久久www成人免费精品| 欧美一区二区大胆人体摄影专业网站| 久久久视频在线| 日韩欧美在线一区| 国内外成人免费激情在线视频| 日本老师69xxx| 亚洲欧美日韩天堂| 欧美精品久久久久| 91香蕉国产在线观看| 久久视频在线直播| 国产日韩欧美另类| 日韩免费精品视频| 亚洲欧洲第一视频| 国产美女被下药99| 亚洲精品国产精品国产自| 91久久久久久久| 亚洲在线免费看| 欧美性jizz18性欧美| 久久久国产一区二区三区| 日韩高清av在线| 国内精品视频在线| 456国产精品| 亚洲第一二三四五区| 国产精品久久久久久久久久久久| 欧美亚洲成人免费| 国产偷国产偷亚洲清高网站| 日韩精品视频在线| 黄色成人av网| 精品久久久视频| 精品女同一区二区三区在线播放| 热门国产精品亚洲第一区在线| 国产精品入口日韩视频大尺度| 2019中文字幕在线|