日本国产亚洲-日本国产一区-日本国产一区二区三区-日本韩国欧美一区-日本韩国欧美在线-日本韩国欧美在线观看

當前位置:雨林木風下載站 > 技術開發教程 > 詳細頁面

運用VB編寫純ASP程序

運用VB編寫純ASP程序

更新時間:2022-05-02 文章作者:未知 信息來源:網絡 閱讀次數:

前幾天大哥對我說,使用asp真麻煩,編譯環境實在是差勁,他總是在vb里面寫好調試好代碼然后在把代碼粘貼到asp程序中,為此,我在這提出一個解決之道。使用VB接替ASP所有的對象,在VB中編寫純粹的ASP程序。

  大家應該都知道,其實asp中的好多組件都是使用VB編寫出來的,但是讓大家感到很不方便的是如何使用asp固有的幾個組件,例如Response,Request,Application,Session等等,如果我要是能夠在VB里面直接使用這些組件的話,那么就能夠直接使用VB編寫asp運用程序了。

  下面是詳細的步驟:

  1。在VB中新建一個ActiveX DLL.其中那些命名項目、類的過程我就省略了。

  2。現在需要在VB中引用兩個dll.

  第一個是引用ASP引擎的dll.

  從菜單中選擇Project\References命令,引用'Microsoft Active Server Pages Object Library'.

  如果你沒有找到它的話,你可以在以下目錄中查找這個asp.dll文件%systemdirectory%/system32/inetsvr目錄

  單擊按鈕'Browse...'可以導入這個動態連接庫

  第二個是引用Microsoft Transaction Server (MTS)對象.選擇同樣的命令,引用

  'Microsoft Transaction Server Type Library'.

  如果你沒有找到它的話,你可以在以下目錄中查找這個mtxas.dll文件

  %systemdirectory%/system32/Mts/ 3。好了,所有準備工作完成,下面是如何編寫的代碼,我想大家都能夠看明白的。

  這個是類文件的代碼:

  Option Explicit

  Dim m_objResponse As Response

  Dim m_objRequest As Request

  Dim m_objServer As Server

  Dim m_objApplication As Application

  Dim m_objSession As Session

  Private Sub Class_Initialize()

  Dim objContext As ObjectContext

  Set objContext = GetObjectContext()

  Set m_objResponse = objContext("Response")

  Set m_objRequest = objContext("Request")

  Set m_objServer = objContext("Server")

  Set m_objApplication = objContext("Application")

  Set m_objSession = objContext("Session")

  End Sub

  Public Sub ASPTest()

  m_objResponse.Write "告別寫字板,使用VB環境編寫ASP程序!"

  End Sub

  將以上的代碼拷貝粘貼到你的程序中,然后編譯這個項目成dll。最后使用

  regsvr32 componentname.dll把這個dll注冊到iis中。

  下面是在asp文件中使用這個組件的方法:

  <%

  Set objTest = Server.CreateObject("YourPrjName.ASPTest")

  objTest.ASPTest

  Set objTest = Nothing

  %>

好了,希望我的方法能夠解決大哥的苦惱,呵呵。

溫馨提示:喜歡本站的話,請收藏一下本站!

本類教程下載

系統下載排行

主站蜘蛛池模板: 免费久久久久 | 日日私人影院 | 成免费视频 | 日本在线一卡二卡毛片 | 最近更新免费2018在线观看 | 福利岛国深夜在线 | 欧美啪啪精品 | 欧美日韩国产超高清免费看片 | 日本精品视频一区二区三区 | 欧美乱妇高清无乱码视频在线 | 韩国女主播一区二区 | 日本s色大片在线观看 | 日韩精品视频一区二区三区 | 草草影院地址ccyycom浮力影院37 草草影院浮力 | 日本高清中文 | 在线观看免费午夜大片 | 国产成人精品久久综合 | 涩999| 日韩免费高清 | 浮力国产第1浮力院线路 | 日本 在线 | 日韩在线观看视频免费 | 久久草精品视频 | 中文字幕在线最新在线不卡 | 国产一区二区在线观看免费 | 国产精品成人影院 | 日韩精品一区二区三区中文精品 | 浮力影院最新地址 | 一区二区在线播放视频 | 亚洲欧美日韩中文高清一 | 久久资源总站 | 国内精品久久影院 | 亚洲精品一区二区三区国产 | wwwxxx亚洲| 日本免费人成黄页网观看视频 | 午夜久久精品 | 欧美 国产 日韩 第一页 | 91精品福利一区二区 | 欧美日韩亚洲第一页 | 激情在线播放免费视频高清 | 亚洲久爱 |