主頁(yè) > 知識(shí)庫(kù) > ASP+COM不得不注意的問(wèn)題

ASP+COM不得不注意的問(wèn)題

熱門(mén)標(biāo)簽:外呼回?fù)芟到y(tǒng)圖片 常用地圖標(biāo)注范圍點(diǎn) 咸陽(yáng)銷(xiāo)售外呼系統(tǒng) 蘭州智能語(yǔ)音電銷(xiāo)機(jī)器人功能 企數(shù)外呼系統(tǒng)能用多久 辦理400電話一年多少錢(qián) 寧夏怎么申請(qǐng)400電話 離線電子地圖標(biāo)注軟件注冊(cè) 為什么外呼系統(tǒng)需要預(yù)存話費(fèi)呢
大家都知道ASP是一種無(wú)類型的腳本語(yǔ)言,而VB,VC,DELPHI等語(yǔ)言開(kāi)發(fā)出來(lái)的DLL組件都是強(qiáng)類型的,這樣就存在一個(gè)問(wèn)題.這樣就會(huì)存在問(wèn)題. 我還是用我遇到的問(wèn)題來(lái)說(shuō)話吧,我用VB寫(xiě)一個(gè)類Test,存在一個(gè)方法FunA,方法FunA的返回值為一個(gè)數(shù)組,示例代碼:
Class Test:

Public Function GetStr()
    GetStr = Split("a,b,c,d", ",")
End Function

ASP代碼:

Dim o
Set o=Server.CreateObject("Bqrm.Test")
Dim arr
arr=o.GetStr()
Response.Write(TypeName(arr))   '輸出String()
Response.Write(IsArray(arr))         '輸出True  
Response.Write(arr(0))                '輸出類型不匹配,IsArray返回它是一個(gè)數(shù)組,可是你不能把它當(dāng)成一個(gè)數(shù)組來(lái)操作,郁悶啊


但是改一個(gè)GetStr方法的代碼,就能讓它能用,如:
Public Function GetStr()
    GetStr = Array("a","b","c","d")
End Function
改成這樣它就不會(huì)出錯(cuò)了,不過(guò),有的時(shí)候你又不可能把所有的元素都列出來(lái)呀,只好寫(xiě)一個(gè)函數(shù),把它轉(zhuǎn)換成無(wú)類型的數(shù)組,

Function GetVbsArray(ByVal arr)
    If IsArray(arr) Then
        Dim arrTmp()
        ReDim arrTmp(UBound(arr))
        Dim iBound
        iBound = 0
        Dim tmp
        For Each tmp In arr
            arrTmp(iBound) = tmp
            iBound = iBound + 1
        Next
        GetVbsArray = arrTmp
        Erase arrTmp
    Else
        GetVbsArray = arr
    End If
End Function
把它放到一個(gè)模塊里面,然后在返回?cái)?shù)組的方法返回前,轉(zhuǎn)換一下如:

Public Function GetStr()
    GetStr = GetVbsArray(Split("a,b,c,d", ","))
End Function
這樣,也就沒(méi)有問(wèn)題了.



BTW: 這一個(gè)問(wèn)題讓我郁悶了一天半啊,是我工作一年來(lái)遇到的第二個(gè)讓我無(wú)從著手的問(wèn)題,雖然解決后不覺(jué)得什么,可是在沒(méi)有解決以前真的以為這是一個(gè)多么難的問(wèn)題,其實(shí)是被自己的無(wú)知蒙住了雙眼.我只會(huì)一點(diǎn)VBS,不了解VC,DELPHI,我也就不說(shuō)那些了,省著招B4.......^_^

標(biāo)簽:溫州 昆明 麗江 鐵嶺 家電維修 咸陽(yáng) 泰州 昌都

巨人網(wǎng)絡(luò)通訊聲明:本文標(biāo)題《ASP+COM不得不注意的問(wèn)題》,本文關(guān)鍵詞  ASP+COM,不得,不注意,的,問(wèn)題,;如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問(wèn)題,煩請(qǐng)?zhí)峁┫嚓P(guān)信息告之我們,我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò),涉及言論、版權(quán)與本站無(wú)關(guān)。
  • 相關(guān)文章
  • 下面列出與本文章《ASP+COM不得不注意的問(wèn)題》相關(guān)的同類信息!
  • 本頁(yè)收集關(guān)于ASP+COM不得不注意的問(wèn)題的相關(guān)信息資訊供網(wǎng)民參考!
  • 企业400电话

    智能AI客服机器人
    15000

    在线订购

    合计11份范本:公司章程+合伙协议+出资协议+合作协议+股权转让协议+增资扩股协议+股权激励+股东会决议+董事会决议

    推薦文章