Question : Problem finding drivers for server

I have a new PowerEdge R310. I am trying to install Windows Server 2008, I already ran the Dell System Management cd. I keep getting a prompt explaining that "A required CD/DVD drive device driver is missing. If you have a driver floppy disk, CD, DVD, or USB flash drive, please insert now." Ive been to the support.dell.com website and downloaded all the drivers and exctracted the drivers onto my flash drive. When I put the flash drive into the server and I browse for the extracted drivers, it cannot read it. Ive also tried downloading the driver and NOT extracting the drivers onto my flash drive. The server is in RAID 5 with a SAS/SATA Contoller. Where can I find the correct drivers to download. Also it did not come with a drivers disc.

Answer : Problem finding drivers for server

On Error Resume Next should generally be used only in simple single purpose subs and functions that are called by your main subs (e.g. checking of a workbook is open or a sheet exists). Beyond that, error handling is really for catching unexpected errors or errors that you cannot readily handle in any other way. Typically you have an:

On Error Goto err_handler

line at the start (where 'err_handler' is a label in your code)

then an error handler section at the end, which in my case usually returns you to a clean-up section at the end of the code. For example:


1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:
Private Sub Worksheet_Change(ByVal Target As Range)
    Dim rngCell As Range, strPrefix As String
    
   On Error GoTo Worksheet_Change_Error
    
    Application.EnableEvents = False
    
    If Not Intersect(Target, Range("A:A")) Is Nothing Then
        strPrefix = Range("C2").Value
        For Each rngCell In Intersect(Target, Range("A:A"))
            If Len(rngCell.Value) > 0 Then
                If InStr(1, rngCell.Value, strPrefix, vbTextCompare) <> 1 Then
                    rngCell.Value = strPrefix & rngCell.Value
                End If
            End If
        Next rngCell
    End If

clean_up:
    Application.EnableEvents = True
   Exit Sub

Worksheet_Change_Error:

    MsgBox "Error " & Err.Number & " (" & Err.Description & ") in procedure Worksheet_Change of VBA Document Sheet1"
    Resume clean_up
End Sub
Random Solutions  
 
programming4us programming4us