|
Chilkat • HOME • Android™ • AutoIt • C • C# • C++ • Chilkat2-Python • CkPython • Classic ASP • DataFlex • Delphi DLL • Go • Java • Node.js • Objective-C • PHP Extension • Perl • PowerBuilder • PowerShell • PureBasic • Ruby • SQL Server • Swift • Tcl • Unicode C • Unicode C++ • VB.NET • VBScript • Visual Basic 6.0 • Visual FoxPro • Xojo Plugin
(Lianja) Example: Http.ExtractMetaRefreshUrl methodDemonstrates the
llSuccess = .F. loHttp = createobject("CkHttp") // Sample HTML with a META refresh. // <!DOCTYPE html> // <html lang="en"> // <head> // <meta charset="utf-8" /> // <meta http-equiv="refresh" content="5; url=https://example.com" /> // <title>Meta Refresh Redirect</title> // </head> // <body> // <p>Redirecting to example.com in 5 seconds�</p> // </body> // </html> loSb = createobject("CkStringBuilder") llBCrlf = .T. loSb.AppendLine("<!DOCTYPE html>",llBCrlf) loSb.AppendLine('<html lang="en">',llBCrlf) loSb.AppendLine("<head>",llBCrlf) loSb.AppendLine(' <meta charset="utf-8" />',llBCrlf) loSb.AppendLine(' <meta http-equiv="refresh" content="5; url=https://example.com" />',llBCrlf) loSb.AppendLine(" <title>Meta Refresh Redirect</title>",llBCrlf) loSb.AppendLine("</head>",llBCrlf) loSb.AppendLine("<body>",llBCrlf) loSb.AppendLine(" <p>Redirecting to example.com in 5 seconds�</p>",llBCrlf) loSb.AppendLine("</body>",llBCrlf) loSb.AppendLine("</html>",llBCrlf) lcUrl = loHttp.ExtractMetaRefreshUrl(loSb.GetAsString()) if (loHttp.LastMethodSuccess = .F.) then ? "The HTML has no META refresh tag." else ? "META refresh URL: " + lcUrl endif release loHttp release loSb |
||||
© 2000-2025 Chilkat Software, Inc. All Rights Reserved.