Dr.Xerox skrev:
> Eller du kan bruge denne html-file, det eneste du skal ændre er
> stien og Navn til dit Billede, samt stien og Navn til din mp3.
>
> Poul
>
>
> <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
> <HTML><HEAD>
> <META http-equiv=Content-Type content="text/html; charset=iso-8859-1">
> <META content="EF Vers.3.17" name=ORGINALGENERATOR>
> <META content=
http://home.chello.no/~cato.salid/ name=EFHomepage>
> <STYLE>v\:* {
> BEHAVIOR: url(#default#VML)
> }
> o\:* {
> BEHAVIOR: url(#default#VML)
> }
> w\:* {
> BEHAVIOR: url(#default#VML)
> }
> .shape {
> BEHAVIOR: url(#default#VML)
> }
> </STYLE>
>
> <META content="MSHTML 6.00.2900.2180" name=GENERATOR></HEAD>
> <BODY style="FILTER: ; FONT-FAMILY: " bgColor=#ffffff scroll=no><BGSOUND
> balance=0 src="cid:G:\MP3\NAVNpåDIN.mp3"
> volume=0 loop=infinite>
> <DIV id=Bcon2
> style="Z-INDEX: -100; VISIBILITY: visible; BACKGROUND-REPEAT: repeat; POSITION: absolute; TOP: 0px; HEIGHT: 144px"><IMG
> id=Bconimg2
> style="VISIBILITY: hidden; WIDTH: 1132px; POSITION: absolute; TOP: 0px; HEIGHT: 466px"
> src="cid:D:\Billede\NavnPåDitBillede.jpg"
> width=1129></DIV><BR>
> <DIV class=HoldText id=Textholder>
> <P> </P></DIV>
> <DIV class=HoldFlash id=Flashholder></DIV>
> <DIV id=Lorry></DIV>
> <SCRIPT language=VBScript>
> Dim w,b,Data1
> set b=window.Document.body
> set w=window.Document
> Sub Window_OnLoad( )
> Window.Document.All.Lorry.InnerHtml=""
> End Sub
> WT=0
> Function rTImage(ThisImagefr,ptop,pleft,pwidth,pheight)
> On error resume next
> if oPopup.isopen=false then
> OX = window.Document.body.offsetWidth
> OY = window.Document.body.offsetHeight
> end if
> ThisImagefr.Style.postop = OY * ptop/100 ''This sets position from top
> ThisImagefr.Style.posleft = OX * pleft/100 ''This sets position from left
> ThisImagefr.style.poswidth = OX * pwidth/100 'This sets width
> ThisImagefr.style.posheight = OY * pheight/100 'This sets the height
> if ThisImagefr.style.borderRightWidth > 0 then
> ThisImagefr.style.poswidth = ThisImagefr.style.poswidth - (ThisImagefr.style.borderRightWidth * 2)
> ThisImagefr.style.posheight = ThisImagefr.style.posheight - ThisImagefr.style.borderTopWidth * 2
> End if
> End Function
> Sub Startall()
> Bcon2.Style.backgroundImage ="url(" & Bconimg2.src & ")"
> SetTimeout"rTImage Bcon2,0,0,100,100",500
>
>
> End Sub
> Startall
> Sub doFSCommand(command,args)
> Select Case command
> Case "popup"
> Select Case args
> Case 0
> oPopup.Hide
> oPopupBody.innerHTML=""
> Case 1
> Openpopup
> Case else
> End Select
> Case "newmovie"
> Openpopup
> w.Flashcat.movie=args
> Case else
> End Select
> End Sub
>
> </SCRIPT>
> </BODY></HTML>
>
>
Hej.
Tusind tak for begge svar.
Jeg har afprøvet den første ved at hente programmet.
Det virker upåklageligt med mp3-fil, endda også i live mail.
Skal lege lidt mere med programmet, samt den html-kode,
du har sendt.
hilsen simon