关于在VB6中用OSfCreateShellLink创建快捷方式的问题请教各位？

'我想在D盘的根文件夹下创建一个到C的快捷方式
'我运行后总提示失败，但当把If Not fSuccess Then行设为断点时，运行到这里，我再 '我运行后总提示失败，但当把If&nbs