Visual Basic

RichardBerry wrote:

I am REALLY scared to insert somthing that may compromise the SQL database since this is our company's Live data...

RichardBerry wrote:

DBNull

RichardBerry wrote:

(it will be a HUGE INSERT Statment for 187 fields...)

RichardBerry wrote:

2c) Since the I only need to populate 19 of the 187 fields with actual data, can anyone suggest an elegant way of doing this - perhaps pulling one row from the SQL server, then modifying the 19 fields, then writing that back?)

Colin Angus Mackay wrote:

This may sound totally stupid, but have you considered developing on a COPY of the database? That way you have a development/test database that looks like the live database, but you are free to completely bugger up when accidents happen (and they will happen).

Colin Angus Mackay wrote:

DBNull

Colin Angus Mackay wrote:

Do you mean that each row contains pretty much the same data except for the 19 changed columns?

'Import Data From EXCEL...
Dim cmd As New System.Data.OleDb.OleDbCommand("Select * from [ImportData$A:T]", conn)
            Dim rdr As Data.OleDb.OleDbDataReader = cmd.ExecuteReader
            Do While rdr.Read()
                dr = dtXlData.NewRow
                 For col As Integer = 0 To 18
                    If rdr.IsDBNull(col) Then
                        dr.Item(col) = ""
                    Else
                        dr.Item(col) = rdr.GetValue(col).ToString
                    End If
                Next
                dtXlData.Rows.Add(dr)
            Loop

Try
            cn.Open()
            For i = 0 To dtXlData.Rows.Count - 1
                strInsertString = "stockm.on_order_qty, stockm.price, " _
                & "stockm.weight,  ..... to field 187" _
                & "VALUES (" & dtXlData.Rows(i).Item(0) & ","  _
                & dtXlData.Rows(i).Item(1) & "," 
                & "," & drStkm.Item(0) .... to Field 187
                cmd.CommandText = strInsertString
                cmd.ExecuteNonQuery()
            Next

SLRGrant wrote:

PS: How would I display the results in a textbox of what is in that folder before i delete it?

Christian Graus wrote:

Sadly, the answer is 'one at a time'. Directory.GetFiles will tell you the files, then you delete them one at a time.

SLRGrant wrote:

How would I display the results in a textbox of what is in that folder

// If I have a time in the .NET environment, and I want to use it for
// SetWastWriteTime() etc, then I need to adjust it for Win32.
static DateTime AdjustTime_DotNetToWin32(DateTime time)
{
  DateTime adjusted = time;
  if (DateTime.Now.IsDaylightSavingTime() && !time.IsDaylightSavingTime()) 
    adjusted = time - new System.TimeSpan(1, 0, 0); 
  else if (!DateTime.Now.IsDaylightSavingTime() && time.IsDaylightSavingTime()) 
    adjusted = time + new System.TimeSpan(1, 0, 0); 

  return adjusted;
} 


// If I read a time from a file with GetLastWriteTime() (etc), I need
// to adjust it for display in the .NET environment.  
static DateTime AdjustTime_Win32ToDotNet(DateTime time)
{
    DateTime adjusted = time;
    if (DateTime.Now.IsDaylightSavingTime() && !time.IsDaylightSavingTime())
	adjusted = time + new System.TimeSpan(1, 0, 0);

    else if (!DateTime.Now.IsDaylightSavingTime() && time.IsDaylightSavingTime())
	adjusted = time - new System.TimeSpan(1, 0, 0);

    return adjusted;
}


void MySetLastWriteTime(String targetFile, DateTime t)
{ 
  DateTime adjusted = AdjustTime_DotNetToWin32(t);
  System.IO.File.SetLastWriteTime(targetFile, adjusted);
}


DateTime MyGetLastWriteTime(String targetFile)
{ 
  DateTime t = System.IO.File.GetLastWriteTime(targetFile);
  return AdjustTime_Win32ToDotNet(t);
}