Archivo de VBScript que cree un acceso directo utilizando Firefox y que tome como icono una imagen que yo decida

Me pueden colaborar con un archivo en VBScript que cree un acceso directo tomando como referencia el Firefox y una imagen de icono que yo asigne en el código así como también una dirección web que va tener por defecto ese acceso directo, ejemplo: que al ejecutarse me cree un acceso directo con la imagen del icono que yo quiera y que al ejecutar ese acceso directo me lleve a una página web que también debería asignar en el código mucha