---

Når man vælger "udskriv kort" på www.krak.dk kan man - i nogle tilfælde
(måske afhængigt af oprativsystem) - få en udskrift uden at skulle foretage
printervalg.

Denne mulighed kunne jeg godt bruge på mit intranet, da jeg ved at der skal
udskrives til default printer.

Jeg har prøvet at "låne" lidt kode fra krak, men kan ikke få det til at
virke.

Hvad skal jeg bruge - udover følgende og hvad skal jeg gøre for at få det
til at virker altid:

--------------------------------------------
<script type="text/javascript">
DA = (document.all) ? 1 : 0

//PRINT VED KALD "StartPrint ()" i Netscape og Explorer
function StartPrint() {
if(DA){
print();
}
else {
window.print();
}
}
function handle_error()
{
alert("Der opstod en uvendtet fejl. Der blev derfor ikke printet.")
return true;
}
</script>
<script type="text/vbscript">
sub window_onunload
on error resume next
set WB = nothing
end sub

sub print
OLECMDID_PRINT = 6
OLECMDEXECOPT_DONTPROMPTUSER = 2
OLECMDEXECOPT_PROMPTUSER = 1
on error resume next
if DA then
call WB.ExecWB(OLECMDID_PRINT, OLECMDEXECOPT_DONTPROMPTUSER)
else
call WB.IOleCommandTarget.Exec(OLECMDID_PRINT
,OLECMDEXECOPT_DONTPROMPTUSER,"","")
end if
if err.number <> 0 then
if DA then
//alert "Intet blev printet. Tryk 'Refresh' på din browser for
at udskrive artiklen!"
end if
end if
end sub

if DA then
wbvers="8856F961-340A-11D0-A96B-00C04FD705A2"
else
wbvers="EAB22AC3-30C1-11CF-A7EB-0000C05BAE0B"
end if
document.write "<OBJECT ID=""WB"" WIDTH=0 HEIGHT=0 CLASSID=""CLSID:"
document.write wbvers & """> </OBJECT>"

</script>
--------------------------------------------