https - VB6: Downloading files from Sharepoint 365 -


my work migrated sharepoint 2010 sharepoint 365. i've made many tools download files directly sharepoint directories. apparently download code (and other code download online file) no longer works. here's code i've used in past:

function download_file(byval vwebfile string, byval vlocalfile string, lfilesize long) boolean '   code taken from: http://stackoverflow.com/questions/12815142/vba-download-and-save-in-c-user '   on 2013-06-19     dim strheader variant     dim oxmlhttp object, long, vff long, oresp() byte      on error resume next  debug.print "download_file: stage 1"     'you can set ref. microsoft xml, , dim oxmlhttp msxml2.xmlhttp     set oxmlhttp = createobject("msxml2.xmlhttp"): me.repaint: debug.print time$: doevents     oxmlhttp.open "get", vwebfile, false: me.repaint: debug.print time$: doevents 'open socket website     oxmlhttp.send: me.repaint: debug.print time$: doevents 'send request  debug.print "download_file: stage 2"     'wait request finish     while oxmlhttp.readystate <> 4         doevents     loop  debug.print "download_file: stage 3"     strheader = oxmlhttp.getallresponseheaders     if instr(1, strheader, "content-length:") > 1         lfilesize = clng(mid(strheader, instr(1, strheader, "content-length:") + 16, instr(1, strheader, "content-type:") - (instr(1, strheader, "content-length:") + 16)))     end if  debug.print "download_file: stage 4"     oresp = oxmlhttp.responsebody 'returns results byte array  debug.print "download_file: stage 5"     'create local file , save results     vff = freefile     if dir(vlocalfile) <> "" kill vlocalfile     open vlocalfile binary #vff     put #vff, , oresp     close #vff  debug.print "download_file: stage 6"     'clear memory     set oxmlhttp = nothing  debug.print "download_file: stage end"  end function

the issue i'm able download a file, it's not right size. maybe it's container has correct file name? 1 possible issue we're using secure http while before standard http.

using sharepoint-provided "download link" not work either. 365 issue or https issue?

thanks!


Comments

Post a Comment

Popular posts from this blog

javascript - Create a stacked percentage column -

i have collection of data : var data = [ {"p301a":"10","p301b":"7","p301c":"7","p301d":"3","p301e":"8","p301f":"8","p301g":"8","p301h":"8","p301i":"8","p301j":"8","p301k":"8","p301l":"8","p301m":"8","p301n":"8","p301o":"8","age":"31-40 years","profesion":"2","position":"2"}, {"p301a":"5","p301b":"4","p301c":"4","p301d":"4","p301e":"4","p301f":"4","p301g":"4","p301h":"4","p301i":"4","p301j":"4","p301k":"4...
Read more

Optimising Firebase database by automatically overwriting data -

in firebase app have following structure: posts latest all users can write posts > latest . want limit entries 20 posts save space in database. , posts beyond 20 unnecessary never shown on homepage. how can limit posts 20, when user writes posts > latest posts @ end drop off (be deleted) automatically? this sample should you. you need : const max_log_count = 20; exports.removeold = functions.database.ref('/posts/latest/{postid}').oncreate(event => { const parentref = event.data.ref.parent; return parentref.once('value').then(snapshot => { if (snapshot.numchildren() >= max_log_count) { let childcount = 0; const updates = {}; snapshot.foreach(function(child) { if (++childcount <= snapshot.numchildren() - max_log_count) { updates[child.key] = null; } }); // update parent. removes children. ...
Read more

javascript - Angular UI-Grid customTemplate directive causing rows to load slowly/? -

Image
each grid cell can have more 1 customtemplate loaded. have directive holds watcher on model_col_field listen cell updates on scroll when dom rows updated , recompile celltemplate . without watcher , $compile rows repeat on scroll, showing same set of rows. is there more angular way of approaching or way improve performance? relevant controller code: create gridoptions.data & gridoptions.columndefs : var customtemp = '<div ng-repeat="opt in grid.appscope.colvalueoptionsmodel" ng-init="tempstring=model_col_field.clazz+opt.key;"><comparison-directive dbo="model_col_field" attobj="opt" fff="grid.appscope.getattributetemplate(tempstring)" /></div>'; $scope.gridoptions.columndefs = [ { name:'yindex',pinnedleft:true,celltemplate: customtemp, displayname:'index'}, { name:'col1',celltemplate: customtemp}, { name:'col2',celltemplate: c...
Read more