• 0

VBS - UserProfile Path and File

Asked by brink668,

 Share

Question

Community Regular

brink668

Posted
Posted

Set olApp = CreateObject("Outlook.Application")

Set olMsg = olApp.CreateItem(0)

Set objShell=CreateObject("Wscript.Shell")

With olMsg

'.To = "test@test.com"

'.CC = "cc@testing.com"

'.BCC = "bcc@testing.com"

.Subject = "While You Were Out: "

.HTMLBody = "<html><p></p>" & _

"<img src='cid:wywo_notification.jpg'>"

I am having trouble with this part. I cant get the file and the userprofile piece to work correctly.

.Attachments.Add strHomeFolder = oShell.ExpandEnvironmentStrings("%USERPROFILE%") & "\wywo_notification.jpg"

The below direct path works but not when adding the userprofile variable

'.Attachments.Add "C:\users\doej\wywo_notification.jpg"

.Display

End With

Link to comment
https://www.neowin.net/forum/topic/1147368-vbs-userprofile-path-and-file/
Share on other sites

1 answer to this question

Recommended Posts

  • 0
Community Regular

jake1eye

Posted
Posted

1:\ Use code brackets for code, it makes it easier to read


Test Code Here
[/CODE]

2:\ Have you thought of making a variable for the pathway

Example

[CODE]
Dim Act :Set Act = CreateObject("Wscript.Shell")

Dim Dtop :Dtop = Act.ExpandEnvironmentStrings( _
"%UserProfile%" & "\Desktop")
[/CODE]

3:\ How are you coding the path in the script?

This topic is now closed to further replies.
 Share
Go to question listing

  • Posts

    • Intel is shutting down Clear Linux OS

      By ThaCrip · Posted

      Yeah, I totally get your point, which is possible it could happen. I just hope there is a few people around him who are similar to where if they took over things would run pretty much the same. if not, then yeah, it could start to decline rapidly etc. but I figure something that's been around for a longer period of time with a decent backing, and probably more users than most Linux distro's (which I would 'imagine' Mint is one of the more used Linux desktop distro's by volume of people who use it), is less likely to just disappear. but like you said, nothing is guaranteed. but I do think you are probably right in that Clem is probably the core of what keeps Mint, Mint. I like how it tends to stay pretty much the same with some slight tweaks here and there (but is largely the same) instead of that crap some people go for with change for the sake of change trying to create a overly fancy interface and other unnecessary stuff etc. I also feel Mint keeps a nice balance of things out-of-the-box where it's not too bloated, nor too striped down. p.s. but I see Mint as a better Ubuntu basically. but I get your point like if it was more of a really serious choice of needing a 'safe bet' to use long term, then yeah something like official Ubuntu would be one of the better choices for sure given what you said with it being backed by an actual company which makes it a safer bet than Mint which is smaller and 'could' potentially be more fragile.
    • KDE Plasma finally gets rounded bottom window corners

      By adrynalyne · Posted

      It’s in development so hopefully it’s improved upon before release.
    • Everything we know about the Google Pixel 10 series so far

      By Son_Of_Dad · Posted

      For the 10th iteration they could have bothered with some design changes rather than just carrying over the 9's
    • Astonishing new tech could kill headphones forever as it bends sound right into ears

      By Slugsie · Posted

      So this requires hardware to be setup in the area you want to listen to music in? And it requires hardware for each user? So useless for me when I'm out walking my dog? Or when I'm at the gym and want to listen to my podcasts rather than the music the gym is broadcasting? Heck, will it even work in my own home and allow me to walk around from room to room, or even within a room? Yeah, these won't be replacing headphones anytime soon.
    • Politically funny images of the World

      By Michael Scrip · Posted

  • Recent Achievements

    • First Post
      leoniDAM earned a badge
      First Post
    • Reacting Well
      Ian_ earned a badge
      Reacting Well
    • One Month Later
      Ian_ earned a badge
      One Month Later
    • Dedicated
      MacDaddyAz earned a badge
      Dedicated
    • Explorer
      cekicen went up a rank
      Explorer

  • Popular Contributors

    1. 1
      +primortal
      504
    2. 2
      ATLien_0
      211
    3. 3
      Michael Scrip
      200
    4. 4
      Xenon
      147
    5. 5
      +FloatingFatMan
      122
    Show More

  • Tell a friend

    Love Neowin? Tell a friend!