Loading ...
Sorry, an error occurred while loading the content.

Re: Images to HTML clip

Expand Messages
  • Sheri
    Hi Mike, Seems you failed to have a space between one of your clip commands and its parameters, so your clip seems to be is trying to run a program by that
    Message 1 of 3 , May 7, 2006
    • 0 Attachment
      Hi Mike,

      Seems you failed to have a space between one of your clip commands
      and its parameters, so your clip seems to be is trying to run a
      program by that name.

      ^!InsertHtml</BODY>^P</HTML>^P

      Regards,
      Sheri


      --- In ntb-clips@yahoogroups.com, Mike Breiding <gwlist@...> wrote:
      >
      >
      > Greetings,
      >
      > Below is the Images to HTML clip I have modified to my liking. (
      See:
      > http://mbreiding.us/hosta_id/ )
      > When ever I run the clip I get a flash of the black DOS box and
      then the
      > page is generated.
      > Apparently without errors.
      > Is this normal or have i introduced a error into the clip.
      >
      > I am running XP Pro SP2.
      >
      > Thanks,
      > -Mike
      > -------------------------------------
      > ImagestoHTML
      >
      > ;This Clip will create a web page based on all the images that
      match the
      > specified criteria. You can then easily preview all the images in
      your
      > favorite browser
      >
      > ;Prompt user with Clip wizard to determine which image files should
      be
      > listed and how the page should be built
      >
      > ^!Set %PageTitle%=^?{Page title=Images}; %FileName%=^?{Web page
      file name
      > (no path or extension)=Images}; %Directory%=^?{(T=D)Directory to
      search};
      > %Specs%=^?{File Specs=*.gif;*.png;*.jpg}; %Sorting%=^?{(T=C)File
      > sorting==Unsorted|_Name|Type|Date|Size}; %Reverse%=^?{(T=C)
      Descending
      > order==Yes^=Rev|_No^=}
      >
      > ;End procedure if the user canceled the Clip wizard
      > ^!IfCancel Exit
      >
      > ^!SetPasteIndent Off
      > ;Set variable for sorting parameter
      > ^!Set %Sorting%=^%Reverse%^%Sorting%
      > ;Close the output file if there is one open in NoteTab
      > ^!Close "^%Directory%^%FileName%.htm"
      > ;Create a new document with specified name for web page
      > ^!Set %KeepNameFormat%=^$GetNameFormat$
      > ^!SetNameFormat ^%Directory%^%FileName%.htm
      > ^!ToolBar New Document
      > ^!SetNameFormat ^%KeepNameFormat%
      > ;Turn word wrap off
      > ^!SetWordWrap OFF
      > ;Insert web page header and title
      > ^!InsertHtml <HTML>^P<HEAD>^P<TITLE>^%PageTitle%</TITLE>^P<style
      > type="text/css">H1 {margin-bottom: 0px} H2 {margin-top: 0px}p {text
      align:
      > left; margin-top: 0px; font: 100%/1.3 Georgia,'Times New
      > Roman',Times,serif} #image img {padding:0px; border: solid #000 1px}
      #image
      > {margin-bottom: 40px}div#footer
      > {clear:both;color:#fff;background:#96A274;border:none;font:90%
      Georgia,
      > "Times New Roman", Times, serif;margin:0 auto;padding:10px
      > 0;text-align:center;width:100%;}div#footer a:link, div#footer
      > a:visited{color:#FFF;margin:0;padding: 0;padding-left: 3px; padding-
      right:
      > 6px}div#footer a:hover {color:#000;margin:0;padding: 0;padding-
      left: 3px;
      > padding-right: 6px}</style></HEAD>^P<BODY>^P<CENTER>^P^p<div
      > id="wrapper">^p^p<div
      > id="title">^p<h1>Title</h1>^p<h2>SubTitle</h2>^p</div>^p<div
      id="main">
      > ;Retrieve first image name that matches specified search criteria
      > ^!Set %ImageFullName%=^$GetFileFirst(^%Directory%;"^%Specs%";^%
      Sorting%)$
      > :StartLoop
      > ;If the image name is empty (no more matching files), leave the loop
      > ^!IfTrue ^$IsEmpty(^%ImageFullName%)$ ExitLoop
      > ;Copy image name without path to variable
      > ^!Set %ImageName%=^$GetFileName(^%ImageFullName%)$
      > ;Copy image width and height information into variables
      > ;^!Set %ImgWidth%=^$GetImgWidth(^%ImageFullName%)$;
      > %ImgHeight%=^$GetImgHeight(^%ImageFullName%)$
      > ;Insert image tag and information into document
      > ^!InsertText ^p^p
      > ^!InsertHtml <div id="image">
      > ^!InsertHtml <IMG SRC="^$StrLower("^%ImageName%")$" >
      >
      >
      > ^!InsertText ^p^p
      > ^!InsertHtml <P>*****COMMENTS******</p>
      > ^!InsertHtml </div>
      > ;Get next matching image name and go back to start of loop
      > ^!Set %ImageFullName%=^$GetFileNext$
      > ^!GoTo StartLoop
      >
      > :ExitLoop
      > ;Close the file-find variable to restore system resources
      > ^!CloseFileFind
      > ;Insert line break after last image tag
      > ^!InsertText ^P
      > ;close MAIN div
      > ^!InsertHtml </div>^p ^p
      >
      > ;Insert footer
      > ^!InsertHtml <div id="footer">
      >
      > ^!InsertHtml <p>Photo and text © <a
      > href="mailto:%6d%69%6b%65%40%6d%62%72%65%69%64%69%6e%67%2e%75%
      73">Mike
      > Breiding</a> ^$GetDate(mmmm dd, yyyy -- tt)$</p>
      >
      > ^!InsertHtml </div> ^p
      >
      >
      > ;close WRAPPER div
      > ^!InsertHtml </div> ^p
      > ^!InsertHtml</BODY>^P</HTML>^P
      >
      >
      >
      > ;Place cursor back to top of page
      > ^!Jump Text_Start
      >
      >
      > [Non-text portions of this message have been removed]
      >
    • Mike Breiding
      ... Yep - that was the culprit. Thanks! -Mike [Non-text portions of this message have been removed]
      Message 2 of 3 , May 7, 2006
      • 0 Attachment
        At 10:10 AM 5/7/2006 , Sheri wrote:
        >Hi Mike,
        >
        >Seems you failed to have a space between one of your clip commands
        >and its parameters, so your clip seems to be is trying to run a
        >program by that name.
        >
        >^!InsertHtml</BODY>^P</HTML>^P
        >
        >Regards,
        >Sheri


        ----------

        Yep - that was the culprit.

        Thanks!
        -Mike


        [Non-text portions of this message have been removed]
      Your message has been successfully submitted and would be delivered to recipients shortly.