设为首页收藏本站

AnyChat技术支持论坛

 找回密码
 立即注册

QQ登录

只需一步,快速开始

搜索
热搜: 活动 交友 discuz
查看: 4569|回复: 9
打印 上一主题 下一主题

下载的vb.net DEMO,如何连接视频云

[复制链接]

1

主题

4

帖子

15

积分

新手上路

Rank: 1

积分
15
跳转到指定楼层
楼主
发表于 2016-3-9 11:10:49 | 显示全部楼层 |只看大图 回帖奖励 |倒序浏览 |阅读模式
你好,请问下下载的vb.net DEMO,如何连接视频云
应用试用已经开了

分享到:  QQ好友和群QQ好友和群 QQ空间QQ空间 腾讯微博腾讯微博 腾讯朋友腾讯朋友
收藏收藏
回复

使用道具 举报

1

主题

4

帖子

15

积分

新手上路

Rank: 1

积分
15
沙发
 楼主| 发表于 2016-3-9 14:05:46 | 显示全部楼层
收到,谢谢楼上
回复 支持 反对

使用道具 举报

1

主题

4

帖子

15

积分

新手上路

Rank: 1

积分
15
板凳
 楼主| 发表于 2016-3-9 15:41:35 | 显示全部楼层
不好意思,还是不行。应用ID在哪儿输入啊,还有RSA签名认证、应用业务服务器自定义验证 这两种都怎么实现呢,demo中找不到啊。

Private Sub LoginWnd_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        InitSDK()
        LoginUser.Text = "AnyChat5"
        Room.Text = "1"

        Server.Text = "cloud.anychat.cn"
        Port.Text = "8906"
    End Sub

    Private Sub Login_Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Login_Button.Click
        Dim ret As Integer
        ret = -1
        ret = BRAC_SetServerAuthPass("BaiRuiTech")
        If (ret <> 0) Then
            MsgBox("设置服务器验证密码失败!")
            Exit Sub
        End If

        '此功能暂未实现
        'Dim VersionOK

        BRAC_Connect(Server.Text, CInt(Port.Text))
        
        ret = -1
        ret = BRAC_Login(LoginUser.Text, "", 0)
        If (ret <> 0) Then
            MsgBox("请求登录系统失败!")
            Exit Sub
        End If

        ret = -1
        ret = BRAC_EnterRoom(CInt(Room.Text), "", 0)

        Me.Hide()
        MainWnd.Show()
    End Sub

老大指点下啊,开发文档貌似都找不到云的内容啊
回复 支持 反对

使用道具 举报

1

主题

4

帖子

15

积分

新手上路

Rank: 1

积分
15
地板
 楼主| 发表于 2016-3-9 17:38:08 | 显示全部楼层
多谢老大辛苦回复,上面函数已经加上,但是还是连不上
在应用详情里面还有个应用公钥,这个参数应该怎么传递?我想是不是这个原因
回复 支持 反对

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|AnyChat ( 粤ICP备13022410号-1 )  

GMT+8, 2024-5-4 21:12 , Processed in 0.147636 second(s), 22 queries .

Powered by Discuz! X3

© 2001-2013 Comsenz Inc.

快速回复 返回顶部 返回列表