Recent content by aks6190

thanks!....

here i m trying to use two tables first table has PK and second table has FK which is Bookorderid i want to enter the data from second table into datagrid......the first and second tables are opened using rs and rs1.

Dim con As New ADODB.Connection Dim rs As New ADODB.Recordset Dim rs1 As New ADODB.Recordset Private Sub cmdAdd_Click() DataGrid1.Visible = True cmdSave.Enabled = True txtBookorderid.Enabled = True enablerec clearrec MsgBox "You can add new record", vbOKOnly + vbInformation Set rs = New...

Thank u Sir!.....Thank u very much!........

Dim con As New ADODB.Connection Dim rs As New ADODB.Recordset Dim rs1 As New ADODB.Recordset Dim bid As Integer Private Sub cboBid_Click() Dim rs2 As New ADODB.Recordset bid = Val(cboBid.Text) rs2.Open "SELECT * FROM Book_info where Book_id= " & bid & " ", con, adOpenKeyset, adLockOptimistic...

thank u sir!.......

Dim con As New ADODB.Connection Dim rs As New ADODB.Recordset Dim bid As Integer Private Sub cboBoid_Change() bid = (cboBoid.Text) Dim res As New ADODB.Recordset res.Open "select * from Customer_order where Bookorder_id=' " & bid & " ' ", con, adOpenKeyset, adLockOptimistic res.Open "Select *...

thank u sir!....

thanks!......thank u very much..........

Dim con As New ADODB.Connection Dim rs As New ADODB.Recordset Dim rs1 As New ADODB.Recordset Dim sid, bname, qty As String Private Sub cboSupid_Click() sid = cboSupid.Text rs1.Open "select * from Supplier_details where Supplier_id=('" & sid & "')", con, adOpenKeyset, adLockOptimistic...