Exclusively for Visual Basic 6.0 Programmers Only!

[sieg06]

nilagay ko ung jo_backup ibinase ko po sa sample w3schools.com

nagdisplay na sya ng record sa listview. pero customer lang ang andun sa listview wala ang proj_date

solve na po itong problem na ito.

pag-aralan ko na lang ang ibang codes para dito

 

[sieg06]

sSQL = "SELECT tblJO.Proj_ID,tblJO.proj_date,tblCustomers.Customer_Name from tblJO INNER JOIN tblCustomers on tblJO.Customer_ID=tblCustomers.Customer_ID order by tbljo.proj_date"

mga bossing ngayon ko lang ginamit ang code na ito. possible bang sa isang query dalawa ang INNER JOIN?

SALAMAT

 

[Blegblog]

sir pahelp po vb6 installer or code nalang para mka gawa ng game

 

[rayzle16]

pwede yan pero bakit di mo i-try i-run ?

sSQL = "SELECT tblJO.Proj_ID,tblJO.proj_date,tblCustomers.Customer_Name from tblJO INNER JOIN tblCustomers on tblJO.Customer_ID=tblCustomers.Customer_ID order by tbljo.proj_date"

mga bossing ngayon ko lang ginamit ang code na ito. possible bang sa isang query dalawa ang INNER JOIN?

SALAMAT

 

[rayzle16]

napansin ko na parang may baligtad. select statement muna then sa recordset mag addnew ka na. kasi parang ang nangyari before eh nag addnew ka muna at mukhang walang na-select na table or record ang recordset then saka ka nag select statement.

Private Sub cmdadd_Click()

Adodc1.RecordSource = "select * from tblmember"
Adodc1.Recordset.AddNew

......

sir pahelp naman po ulit bakit po ganito ung lumalabas na prompt error sakin pag niclick ko na po ung add button.. Empty row cannot be inserted. Row must have at least one column value set. ito po yung code ko..

 

[rayzle16]

baka walang primary key yung table mo, try mo lagyan. napansin ko yang ID field mo so yan ang declare mong primary key sa database mo.

sir help naman po ulit dami kong tanong hehe sana po hindi kayo magsawang sumagot salamat po..about po dito sa SS ko kasi pag hindi ako nagtype ng date den click ko na yun Add button yan yung lumalabas na error po pano po ba iresolve yan. in advance

 

[rayzle16]

wala ka kasing

Set rsADO as New ADODB.Recordset

lagay mo ito bago ka mag:

rsADO.Open sSQL, sConn

mga sir pa help naman may error po ako na encounter dito sa codes. im using sql INNER JOIN TO DISPLAY RECORD IN LISTVIEW.

Private Sub Form_Load()
sSQL = "SELECT tblJO.proj_date,tblcustomers.customer_name into jo_backup from tbljo INNER JOIN tblcustomers on tblJO.Customer_ID=tblCustomers.Customer_ID"
Call PopulateListView(Me, sSQL)
End Sub

Sub PopulateListView(frm As Form, sSQL As String)

Dim sConn As New ADODB.Connection
Dim rsADO As New ADODB.Recordset
Dim xList As ListItem
Dim iCol As Long

sConn.Open gstrConnectionString

frm.lvwViewer.ListItems.Clear

If sConn.State = adStateOpen Then

rsADO.Open sSQL, sConn, adOpenForwardOnly
*** rsADO.MoveFirst - DITO PO ANG ERROR NYA
frm.lvwViewer.ColumnHeaders.Clear

'For iCol = 0 To rsADO.Fields.Count - 1

'frm.lvwViewer.ColumnHeaders.Add , , "", 0
frm.lvwViewer.ColumnHeaders.Add , , rsADO.Fields(1).Name, 3000

'Next

Do While Not rsADO.EOF

Set xList = frm.lvwViewer.ListItems.Add(, , rsADO.Fields(1))
'xList.SubItems(1) = rsADO.Fields(1)
xList.Tag = rsADO.Fields(0)

rsADO.MoveNext
' DoEvents
Loop
Else
'Err.Raise vbObjectError + 513, ERR_CAN_NOT_OPEN_CONNECTION
End If

