כיצד ניתן לבדוק איזה כפתור נלחץ ב VB ...

שלום!
יש לי בעיה, הקוד עובד רק בIE, למישהו יש רעיון מה הבעיה?
זה חלון חדשות שעוצר לאחר כל הודעה.
קוד:


<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head id="Head1"><title>
	מבזקים
</title><meta id="refMeta" http-equiv="Refresh" content="180; URL=http://www.nw.co.il/news/export.aspx?id=1" /><meta http-equiv="Content-Type" content="text/html; charset=windows-1255" /><meta http-equiv="Content-Script-Type" content="text/javascript" /><meta name="Description" content="News ticker" />
    <style type="text/css">
		body {
			margin: 0px;
			font-family: Arial;
			font-size: 11px;
		}
		.DateTime {
			font-size: 9px;
		}
		.newsitem {
			font-size: 12px;
			background-color: #F0F4F8;
		}
	</style>

    <script type="text/javascript">
                var scrollerwidth='300px'; 
        var scrollerheight='300px'; 
        var scrollerbgcolor='white'; 
        var scrollerdelay='4000'; 
        var messages=new Array();
messages[0] = "שלום! ברוכים הבאים לאתר!!!";
messages[1] = "הצלחת? נכשלת!! לחץ <a href=\"http://www.ynet.co.il\">כאן</a>";

	    var ie = document.all && navigator.userAgent.indexOf("Opera") == -1;
	    var dom = document.getElementById && navigator.userAgent.indexOf("Opera") == -1;

	    if (messages.length>2) {
	    	i=2;
	    }
	    else {
	    	i=0;
	    }

	function move1(whichlayer) {
		tlayer=eval(whichlayer);
		if ((tlayer.style.top>0) && (tlayer.style.top<=5)) {
			tlayer.style.top=0;
			setTimeout("move1(tlayer)",scrollerdelay);
			setTimeout("move2(document.main.document.second)",scrollerdelay);
			return;
		}
		if (tlayer.style.top >= tlayer.document.height*-1) {
			tlayer.style.top-=5;
			setTimeout("move1(tlayer)",50);
		}
		else {
			tlayer.style.top=scrollerheight;
			tlayer.document.write(messages[i]);
			tlayer.document.close();
			if (i==messages.length-1) {
				i=0;
			}
			else {
				i++;
			}
		}
	}

	function move2(whichlayer) {
		tlayer2=eval(whichlayer);
		if ((tlayer2.style.top > 0) && (tlayer2.style.top <= 5)) {
			tlayer2.style.top=0;
			setTimeout("move2(tlayer2)",scrollerdelay);
			setTimeout("move1(document.main.document.first)",scrollerdelay);
			return;
		}
		if (tlayer2.style.top >= tlayer2.document.height*-1) {
			tlayer2.style.top-=5;
			setTimeout("move2(tlayer2)",50);
		}
		else {
			tlayer2.top=scrollerheight;
			tlayer2.document.write(messages[i]);
			tlayer2.document.close();
			if (i == messages.length-1) {
				i=0;
			}
			else {
				i++;
			}
		}
	}

	function move3(whichdiv) {
		tdiv=eval(whichdiv);
		if ((parseInt(tdiv.style.top) > 0) && (parseInt(tdiv.style.top) <= 5)) {
			tdiv.style.top=0;
			setTimeout("move3(tdiv)",scrollerdelay);
			setTimeout("move4(second2_obj)",scrollerdelay);
			return;
		}
		if (parseInt(tdiv.style.top) >= tdiv.offsetHeight*-1) {
			tdiv.style.top=parseInt(tdiv.style.top)-5;
			setTimeout("move3(tdiv)",50);
		}
		else {
			tdiv.style.top=scrollerheight;
			tdiv.innerHTML=messages[i];
			if (i==messages.length-1) {
				i=0;
			}
			else {
				i++;
			}
		}
	}

	function move4(whichdiv) {
		tdiv2=eval(whichdiv);
		if ((parseInt(tdiv2.style.top) > 0) && (parseInt(tdiv2.style.top) <= 5)) {
			tdiv2.style.top=0;
			setTimeout("move4(tdiv2)",scrollerdelay);
			setTimeout("move3(first2_obj)",scrollerdelay);
			return;
		}
		if (parseInt(tdiv2.style.top) >= tdiv2.offsetHeight*-1) {
			tdiv2.style.top=parseInt(tdiv2.style.top)-5;
			setTimeout("move4(second2_obj)",50);
		}
		else {
			tdiv2.style.top=scrollerheight;
			tdiv2.innerHTML=messages[i];
			if (i==messages.length-1) {
				i=0;
			}
			else {
				i++;
			}
		}
	}

	function startscroll(){
		if (ie||dom) {
			first2_obj=ie? first2 : document.getElementById("first2");
			second2_obj=ie? second2 : document.getElementById("second2");
			move3(first2_obj);
			second2_obj.style.top=scrollerheight;
			second2_obj.style.visibility='visible';
		}
		else if (document.layers) {
			document.main.style.visibility='visible';
			move1(document.main.document.first);
			document.main.document.second.style.top=scrollerhe  ight+5;
			document.main.document.second.style.visibility='vi  sible';
		}
	}

	window.onload=startscroll;
    </script>

