mohanvijay
05-05-2011, 06:26 AM
Hai All,
below code works fine with VBA but when i run in VB6 it is not working
and "Undefined function ROUND in expression"error occures
I use ADO 2.5 reference in both VBA and VB6
Why SQL ROUND only works with VBA how can i get in ROUND function in VB6
Please Help
I am using WINDOWS XP SP3
MS OFFICE 2003
qqry = "SELECT challan_user_no,challan_no,tds FROM temp_challan WHERE ROUND(tds,0)-tds<>0"
rs.Open qqry, db, adOpenStatic, adLockReadOnly
Range("a1").CopyFromRecordset rs
below code works fine with VBA but when i run in VB6 it is not working
and "Undefined function ROUND in expression"error occures
I use ADO 2.5 reference in both VBA and VB6
Why SQL ROUND only works with VBA how can i get in ROUND function in VB6
Please Help
I am using WINDOWS XP SP3
MS OFFICE 2003
qqry = "SELECT challan_user_no,challan_no,tds FROM temp_challan WHERE ROUND(tds,0)-tds<>0"
rs.Open qqry, db, adOpenStatic, adLockReadOnly
Range("a1").CopyFromRecordset rs