189 8069 5689

vb点虐 连接云服务器 vb web服务器

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

服务器先进行

成都创新互联是一家专注于成都网站设计、网站制作和服务器托管的网络公司,有着丰富的建站经验和案例。

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 web服务器
转载注明:http://jkwzsj.com/article/ddgdheg.html

其他资讯