Reindex all table in Sql Database

 declare @tableName nvarchar(255)

declare myCursor CURSOR FOR

select TABLE_SCHEMA+'.'+TABLE_NAME

from INFORMATION_SCHEMA.TABLES

where TABLE_TYPE = 'base table'

open myCursor

Fetch next from myCursor into @tableName

While @@FETCH_STATUS = 0

Begin

print 'Working on: '+@tableName

DBCC DBREINDEX(@TableName,' ',90)

Fetch next from myCursor into @tableName

end

close myCursor

Deallocate myCursor

Import Excel data in DataTable in Asp.Net

Dim excelPath As String = Server.MapPath("~/") + Path.GetFileName(FileUpload1.PostedFile.FileName)

FileUpload1.SaveAs(excelPath)

Dim connString As String = String.Empty

Dim extension As String = Path.GetExtension(FileUpload1.PostedFile.FileName)

Select Case extension

    Case ".xls"

        'Excel 97-03

        connString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & excelPath & ";Extended Properties='Excel 8.0'"

        Exit Select

    Case ".xlsx"

        'Excel 07 or higher

        connString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & excelPath & ";Extended Properties='Excel 12.0 Xml;HDR=Yes'"

        Exit Select

End Select

Using excel_con As New OleDbConnection(connString)

    excel_con.Open()

    Dim sheet1 As String = excel_con.GetOleDbSchemaTable(OleDbSchemaGuid.Tables, Nothing).Rows(0)("TABLE_NAME").ToString()

    Dim dtExcelData As New DataTable()

    Using oda As New OleDbDataAdapter("SELECT * FROM [" & sheet1 & "]", excel_con)

        oda.Fill(dtExcelData)

    End Using

    excel_con.Close()

    Dim count As Int16

    count = dtExcelData.Columns.Count

    Dim conString As String = ConfigurationManager.ConnectionStrings("ConnectionString1").ConnectionString

    Using con As New SqlConnection(conString)

        Using sqlBulkCopy As New SqlBulkCopy(con)

            'Set the database table name

            sqlBulkCopy.BulkCopyTimeout = 0

            sqlBulkCopy.DestinationTableName = "dbo.employee"

            '[OPTIONAL]: Map the Excel columns with that of the database table

            'Below mapping required when your column name with excel is not matched

            'sqlBulkCopy.ColumnMappings.Add("employee_id", "employee_id")

            'sqlBulkCopy.ColumnMappings.Add("name", "name")

            con.Open()

            sqlBulkCopy.WriteToServer(dtExcelData)

            con.Close()

        End Using

    End Using

End Using