Does any one know how to create a windows director using VB code The below code opens an explorer window to the correct file path, but when try to create a new folder I get an error "Object does not support this property or method" Any Ideas? Private Sub Test_Open_Click() Dim SH, OpenThis, Save_Path Dim Create_Folder, ThisFolder SavePath = "c:\Project" Set SH = CreateObject("shell.application") OpenThis = SAVE_PATH SH.Open OpenThis SH.MkDir (SAVE_PATH & "NewDir") Set SH = Nothing End Sub

Thanks for the advice "MyCxcel.DisplayAlerts = False" did the trick :-D

Using VB code I am looking for a way to save an Excel sheet without getting a prompt (in Excel asking if I want to overwrite the file) and close the Excel without user intervention. I have created an Excel.application object (MyExcel), a book object (MyBook) and a sheet object (MySheet) Through code I dump my datagrid data to the Excel Sheet, and save the file to disk using MyBook.SaveAs (save_Path & Save_Name) MyExcel.activeworkbook.close true This works great if the file does not exist, but prompts me to overwrite the file if it does. Any Suggestions would be helpful :doh:

How can I set the focus of to the end of the text in my text box. Clicking on a button I am populating a text box with code ie ShowThisText = "This is my Text" I then set the focus to the text box ie ShowThisText.setfocus The cursor by default is at the left of the "This is my Text" I want to be able to add on to the sentence without having to move to the right to start typing Any Ideas?

Is there a way to make a combo box multidimensional. I am populating a combo box through code using from a table REPORT_CHOICE.AddItem !FIELD_NAME The table I am using has two columns FILED_NAME and TABLE_NAME Is there a way to make a combo box multidimensional to hold both columns and be able to extract both colums to two different variables after I make a selection on the drop down box or do I need to 1) reconect to the table 2) search for the "FIELD_NAME" value I selected in the drop down box 3) populate my second variable with the "TABLE_NAME" table value Thanks

I am using VB6 - the datagrid I want to export to Excel is about 5000 records 20 colums wide. Is there a way to dump the entire datagrid at once or does one need to read each record/cell and transfer it to Excel?

Is there an easy way to get the infomtion from a DataGrid and dump it into MS Excel using VB6?

Yes thanks Im my form I fill in my "CopyThisData" multiline text box. Then I have a button that runs: Clipboard.Clear Clipboard.SetText CopyThisData.Text When I Alt-Tab to MSWord and Ctrl-p I get the text that was copied. Though, some times when I paste into word I dont get anything so I need to click the "Copy" button in my program again

I am using VB6 and am trying to copy the text from a form to the windows clipboard and paste it into another program (ie MSWord) In my program I have a button, when clicked it runs, pulls the data of my Clipbpard.SetText COPY_MY_DATA.TEXT this appears to copy the text in the COPY_MY_DATA field. If I ctrl-v to another field with in my program I can past the data. But If I alt-tab to word and ctrl-v I get something totaly differant How do I updated the windows clipboard so I can paste to any application?

Thanks the following code did what I was looking for DIM My_Shell Set My_Shell = CreateObject("WScript.Shell") My_Shell.Run "my_exe.exe"

I am writing in VB6 I have a "shell" script in my code that runs a small exe conversion program. Shell "my_exe.exe" I want to pause the subsequent code until this program has time to finishes I have put in a loop A = 100000000 Do While A > 0 A = A - 1 Loop But this is really slow. Does anyone know a better way to code this?

Thanks for the quick reply, I have looked at that and it works great on a per file bases. I am looking at doing about 700 small files at any given time and combining them into one large one to do queries and reporting. Do you know of a mass convert utility? or have any coding help you can extend? Thanks

I have a list of database files that I want to open and have access to the data. The original files are stored in .dbf as OEM data, and are used by a Visual Objects 2.0 program. Right now I open the files with Excel and save them as dbaseIV files to use them. Is there an easyer way to open / convert these files to use with my VB /(MSAccess back end) database? -- modified at 10:24 Friday 17th August, 2007

Thanks for the feed back. I am running VB6 and I get an error message "..Method or data member not found" with the My_DataGrid.currentrow.cells Any other suggestions

Does anyone know how to select a specific row in a datagrid without having to click on the grey box to the left of each row? IE if I have a datagrid "My_DataGrid" that looks like below: Line# Name 1 Bob 2 Joe 3 Mike If I use the code below and click anyware on the data Grid (Ie on the Joe field) I get UserName = Bob private Sub My_dataGrid.Click() dim UserName as string My_DataGrid.refresh UserName = My_DataGrid.Colums("Name") end sub If I click on the Grey Box to the left of Joe I get UserName = Joe Any Ideas

Is it possible to launch an exisitng MS access database (Test.mdb) from my VB6? Sub OPEN_ACCESS() Dim oApp As Object Dim OPEN_ACCESS OPEN_ACCESS = "T:\ACCESS\TEST.mdb" Set oApp = CreateObject("ACCESS.Application") oApp.Database.Open (OPEN_ACCESS) oApp.Visible = True End Sub

I am working witn VB2003.net on a windows app. I have an on enter trigger of my text box on form1 that opens form2. I am looking to get the data string entered into the text box on form2 back into the text field in form1 after form 2 is closed. Does anyone have any ideas :(

Thanks that is what I was looking for.:-O

If I have 10 text boxes text1, text2, text3 ... text10 and a "start over" button I want to be able to click the start over button and have the cursor jump to text2 no matter where it is in the tab sequince. Start at text1, (TAB) go to text2 (TAB) go to text3 (TAB) go to text4 (TAB) go to text5 (TAB) go to text6 Push "start over" button Change text in text2 (TAB) go to text3 Is this possable? :confused::confused: -- modified at 15:20 Tuesday 6th June, 2006

I am using VB 2003.net I have a field that I want to have the ability fill in a great about of data, but not take up the whole screen. On the form I have a small text box "Quote_Note" that Shows 5-6 lines of my typed test. For ease of typing and to see a whole screen when typing. I am opening a new form "Text_Box" that is one large text box called Quote_Note. Private Sub QUOTE_NOTE_ENTER(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles QUOTE_NOTE.Enter Dim TEXT_BOX As New TEXT_BOX TEXT_BOX.QUOTE_NOTE.Text = QUOTE_NOTE.Text TEXT_BOX.Show() End Sub Issue 1)How do I get the data back to my calling form Quote.Quote_note.text from TEXT_BOX.Quote_note.text 2) When I tab into Quote.Quote_note.text and it opens TEXT_BOX.Quote_note.text I get a cursor but if I mouse click on Quote.Quote_note.text I do not? Any Ideas.