Set rsADO = Nothing
sConn.Close
Set sConn = Nothing
End Sub


*** RUN-TIME ERROR "3704" OPERATION IS NOT ALLOWED WHEN THE OBJECT IS CLOSED.

 

[sieg06]

wala ka kasing

Set rsADO as New ADODB.Recordset

lagay mo ito bago ka mag:

rsADO.Open sSQL, sConn

as i have said in my last quote. SOLVED NA PO ITO. di mo po nabasa ang last post ko

 

[sieg06]

pwede yan pero bakit di mo i-try i-run ?

ito ibig kong sabihin pero may error dito sa code ko na ito

sSql = "SELECT tblJO.Proj_ID,tblJO.proj_date,tblCustomers.Customer_Name,tbljo.jo_no from tblJO INNER JOIN tblCustomers on tblJO.Customer_ID=tblCustomers.Customer_ID,tbljo.proc_ID from tblJO INNER JOIN tblproc on tblJO.proc_ID=tblproc.proc_ID order by tbljo.proj_date"


tinatry ko ang possibilities kung gagana ang code na mga naiisip ko.

paano nga po. ang tanong ko po kung pwede sa isang query dalawang inner join...

paano ang code. sana kung magcocomment ung tiyak kang makakatulong ang comment mo, hindi po iyong try mo or pwede yan.

salamat

 

[rayzle16]

di kasi malinaw post mo eh, di mo sinabi kung saan mo nira run, sa sql server ba or sa access. may pinagkaiba ang select statement ng access sa sql server. saka wala ka naman na-mention sa una mong tanong na nage-error pala yung query mo. sige heto na wag ka na umiyak

"SELECT A.Proj_ID,A.proj_date,B.Customer_Name,A.jo_no from ((tblJO as A INNER JOIN tblCustomers as B on A.Customer_ID=B.Customer_ID,A.proc_ID) INNER JOIN tblproc as C on A.proc_ID=C.proc_ID) order by A.proj_date"

ito ibig kong sabihin pero may error dito sa code ko na ito

sSql = "SELECT tblJO.Proj_ID,tblJO.proj_date,tblCustomers.Customer_Name,tbljo.jo_no from tblJO INNER JOIN tblCustomers on tblJO.Customer_ID=tblCustomers.Customer_ID,tbljo.proc_ID from tblJO INNER JOIN tblproc on tblJO.proc_ID=tblproc.proc_ID order by tbljo.proj_date"


tinatry ko ang possibilities kung gagana ang code na mga naiisip ko.

paano nga po. ang tanong ko po kung pwede sa isang query dalawang inner join...

paano ang code. sana kung magcocomment ung tiyak kang makakatulong ang comment mo, hindi po iyong try mo or pwede yan.

salamat

 

[frozenheart11]

pa dl naman bos ng source code..hindi ko ma dl ee .. salamat kung maiattached nio ..

 

[bearbearbearbear]

tol pede ba yan sa laptop sa school lng kasi ako nkpgganito..
san ba my installer wal kasi ako dito
hndi ko kasi nenjoy to ng ng aaral ako puro copy paste haha..

 

[sadniv]

Mga master pwede ba makahingi ng mga sample program nio, like database.. pag aaralan ko lng po thesis kasi namin ngayun..

or pa help po
pano ko po gagawin na
ichechek ng program na ganto
dapat di na makakapag "Log in " once na hindi pa nag "lolog out"

thanks

 

[sieg06]

di kasi malinaw post mo eh, di mo sinabi kung saan mo nira run, sa sql server ba or sa access. may pinagkaiba ang select statement ng access sa sql server. saka wala ka naman na-mention sa una mong tanong na nage-error pala yung query mo. sige heto na wag ka na umiyak

"SELECT A.Proj_ID,A.proj_date,B.Customer_Name,A.jo_no from ((tblJO as A INNER JOIN tblCustomers as B on A.Customer_ID=B.Customer_ID,A.proc_ID) INNER JOIN tblproc as C on A.proc_ID=C.proc_ID) order by A.proj_date"

