Get Started With IP2Proxy .NET Module

Imports System.IO
Imports IP2Proxy

Dim proxy As New Component
Dim all As ProxyResult

Dim isproxy As Integer
Dim proxytype As String
Dim countryshort As String
Dim countrylong As String
Dim region As String
Dim city As String
Dim isp As String
Dim domain As String
Dim usagetype As String
Dim asn As String
Dim [as] As String
Dim lastseen As String
Dim threat As String
Dim provider As String
Dim fraudscore As String

Dim ip As String = "221.121.146.0"

If proxy.Open("C:\data\IP2PROXY-IP-PROXYTYPE-COUNTRY-REGION-CITY-ISP-DOMAIN-USAGETYPE-ASN-LASTSEEN-THREAT-RESIDENTIAL-PROVIDER-FRAUDSCORE.BIN", Component.IOModes.IP2PROXY_MEMORY_MAPPED) = 0 Then
	Console.WriteLine("GetModuleVersion: " & Component.GetModuleVersion())
	Console.WriteLine("GetPackageVersion: " & proxy.GetPackageVersion())
	Console.WriteLine("GetDatabaseVersion: " & proxy.GetDatabaseVersion())

	' reading all available fields
	all = proxy.GetAll(ip)
	Console.WriteLine("Is_Proxy: " & all.Is_Proxy.ToString())
	Console.WriteLine("Proxy_Type: " & all.Proxy_Type)
	Console.WriteLine("Country_Short: " & all.Country_Short)
	Console.WriteLine("Country_Long: " & all.Country_Long)
	Console.WriteLine("Region: " & all.Region)
	Console.WriteLine("City: " & all.City)
	Console.WriteLine("ISP: " & all.ISP)
	Console.WriteLine("Domain: " & all.Domain)
	Console.WriteLine("Usage_Type: " & all.Usage_Type)
	Console.WriteLine("ASN: " & all.ASN)
	Console.WriteLine("AS: " & all.AS)
	Console.WriteLine("Last_Seen: " & all.Last_Seen)
	Console.WriteLine("Threat: " & all.Threat)
	Console.WriteLine("Provider: " & all.Provider)
	Console.WriteLine("Fraud_Score: " & all.Fraud_Score)

	' reading individual fields
	isproxy = proxy.IsProxy(ip)
	Console.WriteLine("Is_Proxy: " & isproxy.ToString())

	proxytype = proxy.GetProxyType(ip)
	Console.WriteLine("Proxy_Type: " & proxytype)

	countryshort = proxy.GetCountryShort(ip)
	Console.WriteLine("Country_Short: " & countryshort)

	countrylong = proxy.GetCountryLong(ip)
	Console.WriteLine("Country_Long: " & countrylong)

	region = proxy.GetRegion(ip)
	Console.WriteLine("Region: " & region)

	city = proxy.GetCity(ip)
	Console.WriteLine("City: " & city)

	isp = proxy.GetISP(ip)
	Console.WriteLine("ISP: " & isp)

	domain = proxy.GetDomain(ip)
	Console.WriteLine("Domain: " & domain)

	usagetype = proxy.GetUsageType(ip)
	Console.WriteLine("Usage_Type: " & usagetype)

	asn = proxy.GetASN(ip)
	Console.WriteLine("ASN: " & asn)

	[as] = proxy.GetAS(ip)
	Console.WriteLine("AS: " & [as])

	lastseen = proxy.GetLastSeen(ip)
	Console.WriteLine("Last_Seen: " & lastseen)

	threat = proxy.GetThreat(ip)
	Console.WriteLine("Threat: " & threat)

	provider = proxy.GetProvider(ip)
	Console.WriteLine("Provider: " & provider)

	fraudscore = proxy.GetFraudScore(ip)
	Console.WriteLine("Fraud_Score: " & fraudscore)
Else
	Console.WriteLine("Error reading BIN file.")
End If
proxy.Close()

							
						

Imports System.IO
Imports IP2Proxy

Dim proxy As New Component
Dim all As ProxyResult

