Recent content by aks6190

  1. A

    Error......

    thanks!....
  2. A

    Error......

    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.
  3. A

    Error......

    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...
  4. A

    Error......

    Thank u Sir!.....Thank u very much!........
  5. A

    Error......

    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...
  6. A

    access problem

    thank u sir!.......
  7. A

    access problem

    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 *...
  8. A

    Runtime error(80040e14)

    thank u sir!....
  9. A

    Runtime error(80040e14)

    thanks!......thank u very much..........
  10. A

    Runtime error(80040e14)

    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...
Back
Top Bottom