亚洲欧美第一页_禁久久精品乱码_粉嫩av一区二区三区免费野_久草精品视频

? 歡迎來到蟲蟲下載站！ | ?? 資源下載 ?? 資源專輯 ?? 關于我們
? 蟲蟲下載站

?? rmstapiroutines.bas

?? AVAYA IPO 430系列交換機 TAPI 2.0軟件電話源代碼
?? BAS
?? 第 1 頁 / 共 5 頁
字號: 
    frmMain.lbStatusBrief.AddItem "FUNCTION : lineHold"
    frmMain.lbStatusBrief.ListIndex = frmMain.lbStatusBrief.ListCount - 1
    DoEvents
        
    ' Run lineHold..
    l_lineHold_Result = RMSTAPIDeclarations.lineHold(l_Call)
    
    ' Check if lineHold ran ok..
    If l_lineHold_Result = RESULT_SUCCESS Or l_lineHold_Result > 0 Then
        ' Screen....
        frmStatus.lbStatus.AddItem "lineHold ran. SUCCESS"
        frmStatus.lbStatus.AddItem "l_Call                      = " & l_Call & "."
        If l_lineHold_Result = RESULT_SUCCESS Then
            frmStatus.lbStatus.AddItem "lineHold Request Identifier = NONE (0)."
        Else
            frmStatus.lbStatus.AddItem "lineHold Request Identifier = " & l_lineHold_Result & "."
        End If
        glHeldCall = RMSTAPIRoutines.glhCall
        frmMain.lblHeldCall.Caption = "Held Call Handle: " & glHeldCall
    Else
        ' Screen....
        frmStatus.lbStatus.AddItem "lineHold ran. ERRORS"
        frmStatus.lbStatus.AddItem "** >> Error returned : " & l_lineHold_Result & " (" & Hex(l_lineHold_Result) & " hex)."
        frmStatus.lbStatus.AddItem "** >> Error text : " & RMSTAPIErrorHandler.Tapi_Error_Text(l_lineHold_Result) & "."
    End If
    
    ' Screen....
    frmStatus.lbStatus.ListIndex = frmStatus.lbStatus.ListCount - 1

End Sub

