1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24
|
Sub MxDataGrid1_SelectedIndexChanged(sender As Object, e As EventArgs)
Dim datejour As DateTime
datejour = System.DateTime.Now.ToString("yyyy-MM-dd hh:mm:ss")
Dim IpAdress AS String
IpAdress = MxDataGrid1.SelectedItem.Cells(3).Text
Dim Sql As String
Dim nom As String
nom = MxDataGrid1.SelectedItem.Cells(2).Text
Sql = "UPDATE Servers SET Reboot = '" & CheckReboot(IpAdress) & "', FreeSpace_Go = '" & DiskSpace(IpAdress) & "',DateModif = '" & datejour & "', Total_Size_Go = '" & TotalSize(Ipadress) &"', Taille_Pourcentage = '" & TaillePourcent(Ipadress)& "%" & "', UserName = '" & name(Ipadress) & "' where Ip = '" & IpAdress & "'"
SQLExecuteQueryConnect(Sql, SqlDataSourceControl1.ConnectionString)
MxDataGrid1.DataBind()
lblError.Text = "Update for : " & IpAdress
End Sub |
Partager