ACCESS 查询

Tom　发表于：2010-04-08 13:46:51 　

ACCESS 查询

给一个参数赋值，所赋的值是通过查询另一个表中的一列数

请问如何做

Dim con As Object
Dim upmax As Object
Dim stsql As String

stsql = "select up_max from dbo_prdt"
stsql = stsql & "where prd_no=" & Forms!PSS_F!TF_PSS_VIEW_F.Form!PRD_NO
Set upmax = CreateObject("ADODB.Recordset")

upmax.Open stsql

Top

煮江品茶发表于：2010-04-08 13:58:31

这个参数如果是窗体控件的话,直接将记录集中的对应记录的对应字段赋值给它即可。

如：

me.text1.value=upmax("up_max").value

Top

Tom 发表于：2010-04-08 14:24:12

不是窗体控件，要从ACCESS别的表中查询才行

Top

煮江品茶发表于：2010-04-08 21:06:54

道理一样,写两个记录集(多个也行),然后将一个记录集的值赋值给另一个.如:

rs.addnew

rs("ID")=me.text.value

rs("数量")=upmax("up_max").value

rs.update

Top

总记录：3篇页次：1/1 9 1 :

Access交流中心

ACCESS 查询