Public Sub Run_lineGetAddressStatus()

    'Declare Function lineGetAddressStatus Lib "TAPI32.DLL" _
    '    (ByVal l_hLine As Long, ByVal l_dwAddressID As Long, ByRef struct_lpAddressStatus As lineAddressStatus) As Long
    
    'Declare Function lineGetAddressStatus Lib "TAPI32.DLL" _
    '    (ByVal l_hLine As Long, ByVal l_dwAddressID As Long, ptr_lpAddressStatus As Any) As Long

    Dim sDevSpecificInfo As String

    Dim l_Line As Long                                 ' lineGetAddressStatus .. Parameter 1 .. Value
    Dim l_AddrID As Long                               ' lineGetAddressStatus .. Parameter 2 .. Value
    Dim struct_MyAddrStatus As lineAddressStatus       ' lineGetAddressStatus .. Parameter 3 .. Reference
    
    Dim l_lineGetAddressStatus_Result As Long      ' lineGetAddressStatus .. Function Passed?
    
    gsLastTAPIFunctionRan = "lineGetAddressStatus"
    
    ' Init Parameters..
    l_Line = RMSTAPIRoutines.glhLine
    
    ' Screen....
    frmStatus.lbStatus.AddItem " "
    frmStatus.lbStatus.AddItem "================================================================================================"
    frmStatus.lbStatus.AddItem "*** FUNCTION : lineGetAddressStatus ***"
    frmStatus.lbStatus.AddItem "------------------------------------------------------------------------------------------------"
        
    frmMain.lbStatusBrief.AddItem "FUNCTION : lineGetAddressStatus"
    frmMain.lbStatusBrief.ListIndex = frmMain.lbStatusBrief.ListCount - 1
    DoEvents
        
    ' Set Memory needed...
    struct_MyAddrStatus.l_dwTotalSize = LINEADDRESSSTATUS_FIXEDSIZE + LINEADDRESSSTATUS_MEMSIZE
        
    ' Run lineGetAddressStatus..
    l_lineGetAddressStatus_Result = RMSTAPIDeclarations.lineGetAddressStatus( _
        l_Line, l_AddrID, struct_MyAddrStatus)
    
    ' Check if lineGetAddressStatus ran ok..
    If l_lineGetAddressStatus_Result = RESULT_SUCCESS Then
        ' Screen....
        sDevSpecificInfo = ""
        If struct_MyAddrStatus.l_dwDevSpecificSize > 0 Then
            sDevSpecificInfo = _
                RMSTAPIEvents.GetVarInfo _
                    (RMSTAPIEvents.Clean(struct_MyAddrStatus.mem), _
                    (struct_MyAddrStatus.l_dwDevSpecificOffset - LINEADDRESSSTATUS_FIXEDSIZE) + 1, _
                    struct_MyAddrStatus.l_dwDevSpecificSize - 1)
        End If
        
        frmStatus.lbStatus.AddItem "lineGetAddressStatus ran. SUCCESS"
        frmStatus.lbStatus.AddItem "l_Line                                        = " & l_Line & "."
        frmStatus.lbStatus.AddItem "l_AddrID                                      = " & l_AddrID & "."
        frmStatus.lbStatus.AddItem "sDevSpecificInfo                              = " & RMSGeneralRoutines.ReplaceNonPrintable(sDevSpecificInfo) & "."
        frmStatus.lbStatus.AddItem "sDevSpecificInfo                              = " & RMSGeneralRoutines.ShowASCIIValues(sDevSpecificInfo) & ". (ASCII Values)"
        frmStatus.lbStatus.AddItem "sDevSpecificInfo                              = " & RMSTAPIEvents.Strip_Down_DevSpecifc_Buffer(sDevSpecificInfo) & ". (Decoded)"
        
        frmStatus.lbStatus.AddItem "struct_MyAddrStatus.l_dwAddressFeatures       = " & _
            struct_MyAddrStatus.l_dwAddressFeatures & "."
        frmStatus.lbStatus.AddItem "struct_MyAddrStatus.l_dwAddressFeatures       = " & _
            RMSTAPIEvents.lineAddrFeat(struct_MyAddrStatus.l_dwAddressFeatures) & ". (Decoded)"
        frmStatus.lbStatus.AddItem "struct_MyAddrStatus.l_dwDevSpecificOffset     = " & _
            struct_MyAddrStatus.l_dwDevSpecificOffset & "."
        frmStatus.lbStatus.AddItem "struct_MyAddrStatus.l_dwDevSpecificSize       = " & _
            struct_MyAddrStatus.l_dwDevSpecificSize & "."
        frmStatus.lbStatus.AddItem "struct_MyAddrStatus.l_dwForwardNumEntries     = " & _
            struct_MyAddrStatus.l_dwForwardNumEntries & "."
            
        frmStatus.lbStatus.AddItem "struct_MyAddrStatus.l_dwForwardOffset         = " & _
            struct_MyAddrStatus.l_dwForwardOffset & "."
        frmStatus.lbStatus.AddItem "struct_MyAddrStatus.l_dwForwardSize           = " & _
            struct_MyAddrStatus.l_dwForwardSize & "."
        frmStatus.lbStatus.AddItem "struct_MyAddrStatus.l_dwNeededSize            = " & _
            struct_MyAddrStatus.l_dwNeededSize & "."
        frmStatus.lbStatus.AddItem "struct_MyAddrStatus.l_dwNumActiveCalls        = " & _
            struct_MyAddrStatus.l_dwNumActiveCalls & "."
            
        frmStatus.lbStatus.AddItem "struct_MyAddrStatus.l_dwNumInUse              = " & _
            struct_MyAddrStatus.l_dwNumInUse & "."
        frmStatus.lbStatus.AddItem "struct_MyAddrStatus.l_dwNumOnHoldCalls        = " & _
            struct_MyAddrStatus.l_dwNumOnHoldCalls & "."
        frmStatus.lbStatus.AddItem "struct_MyAddrStatus.l_dwNumOnHoldPendCalls    = " & _
            struct_MyAddrStatus.l_dwNumOnHoldPendCalls & "."
        frmStatus.lbStatus.AddItem "struct_MyAddrStatus.l_dwNumRingsNoAnswer      = " & _
            struct_MyAddrStatus.l_dwNumRingsNoAnswer & "."
            
        frmStatus.lbStatus.AddItem "struct_MyAddrStatus.l_dwTerminalModesOffset   = " & _
            struct_MyAddrStatus.l_dwTerminalModesOffset & "."
        frmStatus.lbStatus.AddItem "struct_MyAddrStatus.l_dwTerminalModesSize     = " & _
            struct_MyAddrStatus.l_dwTerminalModesSize & "."
        frmStatus.lbStatus.AddItem "struct_MyAddrStatus.l_dwTotalSize             = " & _
            struct_MyAddrStatus.l_dwTotalSize & "."
        frmStatus.lbStatus.AddItem "struct_MyAddrStatus.l_dwUsedSize              = " & _
            struct_MyAddrStatus.l_dwUsedSize & "."
        frmStatus.lbStatus.AddItem "struct_MyAddrStatus.mem                       = " & _
            struct_MyAddrStatus.mem & "."
    Else
        ' Screen....
        frmStatus.lbStatus.AddItem "lineGetAddressStatus ran. ERRORS"
        frmStatus.lbStatus.AddItem "** >> Error returned : " & l_lineGetAddressStatus_Result & " (" & Hex(l_lineGetAddressStatus_Result) & " hex)."
        frmStatus.lbStatus.AddItem "** >> Error text : " & RMSTAPIErrorHandler.Tapi_Error_Text(l_lineGetAddressStatus_Result) & "."
    End If
    
    ' Screen....
    frmStatus.lbStatus.ListIndex = frmStatus.lbStatus.ListCount - 1


