TrueCrypt-Container automatisch mit Autohotkey mounten

Das Tool TrueCrypt dürfte hinlänglich bekannt sein. Ich verwende es, um Daten auf meinem USB-Stick zu schützen, damit nicht jeder darauf zugreifen kann, sollte ich ihn mal verlieren.

Nun muss man jedes Mal beim Einstecken des Sticks auf die .tc-Datei doppelklicken, um diese zu Mounten (einzubinden). Natürlich könnte man das auch mit Hilfe einer Batch-Datei in die Autorun-Datei des USB-Sticks packen. Das funktioniert aber nur, wenn man den Autostart nicht deaktiviert hat.

Da ich das aber getan habe, um dieses nervige Fenster mir zu ersparen, nutze ich eine andere Lösung. Aus dem Autohotkey-Forum habe ich einen Codeschnippsel gefischt, der in regelmäßigen Abständen nach neu angesteckten Wechseldatenträgern scannt.

Ich habe das Skript etwas verändert, sodass in dem gefundenen Wechseldatenträger nach .tc-Dateien im Wurzelverzeichnis gesucht wird. Das hat den Vorteil, dass man nur noch das Container-Passwort eingeben muss und schon wird dieser gemountet. Zugegebenermasen eher Quick & Dirty, aber es funktioniert.

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
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
TrueCryptPfad = C:\Programme\TrueCrypt\TrueCrypt.exe
 
OnMessage(0x219, "notify_change")
DriveGet, dlist, list, REMOVABLE
Return
 
notify_change(wParam, lParam, msg, hwnd)
{
   SetTimer, CheckUSBDrives, -1000
}
 
CheckUSBDrives:
 
count = 0
 
DriveGet, nlist, list, REMOVABLE
Loop Parse, nlist
   IfNotInString, dlist, %a_LoopField%
   {
	  ; es wird unterstellt, dass sich die tc-Files im Root-VZ befinden
	  Loop, %a_LoopField%:\*.tc, 0, 0
		{
		MsgBox, 4, , Soll der Container %A_LoopFileFullPath% gemountet werden?
 
		IfMsgBox, Yes
			{
			GanzerPfad = %A_LoopFileFullPath%
			SplitPath, GanzerPfad, ContainerName
			if count = 0
			{
				RunWait, %TrueCryptPfad%  /q /v %A_LoopFileFullPath% /l I
				Menu, tray, add, Container %ContainerName% von Laufwerk I trennen, DismountMenuI
				TrayTip , TrueCrypt Container, Container %ContainerName% auf Laufwerk I:\ gemountet, 3, 1
			}
			if count = 1
			{
				RunWait, %TrueCryptPfad%  /q /v %A_LoopFileFullPath% /l J
				Menu, tray, add, Container %ContainerName% von Laufwerk J:\ trennen, DismountMenuJ
				TrayTip , TrueCrypt Container, Container %ContainerName% auf Laufwerk J:\ gemountet, 3, 1
			}
			if count = 2
			{
				RunWait, %TrueCryptPfad%  /q /v %A_LoopFileFullPath% /l K
				Menu, tray, add, Container %ContainerName% von Laufwerk K:\ trennen, DismountMenuK
				TrayTip , TrueCrypt Container, Container %ContainerName% auf Laufwerk K:\ gemountet, 3, 1
			}
			count +=1
			;Menu, tray, add, %A_LoopFileFullPath% trennen, DismountMenu
			}
		}
	dlist := nlist
   }
 
   Menu, tray, add, Alle Laufwerke trennen, DismountAllMenu
 
return
 
DismountMenuI:
IfExist, I:\
	RunWait, %TrueCryptPfad%  /q /d I
return
 
DismountMenuJ:
IfExist, J:\
	RunWait, %TrueCryptPfad%  /q /d J
return
 
DismountMenuK:
IfExist, K:\
	RunWait, %TrueCryptPfad%  /q /d K
return
 
DismountAllMenu:
	RunWait, %TrueCryptPfad%  /q /d
	TrayTip , TrueCrypt Container, Alle Container abgemeldet, 3, 1
return

One Response to 'TrueCrypt-Container automatisch mit Autohotkey mounten'

  1. Andi says:

    Mit Hotkey ists gleich einfacher

Leave a Reply

Your email address will not be published.Required fields are marked *

*