</head>
<body>
    <form name="frm_news" method="post" action="export.aspx?id=1" id="frm_news">
<div>
<input type="hidden" name="__VIEWSTATE" id="__VIEWSTATE" value="/wEPDwUKMTQ4MTIzNTc3NQ9kFgQCAQ9kFgICAQ8WAh4HY29udGV  udAUyMTgwOyBVUkw9aHR0cDovL3d3dy5udy5jby5pbC9uZXdzL  2V4cG9ydC5hc3B4P2lkPTFkAgMPZBYCAgEPFgIeBXN0eWxlBWR  wb3NpdGlvbjphYnNvbHV0ZTtvdmVyZmxvdzpoaWRkZW47d2lkd  Gg6MzAwcHg7aGVpZ2h0OjMwMHB4O2JhY2tncm91bmQtY29sb3I  6d2hpdGU7dmlzaWJpbGl0eTpoaWRkZW47FgQCAQ8WAh8BBT9sZ  WZ0OjBweDtwb3NpdGlvbjphYnNvbHV0ZTtvdmVyZmxvdzpoaWR  kZW47dG9wOjFweDt3aWR0aDozMDBweDtkAgMPFgIfAQU/bGVmdDowcHg7dG9wOjBweDtvdmVyZmxvdzpoaWRkZW47dmlzaW  JpbGl0eTpoaWRkZW47d2lkdGg6MzAwcHg7ZGTB3PmupofYgTPk  wVnJG2td+JtMDQ==" />
</div>

        <div>
            <table width="100%" cellspacing="0" cellpadding="0">
                <tr>
                    <td class="newsitem" align="Center" style="height: 15px">
                        <b><a href="http://www.nw.co.il" target="_blank" style="color:Black">מבזקים
                        </a></b>
                    </td>
                </tr>
            </table>
<div id="main" style="position:absolute;overflow:hidden;width:300px;heig  ht:300px;background-color:white;visibility:hidden;">
	 <div id="first" style="left:0px;position:absolute;overflow:hidden;top:1px  ;width:300px;">
		            <script type="text/javascript">
			            if (document.layers) {
				 document.write(messages[0]);
			            }
		            </script>
	            </div>
	 <div id="second" style="left:0px;top:0px;overflow:hidden;visibility:hidden  ;width:300px;">
		            <script type="text/javascript">
			            if (document.layers) {
			 	document.write(messages[dyndetermine=(messages.length==1)? 0 : 1]);
			            }
	                </script>
	            </div>
            </div>

            <script type="text/javascript">
	if (ie||dom) {
		document.writeln('<div id="main2" style="position:relative;width:'+scrollerwidth+';height:'  +scrollerheight+';overflow:hidden;background-color:'+scrollerbgcolor+' ;">');
		document.writeln('<div style="position:absolute;width:'+scrollerwidth+';height:'  +scrollerheight+';clip:rect(0 '+scrollerwidth+' '+scrollerheight+' 0);left:0px;top:0px">');
		document.writeln('<div id="first2" style="position:absolute;width:'+scrollerwidth+';left:0px  ;top:1px;">');
		document.write(messages[0]);
		document.writeln('</div>');
		document.writeln('<div id="second2" style="position:absolute;width:'+scrollerwidth+';left:0px  ;top:0px;visibility:hidden">');
		document.write(messages[dyndetermine=(messages.length==1)? 0 : 1]);
		document.writeln('</div>');
		document.writeln('</div>');
		document.writeln('</div>');
	}
            </script>

        </div>
    </form>
</body>
</html>
כלי אשכול	חפש באשכול זה
הצג גירסת הדפסה שלח דף זה ב E-Mail	חפש באשכול זה: חיפוש מתקדם
מצבי תצוגה	דרג אשכול זה
עבור למצב לינארי מצב כלאיים עבור למצב משורשר	דרג אשכול זה:
הדף נוצר ב 0.05 שניות עם 12 שאילתות
צור קשר - Fresh - למעלה