Dim isproxy As Integer
Dim proxytype As String
Dim countryshort As String
Dim countrylong As String
Dim region As String
Dim city As String
Dim isp As String
Dim domain As String
Dim usagetype As String
Dim asn As String
Dim [as] As String
Dim lastseen As String
Dim threat As String
Dim provider As String
Dim fraudscore As String

Dim ip As String = "221.121.146.0"

Using myStream = New FileStream("C:\data\IP2PROXY-IP-PROXYTYPE-COUNTRY-REGION-CITY-ISP-DOMAIN-USAGETYPE-ASN-LASTSEEN-THREAT-RESIDENTIAL-PROVIDER-FRAUDSCORE.BIN", FileMode.Open, FileAccess.Read, FileShare.Read)
	If proxy.Open(myStream) = 0 Then
		Console.WriteLine("GetModuleVersion: " & Component.GetModuleVersion())
		Console.WriteLine("GetPackageVersion: " & proxy.GetPackageVersion())
		Console.WriteLine("GetDatabaseVersion: " & proxy.GetDatabaseVersion())

		' reading all available fields
		all = proxy.GetAllAsync(ip).Result
		Console.WriteLine("Is_Proxy: " & all.Is_Proxy.ToString())
		Console.WriteLine("Proxy_Type: " & all.Proxy_Type)
		Console.WriteLine("Country_Short: " & all.Country_Short)
		Console.WriteLine("Country_Long: " & all.Country_Long)
		Console.WriteLine("Region: " & all.Region)
		Console.WriteLine("City: " & all.City)
		Console.WriteLine("ISP: " & all.ISP)
		Console.WriteLine("Domain: " & all.Domain)
		Console.WriteLine("Usage_Type: " & all.Usage_Type)
		Console.WriteLine("ASN: " & all.ASN)
		Console.WriteLine("AS: " & all.AS)
		Console.WriteLine("Last_Seen: " & all.Last_Seen)
		Console.WriteLine("Threat: " & all.Threat)
		Console.WriteLine("Provider: " & all.Provider)
		Console.WriteLine("Fraud_Score: " & all.Fraud_Score)

		' reading individual fields
		isproxy = proxy.IsProxyAsync(ip).Result
		Console.WriteLine("Is_Proxy: " & isproxy.ToString())

		proxytype = proxy.GetProxyTypeAsync(ip).Result
		Console.WriteLine("Proxy_Type: " & proxytype)

		countryshort = proxy.GetCountryShortAsync(ip).Result
		Console.WriteLine("Country_Short: " & countryshort)

		countrylong = proxy.GetCountryLongAsync(ip).Result
		Console.WriteLine("Country_Long: " & countrylong)

		region = proxy.GetRegionAsync(ip).Result
		Console.WriteLine("Region: " & region)

		city = proxy.GetCityAsync(ip).Result
		Console.WriteLine("City: " & city)

		isp = proxy.GetISPAsync(ip).Result
		Console.WriteLine("ISP: " & isp)

		domain = proxy.GetDomainAsync(ip).Result
		Console.WriteLine("Domain: " & domain)

		usagetype = proxy.GetUsageTypeAsync(ip).Result
		Console.WriteLine("Usage_Type: " & usagetype)

		asn = proxy.GetASNAsync(ip).Result
		Console.WriteLine("ASN: " & asn)

		[as] = proxy.GetASAsync(ip).Result
		Console.WriteLine("AS: " & [as])

		lastseen = proxy.GetLastSeenAsync(ip).Result
		Console.WriteLine("Last_Seen: " & lastseen)

		threat = proxy.GetThreatAsync(ip).Result
		Console.WriteLine("Threat: " & threat)

		provider = proxy.GetProviderAsync(ip).Result
		Console.WriteLine("Provider: " & provider)

		fraudscore = proxy.GetFraudScoreAsync(ip).Result
		Console.WriteLine("Fraud_Score: " & fraudscore)
	Else
		Console.WriteLine("Error reading BIN file.")
	End If
	proxy.Close()
End Using