2). You can use File.Copy the copy the files over, wrapped in a Try/Catch block. You don't have to check the file contents yourself since the O/S takes care of that for you. Since File.Copy is a blocking call, any errors encountered will throw an exception you can catch. 3) Yeah, but I didn't write my own system to do this. I used the MS Sync Framework[^]. A guide to posting questions on CodeProject[^] Dave Kreskowiak Microsoft MVP Visual Developer - Visual Basic      2006, 2007, 2008 But no longer in 2009...

Hi I have tried various options with the quotes with no sucess. Once I have selected the workbook from which I want to import the sheet, I load the sheets in the workbook into a combo. The user can then select which sheet they want to import. I do this as follows: For Each sheet As Excel.Worksheet In xlPacklistBook.Sheets Me.cboPackListSheetSelect.Items.Add(sheet.Name) Next Regarding the second option, I did try using the sheet index, but that did not work. I suspect it is because in the following code, the command data type is a string: Dim cmd As New System.Data.OleDb.OleDbCommand("Select * from ['" & strSheet & "$.A:A]'", conn) In Excel VBA if you use Sheet(1) as a ref to a sheet, the one is an int value, not a string as in Sheet("mySheet") I'm trying th e third option at the moment, but having hassles - I'll let you know if I get it right..

Found my answer... Use one of the Interop.Excel.XlFileFormat formats Interop.Excel.XlFileFormat.xlExcel8 seems to work fine

Hi Colin Thanks that was exactly what I was looking for. Colin Angus Mackay wrote: I'm also curious, did it not occur to you just to type SELECT * FROM INFORMATION_SCHEMA.COLUMNS or search for references to it on the internet? No it did not occur to me, since I looked through all the databases on the server, and could not find a table with that name, so I thought perhaps this was a table that was not in my database. I had never heard of a 'view' before, so I am currently GOOGLING 'SQL View' to learn more about that. It is sometimes difficult for a NOVICE (myself) to ask the right questions or look in the right places for information.

Hi Kschuler I tried it, but it maxed out the processor, and seemed to hang. I will only be able to look at it again in the morning, but thanks for your reply in the mean time BTW, the podetm table has about 14000 records, and the poheadm table about 5000 records. Maybe thats why its slow? -- modified at 11:03 Thursday 30th August, 2007

just use a online converter and it should go fine I always use this one: http://www.developerfusion.co.uk/utilities/convertcsharptovb.aspx[^] if you can't get it to convert provide me with an email (you can mail me from this site) and then I will send my version of a ribbon button (is in vb.net)

have you tried developing your own checkbox that overrieds the paint event and replaces it with your circular functionality, i think that's what you need to do. Posted by The ANZAC : "WWBD, What Would Buffy Do?" : "I don't know man, she's stronger than me"

Hmmm I havent tried this yet but here are some suggestions: If the users are recieving the mail as html you could use html tags in you msg.Body Or since outlook uses word as its email editor - open up word (in code and see what functionality this offers you) Hope these pointers help If i get time to look into this i shall try them and let you know my results Dan

1 - you can't 2 - I doubt you can Christian Graus - Microsoft MVP - C++ Metal Musings - Rex and my new metal blog "I am working on a project that will convert a FORTRAN code to corresponding C++ code.I am not aware of FORTRAN syntax" ( spotted in the C++/CLI forum )

Hi Dave There are a number of articles on Code Project about midi. http://www.codeproject.com/audio/midiports.asp http://www.codeproject.com/audio/cmidimusic.asp http://www.codeproject.com/cs/media/MIDIToolkit.asp All in C#. And most are quite complex for me too... but if they were in VB it would be at least a bit easier for me to TRY to understand... The last link is the type of interface I need right now, but later I want to look at writing a basic midi editor so pehaps it would be a good idea to look at the more complex articles from the start and try to 'cut' out the parts I need for now. In any case, there are a whole bunch of classes in C#

