---電子發票整合應用方案--- < imoo msn機器人測試平台,將於下週三(2009.6.24)取消所有未經申請試用的認證資訊 , 詳見相關資訊 > msnSDK訊息控制開發套件 同時支援MSN/Yahoo即時通 訊息雙向傳遞 VB6.0 的範例我們使用ADO介面來處理,其他語言也可以這樣做,可參考文件(文末提供下載處),另外;下面的程式碼重要的部份只有參數不同,其他大同小異,可參考 紅字部分 ps.也請參考 msnSDK的使用流程 ================================ Dim RS As New ADODB.Recordset Dim URL As String Dim Session As String '授權碼 '取得API 的使用權利 Private Sub GETSPID_Click() Dim RET As String On Error GoTo ErrHandle 'API 連接位置 URL = "http://59.120.234.84:8082/msnSDK/msn_cgi-win32" 'apiblogt5/msnsdkt 取得API 使用權限的帳號/密碼 RS.Open URL & "?FUNC=GETSPID&USERID=apiblogt5&PASSWD=msnsdkt&RETTYPE=ADO" Do While Not (RS.EOF) '查詢回應 'RS(0) 0 認證失敗 1認證成功 'RS(1) 失敗傳回 失敗原因 / 成功傳回 SESSION ' If (RS(0) = 0) Then MsgBox "認證失敗,無法使用API" Else '取得認證授權使用API '授權碼 Session = RS(1) End If RS.MoveNext Loop RS.Close Exit Sub ErrHandle: MsgBox "無法連接伺服器,或是參數不正確" End Sub ...