SECURITY RESEARCH / ENGINEERING

文章与研究

在证据与实验中理解复杂系统。

VB中注入隐藏进程,和提权

Private Declare Function RegCreateKey Lib "advapi32.dll" Alias "RegCreateKeyA" (ByVal hKey As Long, ByVal lpSubKey As String, phkResult As Long) As Long Private Declare Function RegSetValueEx Lib "advapi32.dll" Alias "RegSetValueExA" (ByVal hKey As Long, ByVal lpValueName As String, ByVal Reserved As Long, ByVal dwType As Long, lpData As Any, ByVal cbData As Long) As Long ' Note that if you declare the lpData parameter as String, you must pass it By Value. Private Declare Function RegCloseKey Lib "advapi32.dll" (ByVal hKey As Long) As Long Private Const REG_SZ = 1 Const HKEY_LOCAL_MACHINE = &H80000002 Private Sub SaveString(hKey As Long......

阅读全文 →

让Timer控件每5分钟触发一次事件

看到很多人在找这个,发给大家 Timer控件的Interval属性可以设置为0到65535之间的任意直,所以用Timer触发事件的最大时间间隔只能有65秒,因此如何能设置更长的时间间隔呢?可以在事件中建立代码,用系统时间确定这个时间间隔。 Dim dtNextTime as Date Private Sub Form_load() Timer1.interval=500 Timer1.Enabled=True dtNextTime=DateAdd("n......

阅读全文 →

让Timer控件每5分钟触发一次事件

看到很多人在找这个,发给大家 Timer控件的Interval属性可以设置为0到65535之间的任意直,所以用Timer触发事件的最大时间间隔只能有65秒,因此如何能设置更长的时间间隔呢?可以在事件中建立代码,用系统时间确定这个时间间隔。 Dim dtNextTime as Date Private Sub Form_load() Timer1.interval=500 Timer1.Enabled=True dtNextTime=DateAdd("n......

阅读全文 →