mirror of
https://github.com/P3D-Legacy/P3D-Legacy.git
synced 2025-07-19 11:54:55 +02:00
Removed unused ChannelClient and ChannelManager
This commit is contained in:
parent
76e29f7e5f
commit
77941acc0e
@ -183,8 +183,6 @@
|
|||||||
<Compile Include="Network\DownloadTexture2D.vb" />
|
<Compile Include="Network\DownloadTexture2D.vb" />
|
||||||
<Compile Include="Network\GameJolt\API.vb" />
|
<Compile Include="Network\GameJolt\API.vb" />
|
||||||
<Compile Include="Network\GameJolt\APICall.vb" />
|
<Compile Include="Network\GameJolt\APICall.vb" />
|
||||||
<Compile Include="Network\GameJolt\ChannelClient.vb" />
|
|
||||||
<Compile Include="Network\GameJolt\ChannelManager.vb" />
|
|
||||||
<Compile Include="Network\GameJolt\GameJoltStatistics.vb" />
|
<Compile Include="Network\GameJolt\GameJoltStatistics.vb" />
|
||||||
<Compile Include="Network\GameJolt\GTS\GTSInboxScreen.vb" />
|
<Compile Include="Network\GameJolt\GTS\GTSInboxScreen.vb" />
|
||||||
<Compile Include="Network\GameJolt\GTS\GTSMainScreen.vb" />
|
<Compile Include="Network\GameJolt\GTS\GTSMainScreen.vb" />
|
||||||
|
@ -1,67 +0,0 @@
|
|||||||
Imports System.Linq
|
|
||||||
Imports System
|
|
||||||
Imports System.Collections.Generic
|
|
||||||
Imports System.Text
|
|
||||||
Imports System.Threading.Tasks
|
|
||||||
Imports System.IO
|
|
||||||
Imports System.Net
|
|
||||||
Imports System.ComponentModel
|
|
||||||
Imports System.Security.Cryptography
|
|
||||||
|
|
||||||
Namespace GameJolt
|
|
||||||
|
|
||||||
Public Class ChannelClient
|
|
||||||
|
|
||||||
Dim Prev As Integer = 0
|
|
||||||
Dim Port As String = ""
|
|
||||||
Dim Channel As String = ""
|
|
||||||
Dim SID As String = ""
|
|
||||||
|
|
||||||
Dim t As Threading.Thread
|
|
||||||
|
|
||||||
'Public Sub New(ByVal Port As String, ByVal Channel As String)
|
|
||||||
|
|
||||||
|
|
||||||
' Using Client = New WebClient()
|
|
||||||
' Client.Credentials = New NetworkCredential("username", "password")
|
|
||||||
' AddHandler Client.OpenReadCompleted, Function(sender, e) As Object
|
|
||||||
' Using reader As StreamReader = New StreamReader(e.result)
|
|
||||||
' While True
|
|
||||||
' MsgBox(reader.ReadLine())
|
|
||||||
' End While
|
|
||||||
' End Using
|
|
||||||
' Return Nothing
|
|
||||||
' End Function
|
|
||||||
' Client.OpenReadAsync(New Uri("http://api-01.gamejolt.com:7001/subscribe?game_id=" & ChannelManager.GameID & "&channel=" & Channel, System.UriKind.Absolute))
|
|
||||||
' End Using
|
|
||||||
|
|
||||||
' System.Threading.Thread.Sleep(10000)
|
|
||||||
'End Sub
|
|
||||||
|
|
||||||
Public Sub New(ByVal Port As String, ByVal Channel As String)
|
|
||||||
Me.Port = Port
|
|
||||||
Me.Channel = Channel
|
|
||||||
|
|
||||||
Dim request As HttpWebRequest = CType(WebRequest.Create(New Uri("http://api-01.gamejolt.com:7001/subscribe?game_id=" & ChannelManager.GameID & "&channel=" & Channel, System.UriKind.Absolute)), HttpWebRequest)
|
|
||||||
request.Method = "POST"
|
|
||||||
request.BeginGetRequestStream(AddressOf GetResponse, request)
|
|
||||||
request.KeepAlive = True
|
|
||||||
|
|
||||||
System.Threading.Thread.Sleep(10000)
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
Private Sub GetResponse(ByVal result As IAsyncResult)
|
|
||||||
Logger.Debug("LOL")
|
|
||||||
If result.IsCompleted Then
|
|
||||||
Dim request As HttpWebRequest = CType(result.AsyncState, HttpWebRequest)
|
|
||||||
|
|
||||||
Dim data As String = New StreamReader(request.EndGetResponse(result).GetResponseStream()).ReadToEnd()
|
|
||||||
|
|
||||||
'random data management
|
|
||||||
MsgBox(data)
|
|
||||||
End If
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
End Class
|
|
||||||
|
|
||||||
End Namespace
|
|
@ -1,19 +0,0 @@
|
|||||||
Namespace GameJolt
|
|
||||||
|
|
||||||
Public Class ChannelManager
|
|
||||||
|
|
||||||
Public Shared GameID As String = "" ' CLASSIFIED
|
|
||||||
Public Shared host As String = "http://api-01.gamejolt.com"
|
|
||||||
Public Shared totalResponses As Integer = 0
|
|
||||||
|
|
||||||
Public Sub New()
|
|
||||||
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
Public Sub Update()
|
|
||||||
|
|
||||||
End Sub
|
|
||||||
|
|
||||||
End Class
|
|
||||||
|
|
||||||
End Namespace
|
|
Loading…
x
Reference in New Issue
Block a user