直播中
工作時(shí)間
9:00 18:00
作一個(gè)可以直接和瀏覽器進(jìn)行交互的組件
/**
***
豆腐制作 都是精品
http://www.asp888.net 豆腐技術(shù)站
如轉(zhuǎn)載 請(qǐng) 注明出處
*/
我們一般在作組件的時(shí)候，一般都是在 asp 中首先獲取 數(shù)據(jù)，然后傳送到組件，經(jīng)過(guò)組件處理，
再傳回瀏覽器，但是有的時(shí)候，這樣做似乎 有困難，或者不方便,所以今天豆腐就在這里給大家
講一下如何 作一個(gè)可以直接和瀏覽器進(jìn)行交互的組件
首先在 VB 制作組件的工程中 添加 asp.dll,然后看完豆腐的代碼 你就會(huì) 覺(jué)得 很簡(jiǎn)單了
Private objRequest as Request
Private objResponse as Response
Private objServer as Server
Private objSession as Session
Private objApplication as Application
Public Sub onstartpage(sc As ScriptingContext)
' 創(chuàng)建 asp 對(duì)象,這樣下面的 objRequest...就可以和在 vb 中一樣簡(jiǎn)單了
Set objRequest = sc.Request
Set objResponse = sc.Response
Set objServer = sc.Server
Set objSession = sc.Session
Set objApplication = sc.application
End Sub
Public Sub WriteCopyright()
objResponse.Write "豆腐制作，都是精品<br>"
objResponse.Write "<a href=http://www.asp888.net>豆腐技術(shù)站</a>"
End Sub
然后生成這個(gè)組件，給他起個(gè)工程名字 testCom,在 asp 中做如下調(diào)用
<html>
<%
Set testCom = createObject("testCom.testWrite")
testCom.WriteCopyright
%>
</html>
ok 我們就作好了 ，有興趣的話 大家可以類似的 多做幾個(gè) 例子
桂公網(wǎng)安備45010502000253號(hào)
電子營(yíng)業(yè)執(zhí)照