hahaha. salamat

 

[sieg06]

hahaha. salamat

Run-time error -2147217900. Syntax error in JOIN operation bossing ung query mo. sa Access po ito.

 

[knives645]

wala ka kasing

Set rsADO as New ADODB.Recordset

lagay mo ito bago ka mag:

rsADO.Open sSQL, sConn

Pwede ang sinabi mo sir kung sa Declaration nya ay ganto

Dim rsADO As ADODB.Recordset

So, maglalagay ka dapat nang ganito....
Set rsADO As New ADODB.Recordset


Pero kung mapapansin mo dun sa declaration, meron nang NEW keyword...

Dim sConn As New ADODB.Connection
Dim rsADO As New ADODB.Recordset
Dim xList As ListItem
Dim iCol As Long

So no need to create for a new instance of the object...
Thanks!

 

[knives645]

Run-time error -2147217900. Syntax error in JOIN operation bossing ung query mo. sa Access po ito.

Nested INNER JOINS, yup pwede, nandito and mga samples....
http://office.microsoft.com/en-us/access-help/inner-join-operation-HA001231487.aspx

Remove AS keywords
"SELECT A.Proj_ID,A.proj_date,B.Customer_Name,A.jo_no from ((tblJO A INNER JOIN tblCustomers B on A.Customer_ID=B.Customer_ID,A.proc_ID) INNER JOIN tblproc C on A.proc_ID=C.proc_ID) order by A.proj_date DESC"

dun sa PupulateListView na Procedure, isang fields lang po ang ipapakita nun sa ListView.
So, need mo mag-create nang new procedure
para i-populate ang listview with all the fields and records.

 

[sieg06]

Nested INNER JOINS, yup pwede, nandito and mga samples....
http://office.microsoft.com/en-us/access-help/inner-join-operation-HA001231487.aspx

Remove AS keywords
"SELECT A.Proj_ID,A.proj_date,B.Customer_Name,A.jo_no from ((tblJO A INNER JOIN tblCustomers B on A.Customer_ID=B.Customer_ID,A.proc_ID) INNER JOIN tblproc C on A.proc_ID=C.proc_ID) order by A.proj_date DESC"

dun sa PupulateListView na Procedure, isang fields lang po ang ipapakita nun sa ListView.
So, need mo mag-create nang new procedure
para i-populate ang listview with all the fields and records.

nakuha ko na din kung paano iyong code. nakakita lang ako sa internet. then iniapply ko

here's the code


sSql = "SELECT tbljo.proj_id,tbljo.proj_date,tblcustomers.customer_name,tbljo.jo_no,tblproc.proc_code FROM ((tbljo INNER JOIN tblcustomers ON tbljo.customer_ID=tblcustomers.customer_id) INNER JOIN tblproc ON tbljo.proc_ID=tblproc.proc_id) ORDER BY tbljo.proj_date"

 

[sieg06]

nakuha ko na din kung paano iyong code. nakakita lang ako sa internet. then iniapply ko

here's the code


sSql = "SELECT tbljo.proj_id,tbljo.proj_date,tblcustomers.customer_name,tbljo.jo_no,tblproc.proc_code FROM ((tbljo INNER JOIN tblcustomers ON tbljo.customer_ID=tblcustomers.customer_id) INNER JOIN tblproc ON tbljo.proc_ID=tblproc.proc_id) ORDER BY tbljo.proj_date"

paano kung 3 hanggang 4 ang table na i-join ko

 

[knives645]

nakuha ko na din kung paano iyong code. nakakita lang ako sa internet. then iniapply ko

here's the code


sSql = "SELECT tbljo.proj_id,tbljo.proj_date,tblcustomers.customer_name,tbljo.jo_no,tblproc.proc_code FROM ((tbljo INNER JOIN tblcustomers ON tbljo.customer_ID=tblcustomers.customer_id) INNER JOIN tblproc ON tbljo.proc_ID=tblproc.proc_id) ORDER BY tbljo.proj_date"

Nice one sir..
May nagawa na din ako...
Since OK na pala, hindi ko na ipopost...