i need ur help in query sa vb

[rhex_tendo]

. .balik-balik ang ReceiptNo ug Qty, pero iba ang StockNo. .

ayaw iapil sa imo Select query ang StockNo nga field.

[reyarita]

db
-------------------------
custno|customer name| totalpayable
--------------------
1 |REYNITA | 20
2 |RHETENDO | 30
3 |SANGANNO | 10
4 |STRADnus | 10
5 |metallica | 20

__________________________________
total: 90 ------unsa on pag kuha sa total sa query sa vb
i tried ms access nga way pero mo drekso cya total..what i want taha ba

SELECT CUSTNO,COSTUMERNAME,SUM(DB.TOTALPAYABLE) AS TOTAL FROM DB...I TRIED ANI SA ACCESS MO DREKSO RA MAN GUD SA TOTAL NGA 90 MA WAG TANG NA 2 LIMA KA NUMBER ..
AKO Taha gusto taha ko pa bilin na nga numeroha?unsa on guys nag labad na ako ulo ani guys

--------------------------------------------------------------------

20
30
10
10
20
total : 90 - what i want is mag pa bilin taha na lima ka number together with total nga value

naa lang ko ask ha? Unsa u gamit para pagdisplay sa data flex grid o listview

nag try ko buhat2x ug sales and inventory system den naa ako code ana. i use list view
ako i send u ang ako buhat nga system ha
wat email a-dd

[_hizuka_]

aw...........

[skeptic_rob]

Dim RSS As New ADODB.Recordset
Dim ERROR As New ADODB.Recordset
Dim SQL As String


If NEWEDIT = 1 Then


SQL = "INSERT INTO DUPLICATED VALUES ('" & Me.txtMOBILE.Text & "','" & Me.TXTTRACE.Text & "','" & Me.TXTAMOUNT.Text & "','" & Me.TXTLOAD.Text & "','" & Format(DTPICKER1.Value, "DD/MM/YYYY") & "')"
RSS.Open SQL, CONN, adOpenDynamic, adLockPessimistic

MsgBox "SUCCESSFULLY SAVED "
'End If
Else

SQL = "UPDATE DUPLICATED SET TRACE =" & Val(Me.TXTTRACE.Text) & ",LOADAMOUNT =" & Val(Me.TXTAMOUNT.Text) & ",LOAD ='" & Val(Me.TXTLOAD.Text) & "',DATE=" & Format(DTPICKER1.Value, "DD/MM/YYYY") & " WHERE MOBILES='" & Val(txtMOBILE.Text) & "'"
ERROR.Open "[DUPLICATED]", CONN, adOpenForwardOnly, adLockReadOnly
MsgBox "Stock was updated successfully." & SQL
'ERROR.Close
End If

'Form_Load

[skeptic_rob]

Dim RSS As New ADODB.Recordset
Dim ERROR As New ADODB.Recordset
Dim SQL As String


If NEWEDIT = 1 Then


SQL = "INSERT INTO DUPLICATED VALUES ('" & Me.txtMOBILE.Text & "','" & Me.TXTTRACE.Text & "','" & Me.TXTAMOUNT.Text & "','" & Me.TXTLOAD.Text & "','" & Format(DTPICKER1.Value, "DD/MM/YYYY") & "')"
RSS.Open SQL, CONN, adOpenDynamic, adLockPessimistic

MsgBox "SUCCESSFULLY SAVED "
'End If
Else

SQL = "UPDATE DUPLICATED SET TRACE =" & Val(Me.TXTTRACE.Text) & ",LOADAMOUNT =" & Val(Me.TXTAMOUNT.Text) & ",LOAD ='" & Val(Me.TXTLOAD.Text) & "',DATE=" & Format(DTPICKER1.Value, "DD/MM/YYYY") & " WHERE MOBILES='" & Val(txtMOBILE.Text) & "'"
ERROR.Open "[DUPLICATED]", CONN, adOpenForwardOnly, adLockReadOnly
MsgBox "Stock was updated successfully." & SQL
'ERROR.Close
End If

'Form_Load

mo save cya pero kung mag edit ko then ako e save dli cya ka update wla g hapon changes..

[rhex_tendo]

SQL = "UPDATE DUPLICATED SET TRACE ='" & Val(Me.TXTTRACE.Text) & "',LOADAMOUNT ='" & Val(Me.TXTAMOUNT.Text) & "',LOAD ='" & Val(Me.TXTLOAD.Text) & "',DATE='" & Format(DTPICKER1.Value, "DD/MM/YYYY") & "' WHERE MOBILES='" & Val(txtMOBILE.Text) & "'"

..single quotation. . . i.compare sa imo INSERT INTO . .

i suggest utroha imo coding style bro. . samok na pagtrace ang imo sql