需要帮助...
Table Name - cashbook Field name - pname & amount
解说
pname amount Antony 1500 Jose 3000 Antony 3500
需要像belo一样在msflexgrid中显示
Antony - 5000 Jose - 3000
下面我的代码不起作用...。有人可以帮助我
Rec.open "select from pname,sum(amount) as amt from cashbook group by pname order by pname,var,adopendynamic,adlockoptimist"
While rec.eof=false
Pymnt.rows=pymnt.rows+1
Pymnt.textmatrix(pymnt.rows -1,0)=rec!pname
Pymnt.textmatrix(pymnt.rows -1,1)=amt
Rec.movenext
Wend
Rec.close
我对您的代码进行了一些修复，并提出了以下解决方案：
Public Sub Test()
rec.Open "select pname,sum(amount) as amt from cashbook group by pname order by pname",var,adOpenDynamic,adLockOptimistic
While Not rec.EOF
pymnt.Rows = pymnt.Rows + 1
pymnt.textmatrix(pymnt.Rows - 1,0) = rec.Fields("pname").Value
pymnt.textmatrix(pymnt.Rows - 1,1) = rec.Fields("amt").Value
rec.MoveNext
Wend
rec.Close
End Sub
我所做的修复包括：
Open方法提供正确的参数var是一个开放的Connection对象adLockOptimistic的拼写