diff --git a/.gitignore b/.gitignore new file mode 100644 index 0000000..1b86e7e --- /dev/null +++ b/.gitignore @@ -0,0 +1,268 @@ +## Ignore Visual Studio temporary files, build results, and +## files generated by popular Visual Studio add-ons. + +# User-specific files +*.suo +*.user +*.userosscache +*.sln.docstates + +# User-specific files (MonoDevelop/Xamarin Studio) +*.userprefs + +# Build results +[Dd]ebug/ +[Dd]ebugPublic/ +[Rr]elease/ +[Rr]eleases/ +x64/ +x86/ +bld/ +[Bb]in/ +[Oo]bj/ +[Ll]og/ + +# Visual Studio 2015 cache/options directory +.vs/ +# Uncomment if you have tasks that create the project's static files in wwwroot +#wwwroot/ + +# MSTest test Results +[Tt]est[Rr]esult*/ +[Bb]uild[Ll]og.* + +# NUNIT +*.VisualState.xml +TestResult.xml + +# Build Results of an ATL Project +[Dd]ebugPS/ +[Rr]eleasePS/ +dlldata.c + +# DNX +project.lock.json +project.fragment.lock.json +artifacts/ + +*_i.c +*_p.c +*_i.h +*.ilk +*.meta +*.obj +*.pch +*.pdb +*.pgc +*.pgd +*.rsp +*.sbr +*.tlb +*.tli +*.tlh +*.tmp +*.tmp_proj +*.log +*.vspscc +*.vssscc +.builds +*.pidb +*.svclog +*.scc + +# Chutzpah Test files +_Chutzpah* + +# Visual C++ cache files +ipch/ +*.aps +*.ncb +*.opendb +*.opensdf +*.sdf +*.cachefile +*.VC.db +*.VC.VC.opendb + +# Visual Studio profiler +*.psess +*.vsp +*.vspx +*.sap + +# TFS 2012 Local Workspace +$tf/ + +# Guidance Automation Toolkit +*.gpState + +# ReSharper is a .NET coding add-in +_ReSharper*/ +*.[Rr]e[Ss]harper +*.DotSettings.user + +# JustCode is a .NET coding add-in +.JustCode + +# TeamCity is a build add-in +_TeamCity* + +# DotCover is a Code Coverage Tool +*.dotCover + +# Visual Studio code coverage results +*.coverage +*.coveragexml + +# NCrunch +_NCrunch_* +.*crunch*.local.xml +nCrunchTemp_* + +# MightyMoose +*.mm.* +AutoTest.Net/ + +# Web workbench (sass) +.sass-cache/ + +# Installshield output folder +[Ee]xpress/ + +# DocProject is a documentation generator add-in +DocProject/buildhelp/ +DocProject/Help/*.HxT +DocProject/Help/*.HxC +DocProject/Help/*.hhc +DocProject/Help/*.hhk +DocProject/Help/*.hhp +DocProject/Help/Html2 +DocProject/Help/html + +# Click-Once directory +publish/ + +# Publish Web Output +*.[Pp]ublish.xml +*.azurePubxml +# TODO: Comment the next line if you want to checkin your web deploy settings +# but database connection strings (with potential passwords) will be unencrypted +*.pubxml +*.publishproj + +# Microsoft Azure Web App publish settings. Comment the next line if you want to +# checkin your Azure Web App publish settings, but sensitive information contained +# in these scripts will be unencrypted +PublishScripts/ + +# NuGet Packages +*.nupkg +# The packages folder can be ignored because of Package Restore +**/packages/* +# except build/, which is used as an MSBuild target. +!**/packages/build/ +# Uncomment if necessary however generally it will be regenerated when needed +#!**/packages/repositories.config +# NuGet v3's project.json files produces more ignoreable files +*.nuget.props +*.nuget.targets + +# Microsoft Azure Build Output +csx/ +*.build.csdef + +# Microsoft Azure Emulator +ecf/ +rcf/ + +# Windows Store app package directories and files +AppPackages/ +BundleArtifacts/ +Package.StoreAssociation.xml +_pkginfo.txt + +# Visual Studio cache files +# files ending in .cache can be ignored +*.[Cc]ache +# but keep track of directories ending in .cache +!*.[Cc]ache/ + +# Others +ClientBin/ +~$* +*~ +*.dbmdl +*.dbproj.schemaview +*.jfm +*.pfx +*.publishsettings +node_modules/ +orleans.codegen.cs + +# Since there are multiple workflows, uncomment next line to ignore bower_components +# (https://github.com/github/gitignore/pull/1529#issuecomment-104372622) +#bower_components/ + +# RIA/Silverlight projects +Generated_Code/ + +# Backup & report files from converting an old project file +# to a newer Visual Studio version. Backup files are not needed, +# because we have git ;-) +_UpgradeReport_Files/ +Backup*/ +UpgradeLog*.XML +UpgradeLog*.htm + +# SQL Server files +*.mdf +*.ldf + +# Business Intelligence projects +*.rdl.data +*.bim.layout +*.bim_*.settings + +# Microsoft Fakes +FakesAssemblies/ + +# GhostDoc plugin setting file +*.GhostDoc.xml + +# Node.js Tools for Visual Studio +.ntvs_analysis.dat + +# Visual Studio 6 build log +*.plg + +# Visual Studio 6 workspace options file +*.opt + +# Visual Studio LightSwitch build output +**/*.HTMLClient/GeneratedArtifacts +**/*.DesktopClient/GeneratedArtifacts +**/*.DesktopClient/ModelManifest.xml +**/*.Server/GeneratedArtifacts +**/*.Server/ModelManifest.xml +_Pvt_Extensions + +# Paket dependency manager +.paket/paket.exe +paket-files/ + +# FAKE - F# Make +.fake/ + +# JetBrains Rider +.idea/ +*.sln.iml + +# CodeRush +.cr/ + +# Python Tools for Visual Studio (PTVS) +__pycache__/ +*.pyc + +# Cake - Uncomment if you are using it +# tools/ diff --git a/MainForm.Designer.vb b/MainForm.Designer.vb index b990058..6904af8 100644 --- a/MainForm.Designer.vb +++ b/MainForm.Designer.vb @@ -48,10 +48,14 @@ Partial Class MainForm Me.web_browser_grp = New System.Windows.Forms.GroupBox() Me.webBrowser = New System.Windows.Forms.WebBrowser() Me.hit_timer = New System.Windows.Forms.Timer(Me.components) + Me.statusStrip1 = New System.Windows.Forms.StatusStrip() + Me.hit_count = New System.Windows.Forms.ToolStripStatusLabel() + Me.hit_cntdown = New System.Windows.Forms.ToolStripStatusLabel() Me.main_control_grp.SuspendLayout Me.proxy_grp.SuspendLayout Me.hitspeed_grp.SuspendLayout Me.web_browser_grp.SuspendLayout + Me.statusStrip1.SuspendLayout Me.SuspendLayout ' 'main_control_grp @@ -71,6 +75,7 @@ Partial Class MainForm ' 'stop_btn ' + Me.stop_btn.Enabled = false Me.stop_btn.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0,Byte)) Me.stop_btn.ForeColor = System.Drawing.Color.Red Me.stop_btn.Location = New System.Drawing.Point(358, 80) @@ -79,9 +84,11 @@ Partial Class MainForm Me.stop_btn.TabIndex = 4 Me.stop_btn.Text = "Stop" Me.stop_btn.UseVisualStyleBackColor = true + AddHandler Me.stop_btn.Click, AddressOf Me.Stop_btnClick ' 'start_btn ' + Me.start_btn.Enabled = false Me.start_btn.Font = New System.Drawing.Font("Microsoft Sans Serif", 8.25!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0,Byte)) Me.start_btn.ForeColor = System.Drawing.Color.Blue Me.start_btn.Location = New System.Drawing.Point(275, 80) @@ -90,6 +97,7 @@ Partial Class MainForm Me.start_btn.TabIndex = 3 Me.start_btn.Text = "Start" Me.start_btn.UseVisualStyleBackColor = true + AddHandler Me.start_btn.Click, AddressOf Me.Start_btnClick ' 'load_site_btn ' @@ -100,6 +108,7 @@ Partial Class MainForm Me.load_site_btn.TabIndex = 2 Me.load_site_btn.Text = "Load Website" Me.load_site_btn.UseVisualStyleBackColor = true + AddHandler Me.load_site_btn.Click, AddressOf Me.Load_site_btnClick ' 'url_box ' @@ -108,6 +117,7 @@ Partial Class MainForm Me.url_box.Name = "url_box" Me.url_box.Size = New System.Drawing.Size(380, 26) Me.url_box.TabIndex = 0 + AddHandler Me.url_box.TextChanged, AddressOf Me.Url_boxTextChanged ' 'label1 ' @@ -145,7 +155,7 @@ Partial Class MainForm Me.proxy_box.Name = "proxy_box" Me.proxy_box.Size = New System.Drawing.Size(245, 20) Me.proxy_box.TabIndex = 0 - Me.proxy_box.Text = "121.183.4.54:51325 " + Me.proxy_box.Text = "null" ' 'hitspeed_grp ' @@ -194,14 +204,42 @@ Partial Class MainForm Me.webBrowser.Location = New System.Drawing.Point(3, 16) Me.webBrowser.MinimumSize = New System.Drawing.Size(20, 20) Me.webBrowser.Name = "webBrowser" + Me.webBrowser.ScriptErrorsSuppressed = true Me.webBrowser.Size = New System.Drawing.Size(439, 104) Me.webBrowser.TabIndex = 0 ' + 'hit_timer + ' + AddHandler Me.hit_timer.Tick, AddressOf Me.Hit_timerTick + ' + 'statusStrip1 + ' + Me.statusStrip1.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.hit_count, Me.hit_cntdown}) + Me.statusStrip1.Location = New System.Drawing.Point(0, 371) + Me.statusStrip1.Name = "statusStrip1" + Me.statusStrip1.Size = New System.Drawing.Size(469, 22) + Me.statusStrip1.TabIndex = 6 + Me.statusStrip1.Text = "statusStrip1" + ' + 'hit_count + ' + Me.hit_count.Font = New System.Drawing.Font("Segoe UI", 9!, System.Drawing.FontStyle.Bold, System.Drawing.GraphicsUnit.Point, CType(0,Byte)) + Me.hit_count.ForeColor = System.Drawing.Color.Purple + Me.hit_count.Name = "hit_count" + Me.hit_count.Size = New System.Drawing.Size(0, 17) + ' + 'hit_cntdown + ' + Me.hit_cntdown.Font = New System.Drawing.Font("Segoe UI", 9!, System.Drawing.FontStyle.Italic, System.Drawing.GraphicsUnit.Point, CType(0,Byte)) + Me.hit_cntdown.Name = "hit_cntdown" + Me.hit_cntdown.Size = New System.Drawing.Size(0, 17) + ' 'MainForm ' Me.AutoScaleDimensions = New System.Drawing.SizeF(6!, 13!) Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font - Me.ClientSize = New System.Drawing.Size(469, 375) + Me.ClientSize = New System.Drawing.Size(469, 393) + Me.Controls.Add(Me.statusStrip1) Me.Controls.Add(Me.web_browser_grp) Me.Controls.Add(Me.hitspeed_grp) Me.Controls.Add(Me.proxy_grp) @@ -209,7 +247,7 @@ Partial Class MainForm Me.Icon = CType(resources.GetObject("$this.Icon"),System.Drawing.Icon) Me.Name = "MainForm" Me.StartPosition = System.Windows.Forms.FormStartPosition.CenterScreen - Me.Text = "Fake Hits Generator" + Me.Text = "Fake Hits Generator 0.4 Classic" Me.main_control_grp.ResumeLayout(false) Me.main_control_grp.PerformLayout Me.proxy_grp.ResumeLayout(false) @@ -217,8 +255,14 @@ Partial Class MainForm Me.hitspeed_grp.ResumeLayout(false) Me.hitspeed_grp.PerformLayout Me.web_browser_grp.ResumeLayout(false) + Me.statusStrip1.ResumeLayout(false) + Me.statusStrip1.PerformLayout Me.ResumeLayout(false) + Me.PerformLayout End Sub + Private hit_cntdown As System.Windows.Forms.ToolStripStatusLabel + Private hit_count As System.Windows.Forms.ToolStripStatusLabel + Private statusStrip1 As System.Windows.Forms.StatusStrip Private hit_timer As System.Windows.Forms.Timer Private web_browser_grp As System.Windows.Forms.GroupBox Friend webBrowser As System.Windows.Forms.WebBrowser diff --git a/MainForm.resx b/MainForm.resx index 387ade7..7ff8eb5 100644 --- a/MainForm.resx +++ b/MainForm.resx @@ -120,6 +120,9 @@ 17, 17 + + 112, 17 + diff --git a/MainForm.vb b/MainForm.vb index 4b52b5a..a4f2678 100644 --- a/MainForm.vb +++ b/MainForm.vb @@ -5,6 +5,10 @@ ' Time: 8:21 PM ' Public Partial Class MainForm + Dim Timer_Value As Integer + Dim Speed As Integer + Dim Hits As Integer + Public Sub New() ' The Me.InitializeComponent call is required for Windows Forms designer support. Me.InitializeComponent() @@ -13,4 +17,57 @@ Public Partial Class MainForm ' TODO : Add constructor code after InitializeComponents ' End Sub + + Sub Load_site_btnClick(sender As Object, e As EventArgs) + + If String.IsNullOrEmpty(url_box.Text) Or String.IsNullOrEmpty(hit_speed_val_box.Text) Then + MsgBox("Input details are missing!",vbExclamation,"Error") + + Else + If proxy_box.Text = "null" Then + webBrowser.Navigate(url_box.Text) + Else + Use_Proxy.UseProxy(proxy_box.Text) + webBrowser.Navigate(url_box.Text) + End If + + start_btn.Enabled = True + load_site_btn.Enabled = False + + End If + End Sub + + Sub Start_btnClick(sender As Object, e As EventArgs) + hit_timer.Enabled = True + Speed = hit_speed_val_box.Text + Hits = 0 + start_btn.Enabled = False + stop_btn.Enabled = True + End Sub + + Sub Hit_timerTick(sender As Object, e As EventArgs) + Timer_Value += 1 + hit_cntdown.Text = "Waiting : " & Timer_Value.ToString + + If Timer_Value = Speed Then + webBrowser.Refresh + webBrowser.Navigate(url_box.Text) + hit_count.Text = "Hits : " & Hits.ToString + Timer_Value = 0 + Hits += 1 + End If + End Sub + + Sub Stop_btnClick(sender As Object, e As EventArgs) + hit_timer.Enabled = False + stop_btn.Enabled = False + load_site_btn.Enabled = True + hit_cntdown.Text = "Waiting : Stopped" + End Sub + + Sub Url_boxTextChanged(sender As Object, e As EventArgs) + load_site_btn.Enabled = True + start_btn.Enabled = False + stop_btn.Enabled = False + End Sub End Class diff --git a/Use_Proxy.vb b/Use_Proxy.vb index 18c40d9..b767674 100644 --- a/Use_Proxy.vb +++ b/Use_Proxy.vb @@ -17,7 +17,7 @@ Public Class Use_Proxy Public proxyBypass As IntPtr End Structure - Public Sub UseProxy(ByVal strProxy As String) + Public Shared Sub UseProxy(ByVal strProxy As String) Const INTERNET_OPTION_PROXY As Integer = 38 Const INTERNET_OPEN_TYPE_PROXY As Integer = 3 diff --git a/bin/Debug/Fake Hits Generator.exe b/bin/Debug/Fake Hits Generator.exe deleted file mode 100644 index da77806..0000000 Binary files a/bin/Debug/Fake Hits Generator.exe and /dev/null differ diff --git a/bin/Debug/Fake Hits Generator.pdb b/bin/Debug/Fake Hits Generator.pdb deleted file mode 100644 index 631c2e9..0000000 Binary files a/bin/Debug/Fake Hits Generator.pdb and /dev/null differ diff --git a/obj/Debug/Fake Hits Generator.exe b/obj/Debug/Fake Hits Generator.exe deleted file mode 100644 index da77806..0000000 Binary files a/obj/Debug/Fake Hits Generator.exe and /dev/null differ diff --git a/obj/Debug/Fake Hits Generator.pdb b/obj/Debug/Fake Hits Generator.pdb deleted file mode 100644 index 631c2e9..0000000 Binary files a/obj/Debug/Fake Hits Generator.pdb and /dev/null differ diff --git a/obj/Debug/Fake Hits Generator.vbproj.FileListAbsolute.txt b/obj/Debug/Fake Hits Generator.vbproj.FileListAbsolute.txt deleted file mode 100644 index c4884b4..0000000 --- a/obj/Debug/Fake Hits Generator.vbproj.FileListAbsolute.txt +++ /dev/null @@ -1,7 +0,0 @@ -C:\Users\IP-Man\Documents\SharpDevelop Projects\Fake Hits Generator\Fake Hits Generator\bin\Debug\Fake Hits Generator.exe -C:\Users\IP-Man\Documents\SharpDevelop Projects\Fake Hits Generator\Fake Hits Generator\bin\Debug\Fake Hits Generator.pdb -C:\Users\IP-Man\Documents\SharpDevelop Projects\Fake Hits Generator\Fake Hits Generator\obj\Debug\Fake Hits Generator.vbprojResolveAssemblyReference.cache -C:\Users\IP-Man\Documents\SharpDevelop Projects\Fake Hits Generator\Fake Hits Generator\obj\Debug\Fake_Hits_Generator.MainForm.resources -C:\Users\IP-Man\Documents\SharpDevelop Projects\Fake Hits Generator\Fake Hits Generator\obj\Debug\Fake Hits Generator.vbproj.GenerateResource.Cache -C:\Users\IP-Man\Documents\SharpDevelop Projects\Fake Hits Generator\Fake Hits Generator\obj\Debug\Fake Hits Generator.exe -C:\Users\IP-Man\Documents\SharpDevelop Projects\Fake Hits Generator\Fake Hits Generator\obj\Debug\Fake Hits Generator.pdb diff --git a/obj/Debug/Fake Hits Generator.vbproj.GenerateResource.Cache b/obj/Debug/Fake Hits Generator.vbproj.GenerateResource.Cache deleted file mode 100644 index 196f80b..0000000 Binary files a/obj/Debug/Fake Hits Generator.vbproj.GenerateResource.Cache and /dev/null differ diff --git a/obj/Debug/Fake Hits Generator.vbprojResolveAssemblyReference.cache b/obj/Debug/Fake Hits Generator.vbprojResolveAssemblyReference.cache deleted file mode 100644 index c25dd84..0000000 Binary files a/obj/Debug/Fake Hits Generator.vbprojResolveAssemblyReference.cache and /dev/null differ diff --git a/obj/Debug/Fake_Hits_Generator.MainForm.resources b/obj/Debug/Fake_Hits_Generator.MainForm.resources deleted file mode 100644 index 4607ffc..0000000 Binary files a/obj/Debug/Fake_Hits_Generator.MainForm.resources and /dev/null differ