da.Fill(ds, "tempTable")'读数据到ds中的一逐步形成临时表tempTable
这个写错了,应该是
da.Fill(ds, "tempTable")'读数据到ds中的临时表tempTable

我觉得没必要象你那样写
如果数据只有一行的话
你可以将
For Each dr As DataRow In ds.Tables("tempTable").Rows
a = dr(0)'第1列的数据
b = dr(1)'第2列的数据
c = dr(2)'第3列的数据
'......你可在在这插入代码处理每一行的数据
Next
改为
id=ds.Tables("tempTable").Rows(0)(0)
user=ds.Tables("tempTable").Rows(0)(1)
如果你只要最后一行的话
你可以改为
j=ds.Tables("tempTable").Rows.Count - 1
id=ds.Tables("tempTable").Rows(j)(0)
user=ds.Tables("tempTable").Rows(j)(1)

临时表是什么＇还有就是SqlDataAdapter会自动寻找数据库吗？好象没有给他数据库的地址？

呵呵~~
这里又写错了
Dim sqlCnn As New SqlClient.SqlConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & "dbName")'连接到SQL数据库
其实dbName就是一个数据库名

da．selectcommand=sqlCmd
没有这段话么～～～～～～～～～～～～～

[此贴子已经被作者于2007-7-17 13:36:59编辑过]

呵呵~~~
你知道了就加上去好了
我不是高手
也没试过
你可以自己试一下
试好了就帖出来大家学习学习