Heenan, Lambert
Lambert.Heenan at AIG.com
Wed Oct 11 08:28:35 CDT 2006
Hmm. What happened to all the line breaks? It looked good before I sent it!!! Sub Make_LNK_File(txtLnkName As String, txtTarget As String, Optional txtIconFile As String = "", Optional Description As String = "") 'initialize the object WshShell Dim objShell As Object Dim objShortcut As Object Set objShell = New WshShell 'initialize the object WshShortcut 'the complete name of the .lnk file, include full path plus the .LNK file extension Set objShortcut = objShell.CreateShortcut(txtLnkName) 'the file to be called by the .lnk file, e.g.. "c:\windows\calc.exe" objShortcut.TargetPath = txtTarget '(optional) := any command line supported by the file indicated in txtTarget.Text 'objShortcut.Arguments = xxxx '(optional) : = a valid icon file : = To use the same icon of the target file, do not use the next line. objShortcut.IconLocation = txtIconFile objShortcut.Description = Description 'Save the .lnk objShortcut.Save End Sub Lambert -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Heenan, Lambert Sent: Wednesday, October 11, 2006 9:12 AM To: 'Access Developers discussion and problem solving' Subject: Re: [AccessD] Access interview questions In code, using the windows scripting host, you can do it like this... Sub Make_LNK_File(txtLnkName As String, txtTarget As String, Optional txtIconFile As String = "", Optional Description As String = "") 'initialize the object WshShell Dim objShell As Object Dim objShortcut As Object Set objShell = New WshShell 'initialize the object WshShortcut 'the complete name of the .lnk file, include full path plus the .LNK file extension Set objShortcut = objShell.CreateShortcut(txtLnkName) 'the file to be called by the .lnk file, e.g.. "c:\windows\calc.exe" objShortcut.TargetPath = txtTarget '(optional) := any command line supported by the file indicated in txtTarget.Text 'objShortcut.Arguments = xxxx '(optional) : = a valid icon file : = To use the same icon of the target file, do not use the next line. objShortcut.IconLocation = txtIconFile objShortcut.Description = Description 'Save the .lnk objShortcut.Save End Sub Lambert -----Original Message----- From: accessd-bounces at databaseadvisors.com [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Kath Pelletti Sent: Tuesday, October 10, 2006 7:50 PM To: Access Developers discussion and problem solving Subject: Re: [AccessD] Access interview questions Hi Sander - I have a document for Excel skill evaluation for intro and intermediate skills. I will send offline, rgds Kath ----- Original Message ----- From: Sad Der To: Acces User Group Sent: Tuesday, October 10, 2006 6:02 PM Subject: [AccessD] Access interview questions Hi group, I need to hire several new employees with good Office skills. Does anybody have a list of questions I can ask to determine the skill level of the candidate? I need questions regarding MS-Access and MS-Excel. I think I can come up with the MS-Access questions but especially MS-Excel is hard for me. I've googled for them but didn't find anything usefull. TIA Regards, Sander -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com -- AccessD mailing list AccessD at databaseadvisors.com http://databaseadvisors.com/mailman/listinfo/accessd Website: http://www.databaseadvisors.com