Webページで電話番号の写真を生成するASPコード

著者：Eve Cole 更新時間：2025-06-03 08:00:04

推奨：Webページジャンプコードの紹介
Webページのリダイレクトの目的は非常に簡単です。ユーザーまたはシステムが必要なときに、あるページから別のページに切り替えることです。リダイレクトの場合のHTTPのステータスコードは、一般に200、301、302のいずれかです。次のステータスコードの状況をリストし、各ステータスコードの違いを説明します。

優れたASPチュートリアルコード、電話番号の画像形式を生成し、使用時に次のコードをimg.aspとして保存し、電話番号を表示する場所に<img src = img.asp？tel = 010-000000>挿入します。

<％

callcom_creatvalidcode（request.querystring（tel））

publicsubcom_creatvalidcode（ptel）

Response.Expires = 0

Response.AddheaderPragma、No-Cache

Response.Addheadercache-ctrol、no-cache

Response.ContentType = Image/BMP

ランダム化

Dimi、II、III、rndcolor、strlen、sql、rs

ConstcOdds=5 '--------------------------------------------------------------------------------------------------------------------

conststr = 0123456789-

strlen = len（ptel）

rndcolor = chrb（cint（rnd*255））＆chrb（cint（rnd*255））＆chrb（cint（rnd*255）））

dimvcolordata（1）

'vcolordata（0）= chrb（0）＆chrb（0）＆chrb（0）' -----青0、緑0、赤0（黒）

'vcolordata（1）= chrb（255）＆chrb（255）＆chrb（255）' ------青250、緑236、レッド211（ライトブルー）

'vcolordata（0）= chrb（197）＆chrb（106）＆chrb（49）' -----青0、緑0、赤0（黒）

'vcolordata（1）= chrb（238）＆chrb（210）＆chrb（193）' ------青250、緑236、レッド211（ライトブルー）

vColorData(0)=ChrB(0)&ChrB(0)&ChrB(0)'------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ --------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

vcolordata（1）= chrb（205）＆chrb（237）＆chrb（245） '--------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- ----------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

ランダム化

dimvcode（）

redimvcode（strlen-1）

fori = 0tostrlen-1

vcode（i）= strust（1、str、mid（ptel、i+1,1）、1）-1

次

dimvnumberdata（11）

'Verdanafont

vNumberData(0)=11111111111000111101110111011101110111011101110111011101110111011110001111111111

vNumberData(1)=11111111111101111110011111110111111101111111011111110111111101111110001111111111

vNumberData(2)=11111111111000111101110111011101111110111111011111101111110111111100000111111111

vNumberData(3)=11111111111000111101110111111101111100111111110111111101110111011110001111111111

vNumberData(4)=11111111111110111111001111101011111010111101101111100001111110111111100111111111

vNumberData(5)=11111111110000011101111111011111110000111111110111111101110111011110001111111111

vNumberData(6)=11111111111000111101101111011111110000111101110111011101110111011110001111111111

vNumberData(7)=11111111110000011101101111111011111101111111011111110111111101111111011111111111

vNumberData(8)=11111111111000111101110111011101111000111101110111011101110111011110001111111111

vNumberData(9)=11111111111000111101110111011101110111011110000111111101111011011110000111111111

vNumberData(10)=11111111111111111111111111111111111111111100000111111111111111111111111111111111

vNumberData(11)=11111111111111111111111111111111111111111111111111111111111111111111111111111111

Response.binarywritechrb（66）＆chrb（77）＆chrb（（（strlen*8*10*3+54）mod256）＆chrb（（strlen *8*10*3+54）/256）Mod256）＆Chrb（（（（（（strlen*8*10*3+54）/256）/256）＆chrb（0）＆chrb（0）＆_

chrb（0）＆chrb（0）＆chrb（54）＆chrb（0）＆chrb（0）＆chrb（0）＆chrb（40）＆chrb（0）＆_

chrb（0）＆chrb（0）＆chrb（strlen*8）＆chrb（0）＆chrb（0）＆chrb（0）＆chrb（0）＆chrb（10）＆chrb（0）＆_

chrb（0）＆chrb（0）＆chrb（1）＆chrb（0）

Respons.binarywritechrb（24）＆chrb（0）＆chrb（0）＆chrb（0）＆chrb（0）＆chrb（0）＆chrb（0）＆_

chrb（（strlen*8*10*3）mod256）＆chrb（（（strlen*8*10*3）/256）mod256）＆chrb（（（（strlen*8*10*3）/256）/256）mod256）＆chrb）＆chrb）

Chrb（196）＆Chrb（14）＆Chrb（0）＆Chrb（0）＆Chrb（196）＆Chrb（14）＆Chrb（0）＆Chrb（0）＆Chrb（0）＆_

chrb（0）＆chrb（0）＆chrb（0）＆chrb（0）＆chrb（0）＆chrb（0）＆chrb（0）＆chrb（0）＆chrb（0）＆chrb（0）

Fori=9To0Step-1 '------------------------------------------------------------------------------------------------------------------

forii = 0tostrlen-1 '--------すべての単語の後

Foriii=1To8 '---------------------------------------------------------------------------------------------------------------------

'-------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- ---------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

ifrnd*99+1 <coddsthen '------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------ -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------

Response.binarywriterndcolor

それ以外

Response.binarywritevcolordata（mid（vnumberdata（vcode（ii））、i*8+iii、1））））

endif

次

Endingub

％>

共有：リンクのクリック数をカウントする方法
フレンドリーなリンクの各ドメイン名のクリック数をカウントしたい場合、フレンドリーリンクのWebページを操作できず、リンクページにコードを記述できないため、どうすればよいですか？この方法は、JavaScript functiona（bb）{}を作成することであり、クリック数をカウントしたいハイパーリンクは、ahref = http：//www.chinaz.comonclick=aa（2