AccueilCodesTutorielsForumsEmploiLivresGuide achatConnexion

  • CodeS-SourceS
  • RSS CodeS-SourceS
  • CodyxBot, le Bot GTalk & MSN qu'il vous faut !
  • Générez des revenus avec vos codes, scripts et tutoriaux
  • Aide à la navigation du site
begin process at 2009 07 12 08:04:55
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

39 commentaire(s) de jmluc sur des sources sur tout CodeS-SourceS

Le : 31/07/2003 07:48:30
Source : POUR LE FUN MOT DE PASSE DANS LE MENU DEMARRER AVEC EXITWINDOWS
Je suis bien d'accord tellmarch  mais :
Si tu as essayé d'ouvrir windows en passant par mode sans echec, tu n'as pas besoin de te soucier de la valeur du mot de passe
Si tu as essayé d'ouvrir normalement le poste, tu as été éjecté avant d'avoir pu utiliser notePad.
Enfin si tu veux compliquer les choses (mais là je rappelle que je n'ai pas mis ce code pour la partie mot de passe mais surtout pour l'explication de quelques API intéressantes), tu remplace les mdp en dur par des variables qui peuvent être le nom d'utilisateur du poste récupéré par la focntion :
GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long
Et le mdp par un truc du style date du jour reformatée...
mdp=Cstr(Format(date,"ddmmaa"))
Enfin bon ça reste des trucs simples pas pour faire une protection générale...juste pour apprendre certaines API...

Le : 30/07/2003 13:49:00
Source : POUR LE FUN MOT DE PASSE DANS LE MENU DEMARRER AVEC EXITWINDOWS
J'ai pas mis l'exe...mais bon y'a la source donc...y'a qu'à...

Le : 30/07/2003 13:30:18
Source : UN MOT DE PASSE OBLIGATOIRE AVANT D'ARRIVER SUR WINDOWS
Fonction API :
Déclaration :

Public Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
' Constantes pour ExitWindowsEx
Public Const EWX_LOGOFF = 0
Public Const EWX_SHUTDOWN = 1
Public Const EWX_REBOOT = 2
Public Const EWX_FORCE = 4

Utilisation :
Public Sub Fermeture()
    'MsgBox "Fin"
    If LoginSucceeded = False Then
    ExitWindowsEx EWX_SHUTDOWN, 0&
    ElseIf LoginSucceeded = True Then
    ExitWindowsEx EWX_REBOOT, 0&
    'ElseIf OptMsDos.Value = True Then

    Else
    'ExitWindowsEx EWX_LOGOFF, 0&
    End If
    Unload Me
  
End Sub
Avec XP il faut quelques modifs...mais sous 98 et 2000 ça marche bien
Si vous voulez je peux mettre la source complète sur VBFrance...mais je pensais que ça n'intéressait pas ...
Amitiés à tous

Le : 30/07/2003 07:50:58
Source : UN MOT DE PASSE OBLIGATOIRE AVANT D'ARRIVER SUR WINDOWS
Si tu veux faire un truc simple, en considérant que tes utilisateurs non autorisés ne sauront pas ouvrir en mode sans échec, (et y'a en plus qu'on croit qui sont dans ce cas parce que dans ma boite de 400 personnes y'a pas un utilisateur -hormi les informaticiens et encotre pas tous! - qui a su trouver la parade), donc tu fais un truc comme tu as dis, mais sur ta form tu mets un timer que tu règles sur 10 secondes.
Ensuite tu utilises les API de fermeture automatique de Windows...
Et là déjà tu compliques la tache fortement pour une intrusion d'un quidam de ton service...
Bon ce que j'en dis...mais en attendant mon petit prog est efficace pour 99% des cas...Les hackers eux peuvent venir de toute façon y'a rien d'intéressant sur mon poste Hi-Hi...

Le : 26/07/2003 14:25:24
Source : BASE DE DONNE AVEC SEEK
Set rs=db.open recordset("client",dbopentable)

rs.moveFirst '(Excuse c'était movefirst)

rs.seek=","text1.text

Le : 15/07/2003 09:01:53
Source : BASE DE DONNE AVEC SEEK
Seek c'est une méthode de recherche.
Juste une remarque, il faut toujours faire un :
rs.movenext
Sinon tu risques de sauter les premiers enregistrements...dans certains cas
JM

Le : 08/07/2003 08:15:42
Source : GENERATEUR DE MOT DE PASSE
Petite variante que m'a proposé un collègue pour la création de mot de passe pour un login en ASP :

Intégré dans une fonction :
<%
function gen_password()
     mot = ""
     er = 0
for cpt = 1 to 8
     do while er <> 1
     randomize
     x = int((122 - 48 +1) * Rnd + 48)       '--- produit des entier compris entre 48 et 122
          if x > 57 and x < 65 then                      '--- test si chiffre ds interval non désiré
               er = 0
               else if x > 90 and x < 97 then               '--- test si chiffre ds interval non désiré
               er = 0
          else er = 1                                           '--- chiffre pas ds interval non désiré
               end if
          end if
     loop
     y = chr(x)                                              '--- converti un chiffre en caractère
     mot = mot & y                                      '--- concaténation des caractères créer
     er=0
next
gen_password = mot                          ' --- renvoie du mot password
end function
%>

Ca marche bien...(Merci à Sylvain LECOMTE)

Le : 04/07/2003 12:42:55
Source : FOUILLER LES EXECUTABLES
Impressionnant........10/10

Le : 02/07/2003 13:37:27
Source : FORM POLYMORPHE ON SCREEN
Dommage...bon je verrai ce soir chez moi .
J'ai les deux OS sur mon poste...merci

Le : 02/07/2003 11:48:12
Source : STÉGANOGRAPHIE : CACHER UN FICHIER DANS UNE IMAGE
Travail remarquable...10/10


1 2 3 4


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Appels d'offres

Comparez les prix Nouvelle version


Apple iPod touch 2nde Gén. Noir 8 Go (Mac/PC)
Entre 209€ et 345€


Visiter le guide achat

Photothèque Nouveau !

Photo friends at the beach.Photo femme, plage, bien être, soleil, vacances, été, détente, repos
Photo cascades de plitvice 

Visiter la photothèque


Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,140 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.