Ok, so I think I have done this correctly, but running the code generates an error:
Expected ')'!
for the line
Code:
 $wshshortcut($a_shortcuts[Index],$a_targets[$index])


here is the complete code so far
Code:
 
$a_shortcuts =  "%userprofile%\desktop\Company Procedures Manuals\Environmental Procedures","%userprofile%\desktop\Company Procedures Manuals\Health & Safety Procedures","%userprofile%\desktop\Company Procedures Manuals\Company Form Control I INDEX.xls","%userprofile%\desktop\Company Procedures Manuals\Quality Manual","%userprofile%\desktop\Company Procedures Manuals\Quality Procedures","%userprofile%\desktop\Company Procedures Manuals\Concession Log","%userprofile%\desktop\Company Procedures Manuals\SOP Register"
$a_targets = "\\eltnts04\procedures_forms\Environmental Procedures\current","\\eltnts04\procedures_forms\Health & Safety Procedures","\\eltnts04\procedures_forms\Company Forms & Manuals\Company Form Control I Index.xls","\\eltnts04\procedures_forms\QA Procedures Manual\TS Quality Manual","\\eltnts04\procedures_forms\QA Procedures Manual\Procedures Manual","\\eltnts04\public\Concession Log\Concession Log.xls","\\eltnts04\public\SOP Folder\SOP Register.xls"

For Each $element In $a_shortcuts
	For $index=0 To UBound($a_shortcuts) ;increase $index value until it reaches the limit of array elements
		If Exist ($a_shortcuts[$index]) = 0
			$wshshortcut($a_shortcuts[Index],$a_targets[$index])
		EndIf
Next

Any idea what I am doing wrong...?
Remeber I am an idiot when it comes to this sort of thing so a nice easy to understand explaination would be great.

Thanks