Solved

I want to Open a short cut  on my desktop using VBA or MS Access

Posted on 2008-10-14
8
432 Views
Last Modified: 2013-11-28
Dim a as Object
Dim str as string
Dim Target  As string
Dim Startin  AS string


Target = "C:\Program Files\Sage Software\V420JO\MAS90\Home\pvxwin32.exe" -hd ..\launcher\sota.ini ..\soa\startup.m4p -arg direct uion vbc "" JOB jt_timetrackerlaborimport_ui AUTO

Startin ="C:\Program Files\Sage Software\V420JO\MAS90\Home"
str = Target &  Startin
a = SHELL(str,vbNormalFocus)

0
Comment
Question by:daruffin
  • 4
  • 2
  • 2
8 Comments
 
LVL 12

Expert Comment

by:jazzIIIlove
ID: 22715277
0
 

Author Comment

by:daruffin
ID: 22715444
This only tells me how to create a short cut I need to open a short cut using the shell command. I want to click a button on my MS Access form and open this short cut which is located on my desktop.
0
 
LVL 12

Expert Comment

by:jazzIIIlove
ID: 22715470
0
Ransomware: The New Cyber Threat & How to Stop It

This infographic explains ransomware, type of malware that blocks access to your files or your systems and holds them hostage until a ransom is paid. It also examines the different types of ransomware and explains what you can do to thwart this sinister online threat.  

 

Author Comment

by:daruffin
ID: 22715649
You keep sending me how to create a short cut. I want to run my shortcut which is already created on my desktop and This shortcut run another program. How can I run this short using the Shell command
0
 
LVL 74

Accepted Solution

by:
Jeffrey Coachman earned 250 total points
ID: 22728605
daruffin,

Is your question simply: How to Open a Shortcut?
Or more specifically:  How to Open a Shortcut using the Shell command?

Because you can open a shortcut quite easily by treating it as a Hyperlink
Try something like this:

Application.FollowHyperlink "C:\Documents and Settings\user\Desktop\NameOfYourShortCut.lnk"

(If you get a hyperlink warning, you can disable it for good by seeing this link: http://support.microsoft.com/kb/829072/en-us)

JeffCoachman

0
 

Author Comment

by:daruffin
ID: 22734904
Let me try this and I will get back to you
0
 

Author Closing Comment

by:daruffin
ID: 31506047
This worked out well
0
 
LVL 74

Expert Comment

by:Jeffrey Coachman
ID: 22771587
;-)
0

Featured Post

Ransomware-A Revenue Bonanza for Service Providers

Ransomware – malware that gets on your customers’ computers, encrypts their data, and extorts a hefty ransom for the decryption keys – is a surging new threat.  The purpose of this eBook is to educate the reader about ransomware attacks.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Suggested Solutions

Title # Comments Views Activity
VBA modules import 4 57
default combobox value 12 18
Comparison query - 4 columns 9 25
MS Access How can I utilize 2 list boxes at the same time? 2 23
The first two articles in this short series — Using a Criteria Form to Filter Records (http://www.experts-exchange.com/A_6069.html) and Building a Custom Filter (http://www.experts-exchange.com/A_6070.html) — discuss in some detail how a form can be…
As tax season makes its return, so does the increase in cyber crime and tax refund phishing that comes with it
Familiarize people with the process of utilizing SQL Server views from within Microsoft Access. Microsoft Access is a very powerful client/server development tool. One of the SQL Server objects that you can interact with from within Microsoft Access…
Familiarize people with the process of retrieving data from SQL Server using an Access pass-thru query. Microsoft Access is a very powerful client/server development tool. One of the ways that you can retrieve data from a SQL Server is by using a pa…

829 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question