|
Chilkat • HOME • .NET Core C# • Android™ • AutoIt • C • C# • C++ • Chilkat2-Python • CkPython • Classic ASP • DataFlex • Delphi ActiveX • Delphi DLL • Go • Java • Lianja • Mono C# • Node.js • Objective-C • PHP ActiveX • PHP Extension • Perl • PowerBuilder • PowerShell • PureBasic • Ruby • SQL Server • Swift 2 • Swift 3,4,5... • Tcl • Unicode C • Unicode C++ • VB.NET • VBScript • Visual Basic 6.0 • Visual FoxPro • Xojo Plugin
(Classic ASP) SharePoint -- Get Files in Documents FolderSee more SharePoint ExamplesGets the list of files that exist in the /Documents folder.
<html> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8"> </head> <body> <% ' This requires the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. ' ------------------------------------------------------------------------- ' The following comments apply to SharePoint Windows classic authentication. ' ------------------------------------------------------------------------- ' For example, imagine our SharePoint endpoint is https://xyzoffice.mycompany.com/ ' The SHAREPOINT_NTLM_DOMAIN would be "mycompany.com" ' The SHAREPOINT_HTTPS_DOMAIN would be "xyzoffice.mycompany.com" ' Also, the SHAREPOINT_USERNAME would be just the name, not a full email address. ' for example, "chilkat" instead of "chilkat@mycompany.com" ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.Http") set http = Server.CreateObject("Chilkat.Http") ' If SharePoint Windows classic authentication is used, then set the ' Login, Password, LoginDomain, and NtlmAuth properties. http.Login = "SHAREPOINT_USERNAME" http.Password = "SHAREPOINT_PASSWORD" http.LoginDomain = "SHAREPOINT_NTLM_DOMAIN" http.NtlmAuth = 1 ' ------------------------------------------------------------------------- ' The more common case is to use SharePoint Online authentication (via the SPOIDCRL cookie). ' If so, do not set Login, Password, LoginDomain, and NtlmAuth, and instead ' establish the cookie as shown at SharePoint Online Authentication ' ------------------------------------------------------------------------- ' Indicate that we want a JSON reply http.Accept = "application/json;odata=verbose" http.AcceptCharset = "utf-8" ' If your Sharepoint site is within a site collection, then use "https://SHAREPOINT_HTTPS_DOMAIN/sites/teamA/_api/web/GetFolderByServerRelativeUrl('/sites/teamA/Documents')/Files" where "teamA" is the name of the site. ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.StringBuilder") set sbJson = Server.CreateObject("Chilkat.StringBuilder") success = http.QuickGetSb("https://SHAREPOINT_HTTPS_DOMAIN/_api/web/GetFolderByServerRelativeUrl('/Documents')/Files",sbJson) If (success <> 1) Then Response.Write "<pre>" & Server.HTMLEncode( http.LastErrorText) & "</pre>" Response.End End If ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.JsonObject") set json = Server.CreateObject("Chilkat.JsonObject") success = json.LoadSb(sbJson) ' Iterate over the results and get each file's name, size, and last-modified date/time. numFiles = json.SizeOfArray("d.results") Response.Write "<pre>" & Server.HTMLEncode( "Number of Files in the SharePoint /Documents folder = " & numFiles) & "</pre>" ' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.CkDateTime") set lastMod = Server.CreateObject("Chilkat.CkDateTime") bLocal = 1 i = 0 Do While i < numFiles json.I = i filename = json.StringOf("d.results[i].Name") fileRelativeUri = json.StringOf("d.results[i].ServerRelativeUrl") fileSize = json.IntOf("d.results[i].Length") sLastModified = json.StringOf("d.results[i].TimeLastModified") Response.Write "<pre>" & Server.HTMLEncode( i + 1 & ": " & filename) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( " Relative URI: " & fileRelativeUri) & "</pre>" Response.Write "<pre>" & Server.HTMLEncode( " Size in Bytes: " & fileSize) & "</pre>" ' Show the last-modified date/time in the local timezone. success = lastMod.SetFromTimestamp(sLastModified) ' dt is a Chilkat.DtObj Set dt = lastMod.GetDtObj(bLocal) Response.Write "<pre>" & Server.HTMLEncode( " Last-Modified: " & dt.Day & "/" & dt.Month & "/" & dt.Year _ & " " & dt.Hour & ":" & dt.Minute) & "</pre>" i = i + 1 Loop ' The output of this program when I tested it: ' Number of Files in the SharePoint /Documents folder = 13 ' 1: VCAC_DISA_brief_8_13_16.pdf ' Relative URI: /Documents/VCAC_DISA_brief_8_13_16.pdf ' Size in Bytes: 5571942 ' Last-Modified: 14/8/2016 21:32 ' 2: Test Procedure Self-Registration Kiosk.docx ' Relative URI: /Documents/Test Procedure Self-Registration Kiosk.docx ' Size in Bytes: 26568 ' Last-Modified: 16/1/2017 10:46 ' 3: VCAC_Architecture_Brief_8_29_15.pptx ' Relative URI: /Documents/VCAC_Architecture_Brief_8_29_15.pptx ' Size in Bytes: 28756136 ' Last-Modified: 17/3/2016 15:32 ' 4: D42_Device_70_IP.xlsx ' Relative URI: /Documents/D42_Device_70_IP.xlsx ' Size in Bytes: 17060 ' Last-Modified: 14/3/2016 21:22 ' 5: Domain Name created for Exchange.docx ' Relative URI: /Documents/Domain Name created for Exchange.docx ' Size in Bytes: 80651 ' Last-Modified: 16/1/2017 11:8 ' 6: VCAC_Architecture_Brief_8_29_15.pdf ' Relative URI: /Documents/VCAC_Architecture_Brief_8_29_15.pdf ' Size in Bytes: 5814495 ' Last-Modified: 17/3/2016 15:30 ' 7: D42_Device_70_IP223.xlsx ' Relative URI: /Documents/D42_Device_70_IP223.xlsx ' Size in Bytes: 17109 ' Last-Modified: 16/1/2017 12:1 ' 8: image_VCAC.png ' Relative URI: /Documents/image_VCAC.png ' Size in Bytes: 4825795 ' Last-Modified: 21/3/2016 14:13 ' 9: FRC_Summit_brief.pdf ' Relative URI: /Documents/FRC_Summit_brief.pdf ' Size in Bytes: 2202216 ' Last-Modified: 14/8/2016 21:31 ' 10: VCAC_RA_Design.docx ' Relative URI: /Documents/VCAC_RA_Design.docx ' Size in Bytes: 32278 ' Last-Modified: 15/1/2017 22:44 ' 11: VCAC_PEO_EIS_Brief_3_23_16.pdf ' Relative URI: /Documents/VCAC_PEO_EIS_Brief_3_23_16.pdf ' Size in Bytes: 7239114 ' Last-Modified: 22/3/2016 17:50 ' 12: VCAC-document.docx ' Relative URI: /Documents/VCAC-document.docx ' Size in Bytes: 21082 ' Last-Modified: 15/1/2017 22:44 ' 13: Engineering_Drawing (sample).jpg ' Relative URI: /Documents/Engineering_Drawing (sample).jpg ' Size in Bytes: 97638 ' Last-Modified: 22/3/2016 17:51 %> </body> </html> |
||||
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.