- This topic has 13 replies, 2 voices, and was last updated 18 years ago by
Admin.
-
AuthorPosts
-
November 13, 2005 at 10:11 pm #183829
Admin
AdministratorPaltalks DarkSide Wormy the Baddest Worm to Ever come to paltalk so watch out people lol 😈
check it out 😀
November 14, 2005 at 1:32 am #183842AdministratorThis is lame…. all this does is most likly what my Darkside Worm did you moron when i owned i made i worm like this here i’ll post the removal steps to get raid of this. but i gotta run this lame thing real fast forgot the whole path in the registry to the disabled task manager and disable registry keys. next time i reply i’ll give the paths…
November 14, 2005 at 1:49 am #183841Administratorits not lame its a clean worm wtf u talking about i love this worm
November 14, 2005 at 2:03 am #183840Administratorlmao….
HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionPoliciesSystem remove the (DisableTaskmgr)
HKEY_CURRENT_USERSoftwareMicrosoftWindowsCurrentVersionRun remove the (Darkside)
as i know because i have made this before………. however mine disabled the registry……. lemer im make a removal tool just for you pal. i think you will like it. 8) need to install vb6 thou i formated the other day 😀
November 14, 2005 at 2:15 am #183839Administratoru making a removal tool for me lol i already got one 😈
November 14, 2005 at 3:05 am #183838AdministratorMy Version of the paltalk wormy remover.
by the way lmao people talk about me hanging out in the teens check this out………
Name:OAKLAND_SENCO
Location: United States
Age:18
Hight:6,02
Weight:295
About Me: i like to fuck bosnian girlslmao guess were both pedos huh? people talk about me hanging out in teens hes 18 and with 13 to 17 yr olds two but ohhhhhhh yeah its fine for him to be in the teens lmao… 8)
November 14, 2005 at 9:55 am #183837Administratorlmao…. yea i think i left out a piece of code argh *sign*
Here you can make it….
add this to a Module….
Public Const HKEY_CLASSES_ROOT = &H80000000
Public Const HKEY_CURRENT_USER = &H80000001
Public Const HKEY_LOCAL_MACHINE = &H80000002
Public Const HKEY_USERS = &H80000003
Public Const HKEY_PERFORMANCE_DATA = &H80000004
Public Const ERROR_SUCCESS = 0&
' Registry API prototypes
Declare Function RegCloseKey Lib "advapi32.dll" (ByVal Hkey As Long) As Long
Declare Function RegCreateKey Lib "advapi32.dll" Alias "RegCreateKeyA" (ByVal Hkey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
Declare Function RegDeleteKey Lib "advapi32.dll" Alias "RegDeleteKeyA" (ByVal Hkey As Long, ByVal lpSubKey As String) As Long
Declare Function RegDeleteValue Lib "advapi32.dll" Alias "RegDeleteValueA" (ByVal Hkey As Long, ByVal lpValueName As String) As Long
Declare Function RegOpenKey Lib "advapi32.dll" Alias "RegOpenKeyA" (ByVal Hkey As Long, ByVal lpSubKey As String, phkResult As Long) As Long
Declare Function RegQueryValueEx Lib "advapi32.dll" Alias "RegQueryValueExA" (ByVal Hkey As Long, ByVal lpValueName As String, ByVal lpReserved As Long, lpType As Long, lpData As Any, lpcbData As Long) As Long
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
Public Const REG_SZ = 1 ' Unicode nul terminated string
Public Const REG_DWORD = 4 ' 32-bit number
Public Sub savekey(Hkey As Long, strPath As String)
Dim keyhand&
r = RegCreateKey(Hkey, strPath, keyhand&)
r = RegCloseKey(keyhand&)
End Sub
Public Function getstring(Hkey As Long, strPath As String, strValue As String)
Dim keyhand As Long
Dim datatype As Long
Dim lResult As Long
Dim strBuf As String
Dim lDataBufSize As Long
Dim intZeroPos As Integer
r = RegOpenKey(Hkey, strPath, keyhand)
lResult = RegQueryValueEx(keyhand, strValue, 0&, lValueType, ByVal 0&, lDataBufSize)
If lValueType = REG_SZ Then
strBuf = String(lDataBufSize, " ")
lResult = RegQueryValueEx(keyhand, strValue, 0&, 0&, ByVal strBuf, lDataBufSize)
If lResult = ERROR_SUCCESS Then
intZeroPos = InStr(strBuf, Chr$(0))
If intZeroPos > 0 Then
getstring = Left$(strBuf, intZeroPos - 1)
Else
getstring = strBuf
End If
End If
End If
End Function
Public Sub savestring(Hkey As Long, strPath As String, strValue As String, strdata As String)
Dim keyhand As Long
Dim r As Long
r = RegCreateKey(Hkey, strPath, keyhand)
r = RegSetValueEx(keyhand, strValue, 0, REG_SZ, ByVal strdata, Len(strdata))
r = RegCloseKey(keyhand)
End Sub
Function getdword(ByVal Hkey As Long, ByVal strPath As String, ByVal strValueName As String) As Long
Dim lResult As Long
Dim lValueType As Long
Dim lBuf As Long
Dim lDataBufSize As Long
Dim r As Long
Dim keyhand As Long
r = RegOpenKey(Hkey, strPath, keyhand)
' Get length/data type
lDataBufSize = 4
lResult = RegQueryValueEx(keyhand, strValueName, 0&, lValueType, lBuf, lDataBufSize)
If lResult = ERROR_SUCCESS Then
If lValueType = REG_DWORD Then
getdword = lBuf
End If
'Else
' Call errlog("GetDWORD-" & strPath, False)
End If
r = RegCloseKey(keyhand)
End Function
Function SaveDword(ByVal Hkey As Long, ByVal strPath As String, ByVal strValueName As String, ByVal lData As Long)
Dim lResult As Long
Dim keyhand As Long
Dim r As Long
r = RegCreateKey(Hkey, strPath, keyhand)
lResult = RegSetValueEx(keyhand, strValueName, 0&, REG_DWORD, lData, 4)
'If lResult error_success Then Call errlog("SetDWORD", False)
r = RegCloseKey(keyhand)
End Function
Public Function DeleteKey(ByVal Hkey As Long, ByVal strKey As String)
Dim r As Long
r = RegDeleteKey(Hkey, strKey)
End Function
Public Function DeleteValue(ByVal Hkey As Long, ByVal strPath As String, ByVal strValue As String)
Dim keyhand As Long
r = RegOpenKey(Hkey, strPath, keyhand)
r = RegDeleteValue(keyhand, strValue)
r = RegCloseKey(keyhand)
End FunctionAdd this to a command button…
Call DeleteValue(HKEY_CURRENT_USER, "SoftwareMicrosoftWindowsCurrentVersionRun", "Darkside")
Call DeleteValue(HKEY_CURRENT_USER, "SoftwareMicrosoftWindowsCurrentVersionPoliciesSystem", "DisableTaskmgr")Again this is the “Paltalk Darkside Wormy” lmafo saddly this is not a worm anyway its more of a annoyer then a worm or virus.
November 15, 2005 at 1:19 am #183836Administratorahhahahaha funny u even made me laugh u fat f_ck go hang out with ur kids and stop talking shit
November 15, 2005 at 2:12 am #183835Administratorahaha you were exposed you skinny dork with big police sun glasses lmao.
November 15, 2005 at 3:52 am #183834AdministratorSyxxtrigge paltalk #1 gay dude 😆
check it out hes on my paltalks #1 gay list 😈
😆 😀November 15, 2005 at 5:27 am #183833AdministratorOhhhhh how childish you making fun of my pictures an 18 yr old with a brain of a 15 yr old saddly your link the the pic dont work moron.
November 16, 2005 at 2:32 am #183832Administratorahhahah right go play wit ur kids and leave the computer alone u on it 24/7 play wit ur kids a little bit dont let them grow up like u did a low life computer geeek 😀 😈
November 16, 2005 at 9:42 am #183831Crashypoo
Membernot only it wasnt funny or anythin knew
t sure proved this guy needs some major help with paint , let alone a computerNovember 16, 2005 at 9:49 am #183830Administratorlmao me leave the computer alone lmao why so you can try and catch up to my paltalk talent lmao kid which you are just a 18 yr old pedofile looking to fuck some preteen “bosnian girls” from paltalk teens area. 8)
-
AuthorPosts
- You must be logged in to reply to this topic.