If you want a quick and easy way to add a required functionality into your application then check this sample source code documentation. ByteScout Cloud API Server was designed to assist PDF splitting API in VB.NET. ByteScout Cloud API Server is the ready to deploy Web API Server that can be deployed in less than thirty minutes into your own in-house Windows server (no Internet connnection is required to process data!) or into private cloud server. Can store data on in-house local server based storage or in Amazon AWS S3 bucket. Processing data solely on the server using built-in ByteScout powered engine, no cloud services are used to process your data!.
This simple and easy to understand sample source code in VB.NET for ByteScout Cloud API Server contains different functions and options you should do calling the API to implement PDF splitting API. Follow the tutorial and copy – paste code for VB.NET into your project’s code editor. Check VB.NET sample code examples to see if they respond to your needs and requirements for the project.
Our website provides free trial version of ByteScout Cloud API Server that gives source code samples to assist with your VB.NET project.
On-demand (REST Web API) version:
Web API (on-demand version)
On-premise offline SDK for Windows:
60 Day Free Trial (on-premise)
Imports System.IO
Imports System.Net
Imports Newtonsoft.Json.Linq
' Please NOTE: In this sample we're assuming Cloud Api Server is hosted at "https://localhost".
' If it's not then please replace this with with your hosting url.
Module Module1
' Source PDF file to split
Const SourceFileUrl As String = "https://bytescout-com.s3.amazonaws.com/files/demo-files/cloud-api/pdf-split/sample.pdf"
' Comma-separated list of page numbers (or ranges) to process. Example: '1,3-5,7-'.
const Pages as String = "1-2,3-"
Sub Main()
' Create standard .NET web client instance
Dim webClient As WebClient = New WebClient()
' Prepare URL for `Split PDF` API call
Dim query As String = Uri.EscapeUriString(String.Format(
"https://localhost/pdf/split?pages={0}&url={1}",
Pages,
SourceFileUrl))
Try
' Execute request
Dim response As String = webClient.DownloadString(query)
' Parse JSON response
Dim json As JObject = JObject.Parse(response)
If json("error").ToObject(Of Boolean) = False Then
' Download generated PDF files
Dim part As Integer = 1
For Each token As JToken In json("urls")
Dim resultFileUrl As string = token.ToString()
Dim localFileName As String = String.Format(".\part{0}.pdf", part)
webClient.DownloadFile(resultFileUrl, localFileName)
Console.WriteLine("Downloaded ""{0}"".", localFileName)
part = part + 1
Next
Else
Console.WriteLine(json("message").ToString())
End If
Catch ex As WebException
Console.WriteLine(ex.ToString())
End Try
webClient.Dispose()
Console.WriteLine()
Console.WriteLine("Press any key...")
Console.ReadKey()
End Sub
End Module
60 Day Free Trial or Visit ByteScout Cloud API Server Home Page
Explore ByteScout Cloud API Server Documentation
Explore Samples
Sign Up for ByteScout Cloud API Server Online Training
Get Your API Key
Explore Web API Docs
Explore Web API Samples
<?xml version="1.0" encoding="utf-8"?>
<packages>
<package id="Newtonsoft.Json" version="10.0.3" targetFramework="net40" />
</packages>
60 Day Free Trial or Visit ByteScout Cloud API Server Home Page
Explore ByteScout Cloud API Server Documentation
Explore Samples
Sign Up for ByteScout Cloud API Server Online Training
Get Your API Key
Explore Web API Docs
Explore Web API Samples
60 Day Free Trial or Visit ByteScout Cloud API Server Home Page
Explore ByteScout Cloud API Server Documentation
Explore Samples
Sign Up for ByteScout Cloud API Server Online Training
Get Your API Key
Explore Web API Docs
Explore Web API Samples