End Sub

Public Sub Run_lineGetLineDevStatus()

    'Declare Function lineGetLineDevStatus Lib "TAPI32.DLL" _
    '    (ByVal l_hLine As Long, ByRef struct_lpLineDevStatus As lineDevStatus) As Long
    
    'Declare Function lineGetLineDevStatus Lib "TAPI32.DLL" _
    '    (ByVal l_hLine As Long, ptr_lpLineDevStatus As Any) As Long

    Dim sDevSpecificInfo As String
    
    Dim l_Line As Long                              ' lineGetLineDevStatus .. Parameter 1 .. Value
    Dim struct_MyDevStatus As lineDevStatus         ' lineGetLineDevStatus .. Parameter 2 .. Reference
    
    Dim l_lineGetLineDevStatus_Result As Long       ' lineGetLineDevStatus .. Function Passed?
    
    gsLastTAPIFunctionRan = "lineGetLineDevStatus"
    
    ' Init Parameters..
        
    l_Line = RMSTAPIRoutines.glhLine
    
    ' Screen....
    frmStatus.lbStatus.AddItem " "
    frmStatus.lbStatus.AddItem "================================================================================================"
    frmStatus.lbStatus.AddItem "*** FUNCTION : lineGetLineDevStatus ***"
    frmStatus.lbStatus.AddItem "------------------------------------------------------------------------------------------------"
        
    frmMain.lbStatusBrief.AddItem "FUNCTION : lineGetLineDevStatus"
    frmMain.lbStatusBrief.ListIndex = frmMain.lbStatusBrief.ListCount - 1
    DoEvents
        
    ' Set Memory needed...
    struct_MyDevStatus.l_dwTotalSize = LINEDEVSTATUS_FIXEDSIZE + LINEDEVSTATUS_MEMSIZE
        
    ' Run lineGetLineDevStatus..
    l_lineGetLineDevStatus_Result = RMSTAPIDeclarations.lineGetLineDevStatus(l_Line, struct_MyDevStatus)
    
    ' Check if lineGetLineDevStatus ran ok..
    If l_lineGetLineDevStatus_Result = RESULT_SUCCESS Then
        ' Screen....
        
        sDevSpecificInfo = ""
        If struct_MyDevStatus.l_dwDevSpecificSize > 0 Then
            sDevSpecificInfo = _
                RMSTAPIEvents.GetVarInfo _
                    (RMSTAPIEvents.Clean(struct_MyDevStatus.mem), _
                    (struct_MyDevStatus.l_dwDevSpecificOffset - LINEDEVSTATUS_FIXEDSIZE) + 1, _
                    struct_MyDevStatus.l_dwDevSpecificSize - 1)
        End If
        
        frmStatus.lbStatus.AddItem "lineGetLineDevStatus ran. SUCCESS"
        frmStatus.lbStatus.AddItem "l_Line                                       = " & l_Line & "."
        frmStatus.lbStatus.AddItem "sDevSpecificInfo                             = " & RMSGeneralRoutines.ReplaceNonPrintable(sDevSpecificInfo) & "."
        frmStatus.lbStatus.AddItem "sDevSpecificInfo                             = " & RMSGeneralRoutines.ShowASCIIValues(sDevSpecificInfo) & ". (ASCII Values)"
        frmStatus.lbStatus.AddItem "sDevSpecificInfo                             = " & RMSTAPIEvents.Strip_Down_DevSpecifc_Buffer(sDevSpecificInfo) & ". (Decoded)"
    
        frmStatus.lbStatus.AddItem "struct_MyDevStatus.l_dwAppInfoOffset         = " _
            & struct_MyDevStatus.l_dwAppInfoOffset & "."
        frmStatus.lbStatus.AddItem "struct_MyDevStatus.l_dwAppInfoSize           = " _
            & struct_MyDevStatus.l_dwAppInfoSize & "."
        frmStatus.lbStatus.AddItem "struct_MyDevStatus.l_dwAvailableMediaModes   = " _
            & struct_MyDevStatus.l_dwAvailableMediaModes & "."
        frmStatus.lbStatus.AddItem "struct_MyDevStatus.l_dwAvailableMediaModes   = " _
            & RMSTAPIEvents.LineMediaModeMsg(struct_MyDevStatus.l_dwAvailableMediaModes) & ". (Decoded)"
        frmStatus.lbStatus.AddItem "struct_MyDevStatus.l_dwBatteryLevel          = " _
            & struct_MyDevStatus.l_dwBatteryLevel & "."
        frmStatus.lbStatus.AddItem "struct_MyDevStatus.l_dwDevSpecificOffset     = " _
            & struct_MyDevStatus.l_dwDevSpecificOffset & "."
        frmStatus.lbStatus.AddItem "struct_MyDevStatus.l_dwDevSpecificSize       = " _
            & struct_MyDevStatus.l_dwDevSpecificSize & "."
        frmStatus.lbStatus.AddItem "struct_MyDevStatus.l_dwDevStatusFlags        = " _
            & struct_MyDevStatus.l_dwDevStatusFlags & "."
        frmStatus.lbStatus.AddItem "struct_MyDevStatus.l_dwDevStatusFlags        = " _
            & RMSTAPIEvents.lineDevStatusFlags(struct_MyDevStatus.l_dwDevStatusFlags) & ". (Decoded)"
        frmStatus.lbStatus.AddItem "struct_MyDevStatus.l_dwLineFeatures          = " _
            & struct_MyDevStatus.l_dwLineFeatures & "."
        frmStatus.lbStatus.AddItem "struct_MyDevStatus.l_dwLineFeatures          = " _
            & RMSTAPIEvents.lineFeatures(struct_MyDevStatus.l_dwLineFeatures) & ". (Decoded)"
        frmStatus.lbStatus.AddItem "struct_MyDevStatus.l_dwNeededSize            = " _
            & struct_MyDevStatus.l_dwNeededSize & "."
        frmStatus.lbStatus.AddItem "struct_MyDevStatus.l_dwNumActiveCalls        = " _
            & struct_MyDevStatus.l_dwNumActiveCalls & "."
        frmStatus.lbStatus.AddItem "struct_MyDevStatus.l_dwNumCallCompletions    = " _
            & struct_MyDevStatus.l_dwNumCallCompletions & "."
            
        frmStatus.lbStatus.AddItem "struct_MyDevStatus.l_dwNumOnHoldCalls        = " _
            & struct_MyDevStatus.l_dwNumOnHoldCalls & "."
        frmStatus.lbStatus.AddItem "struct_MyDevStatus.l_dwNumOnHoldPendCalls    = " _
            & struct_MyDevStatus.l_dwNumOnHoldPendCalls & "."
        frmStatus.lbStatus.AddItem "struct_MyDevStatus.l_dwNumOpens              = " _
            & struct_MyDevStatus.l_dwNumOpens & "."
        frmStatus.lbStatus.AddItem "struct_MyDevStatus.l_dwOpenMediaModes        = " _
            & struct_MyDevStatus.l_dwOpenMediaModes & "."
        frmStatus.lbStatus.AddItem "struct_MyDevStatus.l_dwOpenMediaModes        = " _
            & RMSTAPIEvents.LineMediaModeMsg(struct_MyDevStatus.l_dwOpenMediaModes) & ". (Decoded)"
        frmStatus.lbStatus.AddItem "struct_MyDevStatus.l_dwRingMode              = " _
            & struct_MyDevStatus.l_dwRingMode & "."
        frmStatus.lbStatus.AddItem "struct_MyDevStatus.l_dwRoamMode              = " _
            & struct_MyDevStatus.l_dwRoamMode & "."
        frmStatus.lbStatus.AddItem "struct_MyDevStatus.l_dwSignalLevel           = " _
            & struct_MyDevStatus.l_dwSignalLevel & "."
        frmStatus.lbStatus.AddItem "struct_MyDevStatus.l_d

