how to print page number like this – 1 of n – using vsprinter8

Hello,

I’m using vsprinter 8.0 (latest version) and I want to print the page numbers like this:

1 of n (n is the total number of pages).

I don’t want to use pagefooter property because I want to print it into a specific location on each page:

I tried this:

With vsp
        .StartDoc
        
        .Text = "Page one"
        
        .CurrentX = "10 cm"
        .CurrentY = "3 cm"
        .Text = .CurrentPage & " of " & .PageCount
        
        .NewPage
        
        .Text = "Page two"
        
        .CurrentX = "10 cm"
        .CurrentY = "3 cm"
        .Text = .CurrentPage & " of " & .PageCount
        
        .EndDoc
    End With

But I got -1 of 1- in the first page despite -1 of 2-

Can you please help me to accomplish this task ?

Thanks