推奨:ASPを使用して、Webページの画像アドレスを自動的に解析する現在、Webページに基づいたHTMLエディターは、ニュースシステムと記事システムでますます広く使用されています。 Webページは、元のスタイルを固定するとすぐに維持でき、このページでは写真を維持できます。ただし、使用中、貼り付けられたページの画像が削除されている場合、
ASPは、Universal Gatewayインターフェイスを置き換えるためにMicrosoftによって開始されたテクノロジーです。そのフルネームはアクティブサーバーページです。これは、Webサーバー側の実行環境です。 ASP自体にはVBScriptとJavaScriptエンジンが含まれており、スクリプトをHTMLに直接埋め込むことができます。次に、ASPの使用方法に関するヒントをご紹介します。
1。ニュースコラム
ほとんどのWebページには、最近のニュースのトピックを表示するニュースバーがあります。このトピックをクリックして、詳細なレポートを表示します。毎日Webページに1つずつ書くと、リンクを作成するには面倒すぎるでしょう。ファイルに基づいて自動的に更新する方法は?
1。準備:
1)d:/ asp/ディレクトリに保存されていると仮定して、フォルダーを作成してニュースに名前を付けます。
2)各ニュースの詳細なコンテンツをファイルに書き込み、このファイルの命名フォームはx(newstime).htmです。ここで、Xはこのニュースのテーマであり、NewStimeはニュースがリリースされる時期です(月の順序で書かれています)。なぜこのように書くのですか?以下のアルゴリズムのアイデアとソースプログラムを読んだ後に知っているでしょう。
2。アルゴリズムのアイデア:ニュースフォルダーのファイルの場合、ファイル名(つまり、ブラケットのコンテンツ)のニュースリリースの時間に応じて、大部分から小まで並べ替えます。このように、最新のニュースは一番上にランクされています。ニュースフォルダーのいくつかのファイル名がWebページの対応する位置に表示される限り、最新のニュースを1で説明したようにニュース列に表示できます。
3。ソースブロック(vbscriptで書かれています)
| 以下は引用されたコンテンツです。 <% DIM FS、F、F1、FC、Filenum 薄暗いカウント Dim I、J、T1、T2 DIMファイル(100) DIM MYSTR(100) 'ファイル内の日付の標準 count = 0 fs = createObject(scripting.filesystemObject)を設定します f = fs.getfolder(d:/asp/news)を設定します fc = f.filesを設定します FCの各F1 count = count 1 'ファイルの数をカウントします file(count)= fs.getBasename(f1) 'タグファイルベース名 mypos = strust(1、file(count)、() ')ファイルベース名の位置 'ファイルベース名の日付文字列 mystr(count)= mid(file(count)、mypos 1、len(file(count)) - (mypos 1)) 次 i = 1の場合 j = 1からcount-iの場合 mystr(j)<mystr(j 1)の場合 t1 = file(j) file(j)= file(j 1 ファイル(j 1)= t1 T2 = mystr(j) mystr(j)= mystr(j 1) mystr(j 1)= t2 ifを終了します 次 次 j = 1 カウント<10の場合、ニュースコラムは10のニュースを示しています temcount = count それ以外 Temcount = 10 ifを終了します j <= temcount%>を実行します <a href = file:/// d:/asp/news/<%= file(j)%> .htm target = new_window> <%= file(j)%> </a> <% J = J 1 ループ %> |
4。更新されたニュースコラムのコンテンツ:
良いライティング習慣を開発する限り、ニュースの名前を1の要件に従ってから、書かれたファイルをニュースフォルダーに保存する限り、最新の10ニュースが自動的に表示されます。
2。掲示板
ニュースコラムに加えて、最も一般的に使用されるものは速報ボードです。これは主にいくつかの重要な通知を表示するために使用されます。もちろん、これらの通知は頻繁に変更する必要があります。ユーザーがソースプログラムにアクセスして、発表のコンテンツを変更するたびに変更させますか?もちろん違います。ユーザーが通知を入力する限り、通知コンテンツがWebページのBulletinボードに自然に表示されるように、ユーザーにメンテナンスインターフェイスを提供する必要があります。
1.この問題を解決するための鍵は、FilesystemObjectオブジェクトとTextStreamオブジェクトの柔軟なアプリケーションにあります。実際のアプリケーションでは、ファイルSystemObjectオブジェクトを使用してファイルを開く限り、システムはTextStreamオブジェクトを自動的に作成するため、テキストストリームオブジェクトを自分で作成する必要はありません。つまり、OpenTextFileまたはcreateTextFileメソッドが呼び出されると、TextStreamオブジェクトが渡されます。
2.必要な3つの関連ファイルがあります。update.asp、anncount.asp、menastentaing text.txt、およびd:/asp/maint directoryにそれらを保存します。
3. 3つのファイルの主な関数とソースブロック:
1)update.asp
主な機能は、ユーザーにアナウンスを入力して表示し、入力コンテンツが空であるかどうかを確認することです。空でない場合は、処理のためのAnconement.aspプログラムに提出されます。
| 以下は引用されたコンテンツです。 <html> <head> <メタhttp-equiv = content-type content = text/html; charset = gb2312> <メタ名=ジェネレーターコンテンツ= Microsoft FrontPage 4.0> <Meta name = progid content = frontPage.editor.document> <title>掲示板のコンテンツを更新</title> </head> <body> <スクリプト言語= vbscript> function datacheck() DIM MSG、errflag errflag = true len(trim(maint.t1.value))= 0の場合 focusto(0) errflag = false msg =提出するアナウンスコンテンツを入力してください ifを終了します if(errflag = false)then msgboxmsg、64、ああいいえ! 出口機能 ifを終了します DataCheck = errflag maint.submit エンド関数 サブフォッスト(x) document.maintain.elements(x).focus() End Sub </script> ①<form method = post action = anncount.asp name = maint> <p> <入力タイプ=テキスト名= T1サイズ= 84> <入力タイプ=リセット値=書き換えname = b2> <入力タイプ=ボタン値= submit name = b1 onclick = datacheck()> </p> <hr color =#ff99ffサイズ= 1> </form> </body> </html> |
action = Ancounted.asp Section intatement①は、フォームが提出された後に開始するプログラムが発表されていることを指摘しています。
2)Annument.asp
メンテナンステキスト.txtファイルは、FilesystemObjectオブジェクトとTextScreamオブジェクトを介して読み取りおよび書き込みであるため、このファイルの上位5行のコンテンツは、掲示板に表示される発表です。
| 以下は引用されたコンテンツです。 <% 薄暗いstr str = request.form(t1) dim s(5) const forreading = 1、forwriting = 2 dim fso、myfile fso = server.createObject(scripting.filesystemObject)を設定します myfile = fso.opentextfile(text.txt、forreadingを維持) '読み取りモードでオープンファイルを設定します i = 1から5 'の場合、掲示板には合計5つの発表が表示されます s(i)= myfile.readlineはファイルコンテンツを読み取りします 次 myfile.close myfile = fso.opentextfile(text.txt、forwriting、trueを維持)を設定します myfile.writeLine str i = 1〜4の場合 myfile.writeline s(i) 'データをファイルに戻します 次 myfile.close %> |
3)text.txtを維持します
このファイルは空に起動し、更新.ASPに表示されたインターフェイスから発表を入力した後、このファイルの内容が自動的に記述されます。
4.次のコードをコードセグメントに追加します。このコードは、ホームページファイル(通常はdefault.asp)に更新アナウンスを表示して、更新されたアナウンスを表示します。
| 以下は引用されたコンテンツです。 <Marquee Scrolllamount = 2 Scrolldelay = 50方向= UP幅= 223 height = 133 id = a onmouseover = a.Stop()onmouseout = a.start()> '掲示板を上下にスクロールします <% dim s(20) dim fso、myfile fso = createObject(scripting.filesystemObject)をset myfile = fso.opentextfile(d:/asp/maint/maint text.txt、1、trueを設定します) i = 1から5の場合 readlinetextfile = myfile.readline s(i)= readlineTextFile respons.write★&s(i) Response.Write <br> 次 %> </marquee> |
上記の2つのヒントは、そのような多くの問題を1つの例から学習することで解決できます。 Webデザインの愛好家も試してみるかもしれません。
共有:セッションとクッキーの最も深い理解セッションでのセッションの議論について話しましょうが、セッションを理解できる90人以上の人々がいるはずです。しかし、あなたに言わせてください、あなたが年をとっているとは思わないでください〜セッションに同意する人もいれば、他の人は同意しません。しかし、この質問について正確に何を言うべきでしょうか?聞いてみませんか