?? 快捷鍵說明

復制代碼 Ctrl + C
搜索代碼 Ctrl + F
全屏模式 F11
切換主題 Ctrl + Shift + D
顯示快捷鍵 ?
增大字號 Ctrl + =
減小字號 Ctrl + -
亚洲欧美第一页_禁久久精品乱码_粉嫩av一区二区三区免费野_久草精品视频
欧美韩日一区二区三区四区| 综合在线观看色| av在线不卡网| 午夜视频在线观看一区二区| 国产女人18毛片水真多成人如厕| 欧美亚男人的天堂| 处破女av一区二区| 免费观看在线综合| 麻豆高清免费国产一区| 久久久蜜臀国产一区二区| 欧美日韩电影在线播放| 成人av在线网站| 激情综合色综合久久综合| 亚洲影院在线观看| 亚洲欧洲av另类| 日韩欧美亚洲一区二区| 欧美性一区二区| 9色porny自拍视频一区二区| 国产真实乱子伦精品视频| 亚洲成av人**亚洲成av**| 亚洲日本在线视频观看| 国产午夜精品一区二区| 欧美大片顶级少妇| 欧美日韩一区二区在线观看| av成人动漫在线观看| 国产精品资源网| 狠狠网亚洲精品| 毛片av一区二区三区| 亚洲成a人v欧美综合天堂下载| 综合分类小说区另类春色亚洲小说欧美 | 日本不卡123| 亚洲成人第一页| 亚洲国产精品欧美一二99| 国产精品国产馆在线真实露脸| 国产欧美综合在线观看第十页| 精品少妇一区二区三区| 日韩一区二区三区电影在线观看 | www.亚洲在线| 国产成人精品一区二区三区四区 | 美女www一区二区| 日韩精品午夜视频| 亚洲高清久久久| 亚洲一卡二卡三卡四卡 | 日韩精品乱码av一区二区| 一区二区高清免费观看影视大全| 综合中文字幕亚洲| 亚洲精品成人少妇| 亚洲裸体在线观看| 一区二区三区四区在线播放| 亚洲欧洲av色图| 亚洲一区二区偷拍精品| 午夜视频一区二区| 日本不卡的三区四区五区| 看国产成人h片视频| 国产精品中文字幕一区二区三区| 国产成a人亚洲精| jiyouzz国产精品久久| 色综合色狠狠天天综合色| 在线观看视频一区| 欧美一级黄色大片| 久久―日本道色综合久久| 久久久国产精华| 日韩理论片在线| 亚洲高清在线精品| 精品综合久久久久久8888| 国产综合久久久久久久久久久久| 国产激情一区二区三区| av欧美精品.com| 欧美视频一区在线| 精品三级av在线| 中文一区二区完整视频在线观看| 亚洲免费观看高清完整版在线观看| 一区二区日韩电影| 老司机午夜精品99久久| 成人91在线观看| 欧美日产在线观看| 久久久国产精品麻豆| 亚洲激情第一区| 九一久久久久久| 色呦呦国产精品| 日韩女同互慰一区二区| 国产精品电影一区二区三区| 午夜精品一区在线观看| 国产一区二区在线免费观看| 一本大道av一区二区在线播放| 日韩一级视频免费观看在线| 国产欧美精品一区| 亚洲高清视频在线| 成人激情校园春色| 欧美一区二区三区四区视频| 欧美激情一区二区三区全黄| 亚洲成人免费看| 成人av动漫网站| 日韩欧美区一区二| 麻豆精品在线视频| av在线一区二区| 精品国产3级a| 婷婷中文字幕一区三区| 成人永久aaa| 欧美mv和日韩mv的网站| 亚洲老妇xxxxxx| 国产精品18久久久久久久久久久久 | 日韩亚洲电影在线| 亚洲乱码国产乱码精品精可以看 | 色狠狠一区二区| 国产无一区二区| 看电影不卡的网站| 欧美美女bb生活片| 综合色中文字幕| 国产成人亚洲综合a∨婷婷| 777a∨成人精品桃花网| 一区二区三区在线播| 成人福利视频网站| 久久这里都是精品| 蜜臀av性久久久久蜜臀aⅴ流畅| 91麻豆免费视频| 中文字幕制服丝袜一区二区三区| 精品午夜久久福利影院| 欧美高清视频不卡网| 亚洲精品免费播放| 波多野结衣中文字幕一区二区三区| 欧美精三区欧美精三区| 亚洲综合视频在线观看| 97se狠狠狠综合亚洲狠狠| 久久人人爽人人爽| 狠狠色丁香婷婷综合| 日韩欧美一二三四区| 首页欧美精品中文字幕| 欧美日韩免费视频| 亚洲线精品一区二区三区| 色综合天天天天做夜夜夜夜做| 国产精品无人区| 不卡一卡二卡三乱码免费网站| 久久久国产精品麻豆| 国产成人午夜精品影院观看视频| 久久久久国产免费免费| 韩国成人精品a∨在线观看| 日韩精品专区在线影院重磅| 热久久免费视频| 欧美电影精品一区二区| 极品美女销魂一区二区三区| 日韩精品一区二区三区视频在线观看 | 国产精品美女久久久久久久 | 日韩精品最新网址| 日韩中文字幕亚洲一区二区va在线 | 国产成人欧美日韩在线电影| 久久久久综合网| 国v精品久久久网| 国产精品女人毛片| 色婷婷激情一区二区三区| 一区二区三区日韩精品视频| 色综合中文字幕国产| 亚洲女同一区二区| 欧美中文一区二区三区| 午夜精品久久一牛影视| 欧美一级生活片| 韩国成人精品a∨在线观看| 国产欧美一区视频| 色综合中文字幕| 天堂影院一区二区| 欧美精品一区二区高清在线观看 | 亚洲一区二区三区四区五区黄 | 国产在线看一区| 国产精品久久久久久久久果冻传媒 | 成人美女在线观看| 一区二区三区色| 日韩欧美国产精品一区| 国产69精品久久久久毛片 | 亚洲国产精品精华液ab| 色欲综合视频天天天| 免费成人性网站| 亚洲国产成人在线| 欧美在线观看你懂的| 精品写真视频在线观看 | 亚洲国产日日夜夜| 日韩精品一区二区三区四区视频| 成人综合日日夜夜| 亚洲1区2区3区4区| 久久久美女毛片| 欧美性猛交xxxx黑人交| 成人99免费视频| 视频一区欧美精品| 欧美激情一区在线| 91精品综合久久久久久| 成人毛片视频在线观看| 日韩av在线发布| 国产精品久久久久永久免费观看 | 欧美一区二区三区小说| 成人精品视频网站| 免费成人在线影院| 亚洲日本在线a| 久久久久久99久久久精品网站| 欧美综合在线视频| 国产精品77777竹菊影视小说| 一区二区三区 在线观看视频| 久久久噜噜噜久久人人看| 在线播放日韩导航| 91免费版在线看| 国产成人精品三级麻豆| 免费成人在线观看|