我们专注攀枝花网站设计 攀枝花网站制作 攀枝花网站建设
成都网站建设公司服务热线:400-028-6601

网站建设知识

十年网站开发经验 + 多家企业客户 + 靠谱的建站团队

量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决

vb点虐 连接云服务器 vb搭建服务器

C#/VB.NET中 UDP协议连接服务器问题...运行没出错..但是收不到信息.

服务器先进行

成都创新互联公司长期为千余家客户提供的网站建设服务,团队从业经验10年,关注不同地域、不同群体,并针对不同对象提供差异化的产品和服务;打造开放共赢平台,与合作伙伴共同营造健康的互联网生态环境。为威信企业提供专业的做网站、成都网站建设,威信网站改版等技术服务。拥有10年丰富建站经验和众多成功案例,为您定制开发。

Bind ()绑定服务器的端口

然后BeginReceive接受客户端发送的数据

客户端Bind ()绑定客户端接受和发送数据的端口

SendTo()来发送数据就可以

不需要进行BeginConnect,因为UDP不需要连接

使用vb点虐 如何访问服务器上的数据库

用ADO接口就可以,TCP/IP协议,设定数据库服务器的IP地址,数据库名,用户名,密码就可以连接。

vb点虐 的数据库连接

1·绑定数据源来进行连接

2.用代码连接

先到数据库建立一个数据库和相应的表

连接数据库的代码:

Dim str As String = "Data Source=服务器名;Initial Catalog=数据库名;Persist Security Info=True;User ID=;Password="

dim conn As SqlClient.SqlConnection

try

conn = New SqlClient.SqlConnection

conn.ConnectionString = str

conn.Open()

Return True

Catch ex As Exception

MsgBox(ex.ToString)

Return False

End Try

登录代码:Dim str As String = "Data Source=服务器名;Initial Catalog=数据库名;Persist Security Info=True;User ID=;Password="

dim conn As SqlClient.SqlConnection

conn = New SqlClient.SqlConnection

conn.ConnectionString = str

conn.Open()

sqlstr = "Select * From Amd Where AmdName='" TextBox1.Text "' And AmdPwd = '" TextBox2.Text "'"

Dim sqlcmd As SqlClient.SqlCommand = New SqlClient.SqlCommand(sqlstr, conn)

Dim dr As SqlClient.SqlDataReader

dr = sqlcmd.ExecuteReader

If dr.Read = True Then '判断一条记录为真

kf.Show() '显示下个窗体

Me.Hide() ’隐藏当前窗体

Else

MessageBox.Show("输入信息有误!", "提示")

TextBox1.Text = ""

TextBox2.Text = ""

End If


标题名称:vb点虐 连接云服务器 vb搭建服务器
转载注明:http://shouzuofang.com/article/ddeoges.html

其他资讯