Форум: "Прочее";
Текущий архив: 2006.05.21;
Скачать: [xml.tar.bz2];

Вниз

Как удалить системные точки восстановления?   Найти похожие ветки 

← →
rolex2002   (2006-04-26 17:19) [0]

Как удалить системные точки восстановления (всё что находится в папке System Volume Information)?

---

← →
Карелин Артем ©   (2006-04-27 09:18) [1]

Правый кнопка на моем компе-свойства-восстановление системы-чекбоксина и ползунок...

---

← →
pavel_guzhanov ©   (2006-04-27 09:20) [2]

в служебных программах есть "Очистка диска" Если в ней нажать кнопку "Дополнительно", то одним из дополнительных вариантов предлагается удалить все контрольные точки восстановления, кроме последней.

---

← →
pavel_guzhanov ©   (2006-04-27 09:21) [3]

Пардон, не кнопка "Дополнительно", а вкладка:0))

---

← →
БГ   (2006-04-27 09:42) [4]

Del или Shift+Del

---

← →
Карелин Артем ©   (2006-04-27 09:43) [5]

> БГ   (27.04.06 09:42) [4]

Не забыв при этом дать себе права на работу с папкой ;)

---

← →
БГ   (2006-04-27 09:46) [6]

> Карелин Артем ©   (27.04.06 09:18) [1]
> Правый кнопка на моем компе-свойства-восстановление системы-
> чекбоксина и ползунок...


> Карелин Артем ©   (27.04.06 09:43) [5]
> Не забыв при этом дать себе права на работу с папкой ;)

Если есть права плолзунок двигать, то и просто стереть сможешь. имхо, проверять неохота.

---

← →
Карелин Артем ©   (2006-04-27 09:48) [7]

> БГ   (27.04.06 09:46) [6]

Неверно, на NTFS у админа в некоторых виндосах нет прав на эту папку даже "посмотреть что там".

---

← →
balepa ©   (2006-04-27 10:19) [8]

> Карелин Артем ©   (27.04.06 09:48) [7]


Так можно если ты тоже администратор их себе сделать.

---

← →
Карелин Артем ©   (2006-04-27 11:00) [9]

> balepa ©   (27.04.06 10:19) [8]

[5]

---

← →
Rouse_ ©   (2006-04-27 11:28) [10]

> Как удалить системные точки восстановления

SRRemoveRestorePoint

---

← →
Труп Васи Доброго ©   (2006-04-27 13:30) [11]

Удалено модератором

---

← →
rolex2002   (2006-04-27 15:00) [12]

Нашёл только как создавать:


type
PRESTOREPTINFOA = ^_RESTOREPTINFOA;
_RESTOREPTINFOA = packed record
dwEventType: DWORD;
dwRestorePtType: DWORD;
llSequenceNumber: INT64;
szDescription: array [0..64] of CHAR;
end;
RESTOREPOINTINFO = _RESTOREPTINFOA;
PRESTOREPOINTINFOA = ^_RESTOREPTINFOA;
PSMGRSTATUS = ^_SMGRSTATUS;
_SMGRSTATUS = packed record
nStatus: DWORD;
llSequenceNumber: INT64;
end;
STATEMGRSTATUS =  _SMGRSTATUS;
PSTATEMGRSTATUS =  ^_SMGRSTATUS;

function SRSetRestorePointA(pRestorePtSpec: PRESTOREPOINTINFOA; pSMgrStatus: PSTATEMGRSTATUS): Bool;
  stdcall; external "SrClient.dll" Name "SRSetRestorePointA";
function SRRemoveRestorePoint(dwd:DWORD): DWORD;
  stdcall; external "SrClient.dll" Name "SRRemoveRestorePoint";

procedure TForm1.Button1Click(Sender: TObject);
const CR = #13#10;
var
 RestorePtSpec: RESTOREPOINTINFO;
  SMgrStatus: STATEMGRSTATUS;
begin
 RestorePtSpec.dwEventType := 100;
  RestorePtSpec.dwRestorePtType := 0;
  RestorePtSpec.llSequenceNumber := 0;
  RestorePtSpec.szDescription := "SAMPLE RESTORE POINT";
  if (SRSetRestorePointA(@RestorePtSpec, @SMgrStatus)) then
  begin
    ShowMessage("Restore point set. Restore point data:" + CR+
      "Sequence Number: " + Format("%d", [SMgrStatus.llSequenceNumber]) + CR+
      "Status: " + Format("%u", [SMgrStatus.nStatus]));
      RestorePtSpec.dwEventType := 101;
      RestorePtSpec.dwRestorePtType  := 13;
      RestorePtSpec.llSequenceNumber := SMgrStatus.llSequenceNumber;
     if (SRSetRestorePointA(@RestorePtSpec, @SMgrStatus)) then
        ShowMessage("Restore point canceled. Restore point data:" + CR+
        "Sequence Number: " + Format("%d", [SMgrStatus.llSequenceNumber]) + CR+
        "Status: " + Format("%u", [SMgrStatus.nStatus]))
       else
        ShowMessage("Couldn""t cancel restore point.");
    end
    else
      ShowMessage("Couldn""t set restore point.");
  end;

procedure TForm1.Button2Click(Sender: TObject);
var
 RestorePtSpec: RESTOREPOINTINFO;
  SMgrStatus: STATEMGRSTATUS;
begin
ShowMessage(IntToStr(SMgrStatus.llSequenceNumber));
SRRemoveRestorePoint(SMgrStatus.llSequenceNumber);
end;

То что выделено жирным, дописал сам (думал так получится сделать удаление). Но не получается.
Материал по функции SRRemoveRestorePoint и её использованию брал отсюда:
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/sr/sr/srremoverestorepoint.asp
http://support.microsoft.com/default.aspx?scid=kb;en-us;315530

Прошу вашей помощи.

---

← →
rolex2002   (2006-04-27 18:05) [13]

ShellExecute(0,"open","cacls",""C:\System Volume Information" /E /G Руслан:F",nil,SW_HIDE);
А если так?
В каких виндах есть Восстановление системы и в каких виндах есть cacls?

---

← →
Rouse_ ©   (2006-04-27 21:52) [14]

Создавать то конечно ты нашел, это ты молодец.
А теперь сам подумай что ты делаешь вот этим кодом...

procedure TForm1.Button2Click(Sender: TObject);
var
RestorePtSpec: RESTOREPOINTINFO;
 SMgrStatus: STATEMGRSTATUS;
begin
 ShowMessage(IntToStr(SMgrStatus.llSequenceNumber));
 SRRemoveRestorePoint(SMgrStatus.llSequenceNumber);
end;

Лучше прочти MSDN еще раз...

---

← →
rolex2002   (2006-04-27 22:10) [15]

Не умею я. Опыта у меня пока нехватает, поэтому и вас прошу.

---

Страницы: 1 вся ветка

Форум: "Прочее";
Текущий архив: 2006.05.21;
Скачать: [xml.tar.bz2];

Наверх

Память: 0.49 MB
Время: 0.013 c