Finally we save the first four pages of the document in png
format.
for (int i = 1; i <= 4; i++) {
doc.PageNumber = i;
doc.Rect.String = doc.CropBox.String;
doc.Rendering.Save(Server.MapPath("shuttle_p" + i.ToString() + ".png"));
}
Dim i As Integer = 1
While i <= 4
doc.PageNumber = i
doc.Rect.String = doc.CropBox.[String]
doc.Rendering.Save(Server.MapPath("shuttle_p" + i.ToString() + ".png"))
System.Math.Max(System.Threading.Interlocked.Increment(i),i - 1)
End While