Search results for query: *

George. Thanks for your help. i used msflexgrid.clear and it worked. it now updates the grid when form b dissapears. thanks for your help.. you get a much earned star!!

still not reloading the grid.. how do i clear the msflexgrid?

FORMB i have Unload FORMB Set FORMB = Nothing FormA i have Private Sub form_activate() Call Form_Load End Sub am i way off ???

ive not heard of that.. do you have some sample code. Thanks george!

Hope someone can help me out. I have FORMA w/msflexgrid on it. person clicks on the grid. opens up a new formB on top of FORMA ,they do whatever on that form then click close. I unload formB, and FORMA shows up as it was behind formB. How can i get it to be where formB closes, FormA reloads so...

Thank you all, works like a gem!!

Can someone give me some advice. i currently have. Private Sub load() Dim i As Integer lst.AddItem "1 " lst.AddItem "6 " lst.AddItem "7 " lst.AddItem "8 " lst.AddItem "9 " lst.Selected(0) = True End Sub I only want to allow the user to select one of the items, it defaults to item 1, but...

Here is what i have so far. ' Create an instance of Excel Set g_objExcelApp = New Excel.Application ' Open Selected Excel file g_objExcelApp.Workbooks.Open (g_strFilePath & "\" & g_strFileName) Set g_xlsWS = g_objExcelApp.Sheets(1) ' Update Excel spreadsheet...

Was wondering if anyone can point me in the right direction, using VB6 to open and close a spreadsheet in excel, after the close of the spread sheet a msg pops up.. "Do you want to update file.exl" is there a way to auto reply to this msg or for this msg not to come up??? Thanks VBMORTON

Thanks alot.. worked perfect!!!

Hi all. What I am trying to do is, Create a folder and enter documents into that folder. I am doing this. fso.CreateFolder (fldr & "\" & Trim$(rsT(2))) Sometimes this folder is already out there. so.. it goes into my error handling. then in my error handling: Select Case Err.Number...

Thanks all for your help. the code was right. but it was reading thru my printer list and printing at another printer at another site. i changed the default printer and it is working!!! :-)

i typed in this: Printer.Print "Testing 1-2-3" Printer.EndDoc and it worked.. not sure why my code not printing it.. i commented out the printer.enddoc at the beginning out. now im clueless

i was told to do that at start and finish, to make sure nothing is hanging out there.. is that correct or ??

i commented out the bin property and i got past that property error.. it goes thru and looks like its populating all the fields correctly, but nothing comes out of the printer.???? any ideas of what im missing for it to print. rsDrawList.Open strsql,g_Conn,adOpenDynamic,adLockOptimistic...

Can someone help.. I like to print data from a recordset, i so far have this, but keep getting an error when i run it, saying invalid property. rsDrawList.Open strsql,g_Conn,adOpenDynamic,adLockOptimistic Printer.EndDoc Printer.PaperSize = 17 Printer.PaperBin = intTray5...

Yes, very good, I know it is a SQL question, but it is SQL that i wrote in my VB6 program. I was just wondering if anyone might have any ideas to change my SQL statment so that i can have less VB code later in my program weeding out the duplicates.

Thought I would post to see if anyone had any ideas of how to do the following. i have this sql statment connecting to as400. Set rsNewTravelers = New Recordset strsql = "select dtdept, dtrsrc, dtjobr, dtseq#, dtpart from " & g_strDataBase & ".CURPX1, " & g_strDataBase & ".CJOBH...

Does anyone know how to auto fill a combo box ie.. this is my ie list. brady brooks carter cunningham johns johnsen johnson in the combo box, id like to start typing a letter. like.. J auto fills the rest to the first johns name JO no change JOH no change JOHN...

thanks zemp for the quick response.. That works pretty good.. so easy. i was thinking a remove.. glad you were here to assist. thanks vbmorten