C#

Kevin Marois wrote:

These number appear to be too large to be an Excel date. Anyone know what this is? Is the conversion to a dataset screwing up the data?

const string MYDIR = @"C:\MYDIR";
string[] files = Directory.GetFiles(MYDIR);
string[] dirs = Directory.GetDirectories(MYDIR);
if(files.Length == 0 && dirs.Length == 0)
{
  // ... MYDIR IS EMPTY...
}

select *
From Status
From ActivityStatus ActStsId=StsId

string sql = "   	    select * "+
"	    From Status "+
"	    From ActivityStatus ActStsId=StsId";

Sub SQL2CSharp()
    Dim selection As EnvDTE.TextSelection
    Dim startPoint As EnvDTE.EditPoint
    Dim endPoint As TextPoint
    Dim quoteStart As String

    selection = DTE.ActiveDocument.Selection()
    startPoint = selection.TopPoint.CreateEditPoint()
    endPoint = selection.BottomPoint
    quoteStart = """"

    DTE.UndoContext.Open("SQL 2 CSharp")
    Try
        startPoint.Insert("string sql = """)

        Do While (True)
            Dim line As Integer

            line = startPoint.Line
            startPoint.Insert(quoteStart)
            startPoint.EndOfLine()
            If (line = endPoint.Line) Then
                startPoint.Insert(quoteStart & ";")
            Else
                startPoint.Insert(quoteStart & "+")
            End If
            startPoint.LineDown()
            startPoint.StartOfLine()
            If (line = endPoint.Line) Then
                Exit Do
            End If
        Loop
    Finally
        ' If an error occurred, then make sure that the undo context is cleaned up.
        ' Otherwise, the editor can be left in a perpetual undo context.
        DTE.UndoContext.Close()
    End Try
End Sub