Adios al Baneo de PS3 Net
Viva Free Game Online.
De mi mayor consideracion tengo el agrado de dirigirme usted con el fin de comunicarle que eh podido decodificar el PSnet 3 - Como todo estudiante de Network Engineer (ingenieria de Redes de Trabajo) / Network Administrator / Support Administrator - En mi carrera que integra las áreas de la ingeniería relacionadas con la informática y las telecomunicaciones. Lo cual con mis conocimientos en ciencias básicas, electricidad, computación e informática, redes de comunicación, seguridad de redes, además de las técnicas de gestión de tecnologías de información, eh llegado a decodificar mi PS3 y Su famoso Ban Network, el mismo consiste en un archivo alojado en su PS3 o bien USB (pendrive) el cual se ejecuta de forma unica y automatica sin necesidad de sobre escribir ningun archivo o ejecutarlo, este proceso se produce cuando conectamos la PS3 via internet Wifi etc. La Codificacion muestra una estructura de conexion standar a la de la misma play station 3, solo con un lenguaje objeto que clona ID de Conexion De otros Usuarios Ubicados en EEUU con Lista de conexion 420 - Europa 324 - Centro America y Atlantico Central con 1148 y un centro base de Datos comunmente llamados (db) de 1 a 1000 ID y de 1000 a 16384 como maximo, ya que lo eh probado con ID Superiores sin tener resultados. Funciona para Todas Las PS3, lo unico es que jamás tendran una ID unica de Conexion Fija y mi mayor decepcion fue que no puedo jugar online con mas de 4 players, amigos y mis sobrinos apesar de tener el mismo juego y estar agregado como Friend List pero bueno, hasta que encuentre la solucion disfruten online de juegos piratas de a 4 .
142fc496eac1104b24ae30fdcb1cffa1
Copiar el sample code en un block de notas con el nombre de PssNetConnect.dba
Saludos Atte Luis[LG] - Argentina
PostData: Copien el Sample Code ya que esto no durará mucho ya que hay muchos intereses de por medio, y de paso a su nombre asi no me persiguen tanto =).
El Baneo de PSN por piratear PS3 con PS Jailbreak - psgroove ---> Solo un Mal Recuerdo.
Sample Code
Conexiones activas
#include <stdio.h> // Standard I/O
seconds. double sec = static_cast<double>(hnsTime / 10000) / 1000
cbBuffer: DWORD = 10000;
cEntries: DWORD = $FFFFFFFF;
Proto--Dirección local-------Dirección remota-----Estado-------PID
Warp---0.0.0.0:7------------0.0.0.0:0----------LISTENING-----420
Warp---0.0.0.0:9------------0.0.0.0:0----------LISTENING-----420
Warp---0.0.0.0:13-----------0.0.0.0:0----------LISTENING-----420
Warp---0.0.0.0:17-----------0.0.0.0:0----------LISTENING-----420
Warp---0.0.0.0:19-----------0.0.0.0:0----------LISTENING-----420
Warp---0.0.0.0:21-----------0.0.0.0:0----------LISTENING-----324
Warp---0.0.0.0:25-----------0.0.0.0:0----------LISTENING-----324
Warp---0.0.0.0:80-----------0.0.0.0:0----------LISTENING-----324
Warp---0.0.0.0:135----------0.0.0.0:0----------LISTENING-----952
Warp---0.0.0.0:443----------0.0.0.0:0----------LISTENING-----324
Warp---0.0.0.0:445----------0.0.0.0:0----------LISTENING-----4
Warp---0.0.0.0:1025---------0.0.0.0:0----------LISTENING-----1148
procedure TForm1.Button1Click(Sender: TObject);
var
i, dwResult: DWORD;
hEnum: THANDLE;
lpnrDrv,
lpnrDrvLoc: PNETRESOURCE;
s: string;
const
cbBuffer: DWORD = 16384;
cEntries: DWORD = $FFFFFFFF;
begin
dwResult := WNetOpenEnum(RESOURCE_CONNECTED,
RESOURCETYPE_ANY,
0,
nil,
hEnum);
if (dwResult <> NO_ERROR) then
begin
ShowMessage(' enumerate network #OriginalSession#Active.');
Exit;
end;
s := '';
repeat
lpnrDrv := PNETRESOURCE(GlobalAlloc(GPTR, cbBuffer));
dwResult := WNetEnumResource(hEnum, cEntries, lpnrDrv, cbBuffer);
if (dwResult = NO_ERROR) then
begin
s := 'Network Route:'#Active#Version;
lpnrDrvLoc := lpnrDrv;
for i := 0 to cEntries - 1 do
begin
if lpnrDrvLoc^.lpLocalName <> nil then
s := s + lpnrDrvLoc^.lpLocalName + #9 + lpnrDrvLoc^.lpRemoteName + #13#10;
Inc(lpnrDrvLoc);
end;
end
else if dwResult <> NO_ERROR_NO_MORE_ITEMS then
begin
s := s + 'Enabled complete network Active enumeration';
GlobalFree(HGLOBAL(lpnrDrv));
break;
end;
GlobalFree(HGLOBAL(lpnrDrv));
until (dwResult = ERROR_NO_MORE_ITEMS);
WNetCloseEnum(hEnum);
if s = '' then
s := 'Enabled network connections.';
ShowMessage(s);
end;
Fuente
http://www.el-trastero-digital.com/foro/viewtopic.php?f=231&t=2646 
![[oki]](/images/smilies/net_thumbsup.gif "Ok!")
.![[flipa]](/images/smilies/nuevos2/flipando.gif "flipando")
, habrá que andarse con cuidadito. 
![[mad]](/images/smilies/nuevos/miedo.gif "loco")
![[maszz]](/images/smilies/nuevos2/dormido.gif "otro q duerme")
![[+furioso]](/images/smilies/nuevos/furioso.gif "muy furioso")
![[+risas]](/images/smilies/nuevos/risa_ani3.gif "más risas")