dcsimg

Search:

Type: Posts; User: wysiwyg327

Search: Search took 0.06 seconds.

  1. Re: listbox to mshflexgrid not looping

    OR insert the rs.movenext:


    rs.Open " select * from tblAttendance where Attendance_Id= " & lstattendance.ItemData(lstattendance.ListIndex) & "", con, adOpenStatic, adLockOptimistic
    If...
  2. Re: listbox to mshflexgrid not looping

    Try this one, maybe it should do it

    Dim ctr As Long
    ctr = 1
    MHSFlexGrid1.Rows = rst.RecordCount + 1

    Do While Not rst.EOF
    MHSFlexGrid1.TextMatrix(ctr, 1) = rst!FIELD
    ctr = ctr + 1
    ...
  3. Replies
    11
    Views
    1,605

    Re: Help With Checkboxes and pop-up

    This may help too: for query unload event



    Private Sub Form_QueryUnload(Cancel As Integer, UnloadMode As Integer)
    Dim chk As Boolean
    Dim objcon As Object

    For Each objcon In Me.Controls
    ...
  4. Replies
    4
    Views
    369

    Re: sql commad problem

    I dont know exactly what you mean, but i think if you want to update the value of fields on your table, you should refreseh it or try to execute the sql query again.
  5. Replies
    6
    Views
    382

    Re: Datagrid Value to Excel

    Try to use this as a reference :


    Private Sub TransFer_Xls()

    Dim xlApp As Excel.Application
    Dim xlsource As Excel.Workbook
    Dim wkSheetSrc As Excel.Worksheet
    Dim cellCtr As Long
    Dim rst As...
  6. Re: Stupid problem, Major issue (split) vb6

    Just dont forget to mark this thread as RESOLVED of you fix the prob..thanks :D
  7. Re: Help me out Argument Not Optional error

    ic thats why..

    try this one:


    Private Sub Cmd_Siguiente_Click()
    If Opt_PagoNom.Value = True Then Call Nomina
    Else: Call Proveedor

    End Sub
  8. Re: Help me out Argument Not Optional error

    what control is Opt_PagoNom?
  9. Re: Stupid problem, Major issue (split) vb6

    Try to chage this line:

    List1.List(x) = strElements(x)


    List1.AddItem strElements(x)
  10. Re: change the apperance of the mouse pointer

    hope this helps

    for the design time -

    Click the link label that opens an excel sheet then at the properties, change the MousePointer to "Custom", then Click the MouseIcon and select the icon...
  11. Replies
    18
    Views
    761

    Re: [RESOLVED] SUM Function

    nice!
  12. Replies
    18
    Views
    761

    Re: [RESOLVED] SUM Function

    Ok lets be specific, i tried to analyze your query and compare it to my previous sql queries with the same function as yours..try to analyze this and make some comparisons..

    "SELECT IDno, Project,...
  13. Replies
    18
    Views
    761

    Re: [RESOLVED] SUM Function

    what particular error do you get?
  14. Replies
    18
    Views
    761

    Re: [RESOLVED] SUM Function

    sorry my mistake (POSITION = new field), yes you should include it on your GROUP BY clause...hope it works..
  15. Replies
    18
    Views
    761

    Re: [RESOLVED] SUM Function

    simple as this:
    H_DF, NAME , (new field).....
  16. Replies
    3
    Views
    332

    Re: Updating recordset

    After updating the database, try to refresh it.. (.Refresh)
  17. Replies
    18
    Views
    761

    Re: SUM Function

    use first the WHERE clause then the GROUP by clause
    rs.Open "SELECT SUM(H_RB)as H_RB, SUM(H_HS) as H_HS, SUM(H_SF) as H_SF, SUM(H_DF) as H_DF, NAME from qryMB
    WHERE TRANDATE>=#" & dtp1.Value & "#...
  18. Replies
    5
    Views
    806

    Re: Load Word List From Resource Text File

    'try to store this on a string variable or rich textbox then follow the post #2
    'generated from LoadRes Editor


    var=StrConv(LoadResData(101, "CUSTOM"), vbUnicode)
  19. Replies
    5
    Views
    806

    Re: Load Word List From Resource Text File

    'hope this will help

    Sub LoadWords()
    Dim strtxt, Linestr As String
    Dim ArraySource() As String
    Dim ctr As Long

    'preserve array length
    ReDim Preserve ArraySource(0 To 10)
Results 1 to 19 of 19



Featured


Click Here to Expand Forum to Full Width