Hi Rupesh Thanks, that does work I was however hoping for somthing automatic. Also if I delete a row, then I will have to catch that event and renumber the rows. Thanks for your help though :)

I think it is a much better idea to have an actual counter in the loop and only wait a max amount of time. It also is a good idea to Application.DoEvents while you are in a loop or your form won't refresh. dim cnt as Integer = 0 Do While (Your normal check here) AndAlso cnt < 100000 'do your other code here System.Threading.Thread.Sleep(500) Application.DoEvents cnt = cnt + 1 Loop If cnt >= 100000 Then 'didn't finish the test... End If I would suggest that type of code over a timer. That way you know for sure that you will exit the loop and with the application.DoEvents it won't look like your application has died and isn't coming back. Hope that helps. Ben

RichardBerry wrote: By the way - Is it normal to thank someone for their reply on a forum Sure it is! It happens so rarely, that it doesn't really clutter up anything. :-D No problem. Dave Kreskowiak Microsoft MVP Visual Developer - Visual Basic      2006, 2007

RichardBerry wrote: It is a midi file... The header is mixed as follows: A 4-byte chunk type (ascii) A 4-byte length (32 bits, msb first) length bytes of data In that case, please look at Dave's suggestion above. Keep in mind that the number of bytes you want to write should match the number you are overwriting, though :)

Works perfectly - Thanks!!!

Thank you Dave!!!!!!!! That explains a lot of my problems when I see it that way.

Hi Here is the code. there is a bit of redumndant code where I tried other methods of adding the data... Dim drTmplt As DataRow = Me.dtStockmSample.Rows(0) 'I Use this row as a template for all ne rows Dim drNewRow As DataRow ' This is the row to be added Dim drXLRow As DataRow 'Row that contains new values imported from Excel Dim cnStr As String = "Server='" & Me.txtServer.Text & "';Database='" & Me.txtDatabase.Text & "';uid='userid';pwd='pwd'" Dim cn As New SqlClient.SqlConnection(cnStr) Dim da As New SqlClient.SqlDataAdapter("SELECT \* FROM " & Me.txtDatabase.Text & ".scheme.stockm", cn) Dim i As Integer dtStockm.Rows.Clear() Try cn.Open() da.FillSchema(dtStockm, SchemaType.Source) da.Fill(Me.dtStockm) da.SelectCommand.CommandText = "SELECT \* FROM " & Me.txtDatabase.Text & ".scheme.stockm" Dim cb As New SqlClient.SqlCommandBuilder(da) cb.GetInsertCommand(True) For i = 0 To Me.dtXlData.Rows.Count - 1 drXLRow = Me.dtXlData.Rows(i) drNewRow = dtStockm.NewRow drNewRow.Item(0).GetType.Name.ToString() For j As Integer = 0 To Me.dtStockmSample.Columns.Count - 1 drNewRow.Item(j) = drTmplt.Item(j) Next drNewRow.Item("warehouse") = drXLRow.Item("warehouse") drNewRow.Item("product") = drXLRow.Item("product") drNewRow.Item("alpha") = drXLRow.Item("alpha") drNewRow.Item("description") = drXLRow.Item("description") drNewRow.Item("unit\_code") = drXLRow.Item("unit\_code") drNewRow.Item("long\_description") = drXLRow.Item("long\_description") drNewRow.Item("nominal\_key") = drXLRow.Item("nominal\_key") drNewRow.Item("purchase\_key") = drXLRow.Item("purchase\_key") drNewRow.Item("analysis\_a") = drXLRow.Item("analysis\_a") drNewRow.Item("qty\_decimal\_places") = drXLRow.Item("qty\_decimal\_places") drNewRow.Item("batch\_traceability") = drXLRow.Item("batch\_traceability") drNewRow.Item("standard\_cost") = drXLRow.Item("standard\_cost") drNewRow.Item("lead\_time") = drXLRow.Item("lead\_time") drNewRow.Item("standard\_labour") = drXLRow.Item("standard\_labour") drNewRow.Item("standard\_overhead") = drXLRow.It