用vbscript连mysql的数据库，并执行sql语句，怎么写

Set Conn = CreateObject("ADODB.Connection" )

str="DRIVER={MySQL ODBC 3.51 Driver}SERVER=192.168.1.100DATABASE=wp_bloguser id=zzz password=123456"

Conn.open str

Set Rs = CreateObject ("ADODB.Recordset" )

sql = "select * from `wp_blog`.`blg_webcategory` limit 0, 5000"

Rs.open sql,conn,1,3

If (not Rs.eof) then

Rs.MoveFirst

MsgBox Rs(0)

MsgBox Rs(1)

MsgBox Rs(2)

MsgBox Rs(3)

end if

Rs.close

Set Rs = Nothing

Conn.close

Set Conn = Nothing

如何使用VBScript访问ORACLE数据库并查询一张表

不知道你用的什么数据库，权且当作SQL Server

private void showdata()

{

try

{

string selectsql = @"select * from [user]"//select语句，修改下，应该不难吧

SqlCommand cmd = new SqlCommand(selectsql, conn)//conn就是创建的SqlConnection实例，你如果用到数据库，应该有创建

cmd.CommandType = CommandType.Text

string info = String.Empty//表结果

SqlDataReader odr = cmd.ExecuteReader()

while(odr.Read())

{

info = odr[0].ToString() + " " + odr[1].ToString() + "\n"

//具体每行有几列数据，就添加到n-1，0是第一列，你应该也能修改，可以在个数据之间加个空格，以及行末加个回车，自己改。。。

}

infoTxt.Text = info//将info显示到你说的文本框中，infoTxt为文本框的名称，你应该也可以看懂

}

catch (Exception ex)

{

Console.WriteLine(ex.Message)

}

}

//将函数体部分放入到你的按钮click事件中就可以了

---