創(chuàng)建PdfDocument類的對象，并通過PdfDocument.LoadFromFile(string filename)方法加載PDF文檔。
通過JavaScript語句設(shè)置過期時間，過期警告信息并關(guān)閉文檔等動作。
初始化PdfJavaScriptAction類的實例，并通過PdfDocument.AfterOpenAction屬性設(shè)置PDF打開后執(zhí)行JS語句命令。
最后，通過PdfDocument.SaveToFile(string filename, FileFormat fileFormat)方法保存PDF文檔到指定路徑。

實現(xiàn)代碼

C#

using Spire.Pdf;
using Spire.Pdf.Actions;

namespace SetExpiryDate
{
    class Program
    {
        static void Main(string[] args)
        {
            //創(chuàng)建PdfDocument類的對象，并加載PDF文檔
            PdfDocument pdf = new PdfDocument();
            pdf.LoadFromFile("test.pdf");

            //通過JavaScript設(shè)置過期時間，過期警告信息并關(guān)閉文檔
            string javaScript = "var rightNow = new Date();"
                    + "var endDate = new Date('June 20, 2021 23:59:59');"
                    + "if(rightNow.getTime() > endDate) {"
                    + "app.alert('該文檔已過期。請聯(lián)系管理人員獲取最新文檔！',1);"
                    + "this.closeDoc(); }";

            //根據(jù)JS創(chuàng)建PdfJavaScriptAction 
            PdfJavaScriptAction js = new PdfJavaScriptAction(javaScript);

            //將PdfJavaScriptAction設(shè)置為文檔打開后的動作
            pdf.AfterOpenAction = js;

            //保存文檔
            pdf.SaveToFile("SetExpiryDate.pdf", FileFormat.PDF);
        }
    }
}

VB.NET

Imports Spire.Pdf
Imports Spire.Pdf.Actions

Namespace SetExpiryDate
    Class Program
        Private Shared Sub Main(args As String())
            '創(chuàng)建PdfDocument類的對象，并加載PDF文檔
            Dim pdf As New PdfDocument()
            pdf.LoadFromFile("test.pdf")

            '通過JavaScript設(shè)置過期時間，過期警告信息并關(guān)閉文檔
            Dim javaScript As String = "var rightNow = new Date();" + "var endDate = new Date('June 20, 2021 23:59:59');" + "if(rightNow.getTime() > endDate) {" + "app.alert('該文檔已過期。請聯(lián)系管理人員獲取最新文檔！',1);" + "this.closeDoc(); }"

            '根據(jù)JS創(chuàng)建PdfJavaScriptAction 
            Dim js As New PdfJavaScriptAction(javaScript)

            '將PdfJavaScriptAction設(shè)置為文檔打開后的動作
            pdf.AfterOpenAction = js

            '保存文檔
            pdf.SaveToFile("SetExpiryDate.pdf", FileFormat.PDF)
        End Sub
    End Class
End Namespace