帮帮忙,给发一个vb连接并 *** 作远程sql数据库的代码

定义一个数据库连接

Dim

con

As

New

SqlConnection("workstation

id=计算机名packet

size=4096user

id=sadata

source=.persist

security

info=Falseinitial

catalog=数据库名")

对数据库插入

Dim

incom

As

New

SqlCommand("insert

into

表名values(@id,@name,@password,@depart,@class)",

con)

incom.Parameters.Add("@id",

Me.idtb.Text)

incom.Parameters.Add("@name",

Me.nametb.Text)

incom.Parameters.Add("@password",

Me.passwordtb.Text)

incom.Parameters.Add("@depart",

Me.departtb.Text)

incom.Parameters.Add("@class",

Me.classtb.Text)

con.Open()

incom.ExecuteNonQuery()

con.Close()

MsgBox("insert

good")

Me.DataGrid1.Refresh()

删除数据库项

Dim

deleteEMP

As

SqlClient.SqlCommand

=

New

SqlClient.SqlCommand("delete

from

表名

where

列名

=

'"

&

checkcb.Text

&

"'",

conn)

result

=

deleteEMP.ExecuteNonQuery()

conn.Close()

Me.DataGrid1.Refresh()

MsgBox("delete

good")

对数据库更新

Dim

upcom

As

New

SqlCommand("update

表明set

Stu_name=@name,Stu_password=@password,Stu_depart=@depart,Stu_class=@class

where

Stu_id=@id",

con)

upcom.Parameters.Add("@id",

Me.idtb.Text)

upcom.Parameters.Add("@name",

Me.nametb.Text)

upcom.Parameters.Add("@password",

Me.passwordtb.Text)

upcom.Parameters.Add("@depart",

Me.departtb.Text)

upcom.Parameters.Add("@class",

Me.classtb.Text)

con.Open()

upcom.ExecuteNonQuery()

con.Close()

MsgBox("update

good")

MySQl远程连接数据库有两种方法，具体如下：

改表法。  在localhost登入mysql后，更改 "MySql" 数据库中的 "User" 表里的 "Host"选项，将"localhost"对应的值改为"%"，具体代码如图所示：

2.授权法。 若MyUser想要使用mypassword（用户密码）从任何主机连接到mysql服务器则可以使用此方法，具体步骤如下图所示。

3.按照上述改法，保存后重启即可生效。

拓展资料：

数据库(Database)是按照数据结构来组织、存储和管理数据的仓库，它产生于距今六十多年前，随着信息技术和市场的发展，特别是二十世纪九十年代以后，数据管理不再仅仅是存储和管理数据，而转变成用户所需要的各种数据管理的方式。

2.数据库有很多种类型，从最简单的存储有各种数据的表格到能够进行海量数据存储的大型数据库系统都在各个方面得到了广泛的应用。

3.在信息化社会，充分有效地管理和利用各类信息资源，是进行科学研究和决策管理的前提条件数据库技术是管理信息系统、办公自动化系统、决策支持系统等各类信息系统的核心部分，是进行科学研究和决策管理的重要技术手段。

4.数据库是一个单位或是一个应用领域的通用数据处理系统，它存储的是属于企业和事业部门、团体和个人的有关数据的集合。数据库中的数据是从全局观点出发建立的，按一定的数据模型进行组织、描述和存储。

5.其结构基于数据间的自然联系，从而可提供一切必要的存取路径，且数据不再针对某一应用，而是面向全组织，具有整体的结构化特征。

参考资料：数据库_百度百科

在php中如果要连接远程数据库连接方法很简单，只要把本地连接localhost或127.0.0.1改成指定远程服务器一IP地址或者直接域名即可。

语法

mysql_connect(servername,username,password)

例子

在下面的例子中，我们在一个变量中 ($con) 存放了在脚本中供稍后使用的连接。如果连接失败，将执行 "die" 部分：

代码如下：

<?php

$con = mysql_connect("localhost","peter","abc123")

if (!$con)

{

die('Could not connect: ' . mysql_error())

}

// some code

?>

上面是连接本地数据库，下面把localhost改成远程IP即可了

实例 代码如下：

$conn=mysql_connect('http://boaer.com','root','123456888')

if(!$conn) echo "失败!"

else echo "成功!"

// 从表中提取信息的sql语句

$sql="SELECT * FROM user where userName='$user_name'"

// 执行sql查询

$result=mysql_db_query('info', $sql, $conn)

// 获取查询结果

$row=mysql_fetch_row($result)

mysql_close()

---