⑴ VB获取网络sql数据!
和VB正常提取数据库内数据一样,只是连接字符串里,将服务器名称写成"127.0.0.1",不用管服务器的用户名和密码。 反正我们是这么做的,下面是连接字符串的内容。 Driver={mySQL}; Server=127.0.0.1; Port=3306;Option=131072; Stmt=; Database=mydb;Uid=数据库的用户名; Pwd=数据库的用户名;
⑵ 如何在VB从sql 中读取数据 (初学者跪求)
vb.net
'命名空间
Imports System.Data
Imports System.Data.SqlClient
'定义变量
'连接数据库
Dim connstr As String = System.Configuration.ConfigurationSettings.AppSettings("connstr")
Dim sql_conn As New SqlConnection(connstr)
‘读取SQL数据到视图view1
public sub getdate()
Dim g_ap As New SqlDataAdapter("select * from tb1", sql_conn)
Dim g_d As New DataSet
g_ap.Fill(g_d)
view1.AutoGenerateColumns = False
view1.DataSource = g_d.Tables(0)
sub
⑶ vb怎样读取sql数据库表中 指定内容
这个比较难,因为数据表不支持你的行列取值,你可以先把表打开,存入一个二维数组当中,比如存到数组 carr(10,50)。然后你就可以用数组来读取任意纪录(x,y),,text1.text=carr(2,5) 即是2行5列的值
⑷ vb读取sql数据
首先要确定你的记录集中 oRs.Fields(0).Value 的值是什么类型?数值型,字符型,逻辑型...
然后定义相应的变量,再赋值。与是否存在 MsgBox 提示窗没有关系
如:
dim id_f As String
id_f=oRs.Fileds(0).Value
取得记录集中字段值的简单办法:
id_f=oRs(0)
就可以啦...
⑸ vb.net 读取sql数据库字段
我是用C#.net写出来的
SqlConnection myConn = new SqlConnection(sqlconnstring);
myConn.Open();
SqlDataAdapter thisAdapter = new SqlDataAdapter("SELECT * from 表名", myConn);
thisAdapter.MissingSchemaAction = MissingSchemaAction.AddWithKey;
DataTable thisDataTable = new DataTable();
thisAdapter.Fill(thisDataTable);
DataTableReader thisReader = new DataTableReader(thisDataTable);
DataTable schemaTable = thisReader.GetSchemaTable();
foreach (DataRow dr in schemaTable.Rows)
{
MessageBox.Show(dr["ColumnName"].ToString());获取字段名称(f1 f2 f3)
MessageBox.Show(dr["ColumnSize"].ToString());获取字段长度(2 2 2)
MessageBox.Show(dr["DataType"].ToString());获取字段类(str str int)
}
⑹ vb2008怎么截取sql里面的字符串比如数据库里有12345678,vb 取34
用substring(2,2)这样就可以
比如
dim str1 as string
str1="12345678"
dim strNew as strnig
strNew=str1.substring(2,2)
这样strnew的值就是 34了
⑺ 怎么在vb中用sql语句找出字符字段(全是整数)中的最大值,并且把最大值赋给一个字符变量,求大神指导。
max()函数
rs.Open "select max(字段名) from 表名", conn, adOpenKeyset, adLockOptimistic
A = rs.Fields(0)
⑻ vb MYSQL如何取得字符串字段
if Text9.Text<>"" then Adodc1.Recordset.Fields("备注") = Text9.Text
Adodc1.Recordset.Fields("赔偿金额") = val(Text10.Text)
⑼ 如何利用vb获得sql数据库中表的字段值
你应该用个记录集
dim
rst
as
new
adodb.recordset
rst.open
mysql,myconn,adopenkeyset,adlockonly,adcmdtext
if
not
rst.eof
then
text1.text=rst.fields("颜色")
end
if
rst.close
set
rst=nothing