<div dir="ltr">Edwin,<div style>I will share the Excel file with macro in a separate email. Here is the VBA script that runs when a textbox object is clicked (the button). It processes only one row currently. If you understand this script, it shouldn't be too hard to add a loop to process all the rows. I haven't gotten there myself since I am still working out some details of my markup for the first row.</div>
<div style><br></div><div style>The script below will create a file called Test.HelloWorld. It displays "Hello World" and then does a pagelist of the group Test. Here is what is creates:</div><div style><div>version=pmwiki-2.2.51 urlencoded=1</div>
<div>text=%0aHello World!%0a(:pagelist group=Test:)%0a</div><div style><br></div><div style>The spreadsheet has this information:</div><div style><div>row3= PageName<span style="white-space:pre"> </span>Content Markup Example: Pagelist group</div>
<div>row4= Test.HelloWorld Hello World! Test</div><div><br></div><div style>The page is here: <a href="http://ediblelandscape.org/pmwiki.php?n=Test.HelloWorld">http://ediblelandscape.org/pmwiki.php?n=Test.HelloWorld</a></div>
</div></div><div style>-Mark</div><div style><br></div><div style><div>Sub TextBox2_Click()</div><div> FilePath = ThisWorkbook.Path & "\" & Cells(4, 1).Value</div><div> </div><div> 'Get an unused file number</div>
<div> FileNumber = FreeFile</div><div> </div><div> 'Create a new file (or overwrite an existing one)</div><div> Open FilePath For Output As #FileNumber</div><div> </div><div> 'Header for markup content</div>
<div> StringOut = "version=pmwiki-2.2.51 urlencoded=1"</div><div> Print #FileNumber, StringOut</div><div> StringOut = "text=%0a"</div><div> Print #FileNumber, StringOut; 'suppress newline with ";"</div>
<div><br></div><div> StringOut = Cells(4, 2).Value 'hello world cell</div><div> Print #FileNumber, StringOut; 'suppress newline with ";"</div><div> </div><div> StringOut = "%0a" 'newline</div>
<div> Print #FileNumber, StringOut; 'suppress newline with ";"</div><div> </div><div> StringOut = "(:pagelist group=" & Cells(4, 3).Value & ":)"</div><div> Print #FileNumber, StringOut; 'suppress newline with ";"</div>
<div> </div><div> StringOut = "%0a" 'newline</div><div> Print #FileNumber, StringOut; 'suppress newline with ";"</div><div> </div><div> MsgBox ("done")</div><div> </div>
<div> 'Close the file</div><div> Close #FileNumber</div><div>End Sub</div><div><br></div><div style>-Mark</div></div></div><div class="gmail_extra"><br><br><div class="gmail_quote">On Sun, Jun 2, 2013 at 8:25 AM, Edwin Marte <span dir="ltr"><<a href="mailto:edwin.marte@leidba.com" target="_blank">edwin.marte@leidba.com</a>></span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr">Ok, Thanks! <div><br></div><div>Actually I would like a sample of both if possible so I can Analyze the code and then change it to fit my needs.</div>
<div><br></div><div>Regards,</div><div>Edwin</div><div><br>
</div><div><br></div></div><div class="HOEnZb"><div class="h5"><div class="gmail_extra"><br><br><div class="gmail_quote">On Sun, Jun 2, 2013 at 10:02 AM, Mark Lee <span dir="ltr"><<a href="mailto:mark.lee.phd@gmail.com" target="_blank">mark.lee.phd@gmail.com</a>></span> wrote:<br>
<blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div dir="ltr"><div><div>Edwin,<br></div>Sure, I can share my script. Are you interested in the VBA code, or would you like an example spreadsheet that runs the script?<span><font color="#888888"><br>
</font></span></div><span><font color="#888888">-Mark<br></font></span></div><div><div><div class="gmail_extra"><br>
<br><div class="gmail_quote">On Sat, Jun 1, 2013 at 3:10 PM, Edwin Marte <span dir="ltr"><<a href="mailto:edwin.marte@leidba.com" target="_blank">edwin.marte@leidba.com</a>></span> wrote:<br><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
<div dir="ltr">Hello Mark! Very nice implementation!<div><br></div><div> Any chance that you could share your script, for a long time I have been waiting for such a script to keep track of my parts both locally and pmwiki.</div>
<div><br></div><div>Regards,</div><div>Edwin </div></div><div class="gmail_extra"><br><br><div class="gmail_quote"><div><div>On Sat, Jun 1, 2013 at 3:54 PM, Tamara Temple <span dir="ltr"><<a href="mailto:tamouse.lists@gmail.com" target="_blank">tamouse.lists@gmail.com</a>></span> wrote:<br>
</div></div><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><div><div>Mark Lee <<a href="mailto:mark.lee.phd@gmail.com" target="_blank">mark.lee.phd@gmail.com</a>> wrote:<br>
> Thank you Tamara. The following does just what I am looking for.<br>
<br>
Quite welcome, I'm sure.<br>
<br>
> I also realized that the symbol % needs to be replaced by the hex code %25.<br>
> I am well on my way to mapping my page content to pmwiki pages. Here is an example page that I<br>
> just put together using a text editor.<br>
<br>
Again, the import recipe I described earlier is ace if you have a lot of<br>
pages to convert at once. Generate the plain text files locally, ftp<br>
them up to an import directory, then run the import script and done. No<br>
need to worry about converting newlines to %0a, percent to %25, and less<br>
than (<) to %3c.<br>
<br>
> <a href="http://ediblelandscape.org/pmwiki.php?n=Plants.Plant167" target="_blank">http://ediblelandscape.org/pmwiki.php?n=Plants.Plant167</a><br>
<br>
*VERY* nicely designed site!<br>
<br>
> In that example, a cell in my spreadsheet contained the species name "Rosa woodsii". I have a<br>
> script written in VBA (Excel spreadsheet) that writes this to a text file<br>
> %0a(:Species: Rosa woodsii:)%0a<br>
> Each row in my spreadsheet contains the content for each page. Each cell is assigned to a<br>
> PageTextVariable, and each of these goes to the location on the page I previously defined in the<br>
> page template for the skin. With a click of a button, I can generate all the pages for my site,<br>
> and with a few more clicks the pages are uploaded to my site via ftp. A simple Content<br>
> Management System using a spreadsheet and FileZilla. I really like PMWiki, but I like the<br>
> ability to backup the content of the site in form that is independent of PMWiki and is portable<br>
> between different platforms.<br>
<br>
Do not disagree with any of that, it's just a unique (to me) way of<br>
using PmWiki as a publishing system. Perfectly valid, wonderful use of<br>
PmWiki!<br>
<br>
<br>
<br></div></div>
_______________________________________________<br>
pmwiki-users mailing list<br>
<a href="mailto:pmwiki-users@pmichaud.com" target="_blank">pmwiki-users@pmichaud.com</a><br>
<a href="http://www.pmichaud.com/mailman/listinfo/pmwiki-users" target="_blank">http://www.pmichaud.com/mailman/listinfo/pmwiki-users</a><br>
</blockquote></div><br></div>
</blockquote></div><br></div>
</div></div><br>_______________________________________________<br>
pmwiki-users mailing list<br>
<a href="mailto:pmwiki-users@pmichaud.com" target="_blank">pmwiki-users@pmichaud.com</a><br>
<a href="http://www.pmichaud.com/mailman/listinfo/pmwiki-users" target="_blank">http://www.pmichaud.com/mailman/listinfo/pmwiki-users</a><br>
<br></blockquote></div><br></div>
</div></div></blockquote></div><br></div>