跑马灯似的图片滚动代码,如何做鼠标onmouse的悬停放大?代码怎么写?非要js或者css么?

JavaScript09

跑马灯似的图片滚动代码,如何做鼠标onmouse的悬停放大?代码怎么写?非要js或者css么?,第1张

首先是必须要有js跟CSS配合起来的,当然两者都不一定,例如js也可以实现动画效果,只是麻烦,要简单点直接用JQ里面的animate()方法配合css控制动画,又或者直接一点使用CSS3实现动画,注意是css3,但就你的代码写的是走马灯这种早就没人用的写法,目测你是个初学者,所以我的回答你并不会采纳,因为你看不懂,现在一般都用脚本写轮播图,没人用走马灯的了。

CSS3的悬停我可以写给你,JQ目测写出来对你也没多大用处,到时还得绑定什么的你一搞不出觉得我瞎说不采纳我那更悲剧

给img标签加上class或者给marquee加上class,否则怎么搞,我这里就以直接给img加上class="animate"写给你了

.animate:hover{-webkit-transform:scale(1.25,1.25)transform:scale(1.25,1.25)box-shadow: 5px 5px 6px rgba(0, 0, 0, 0.4)-webkit-transition:all .4s-moz-transition:all .4s-o-transition:all .4s-ms-transition:all .4stransition:all .4s}

里面的大小什么都是可以控制的,包括时间,这些就拜托您上W3C看看,我已经打了很多东西了,你要有良心就采纳,采纳后可以追问,否则别追问我问题了哈,我是web前端,语气有点叼,因为我被迫来问答里混,原谅我一个技术人员被叫来干这些鸟不拉屎的工作,所以带点脾气

1.屏蔽这个行JS,看看还有错吗?

2.试试替换最新版本,MSDN上找了个(不确定是不最新),你也可以试试找找。

(function(b){function d(a){this.input=aa.attr("type")=="password"&&this.handlePassword()b(a[0].form).submit(function(){if(a.hasClass("placeholder")&&a[0].value==a.attr("placeholder"))a[0].value=""})}d.prototype={show:function(a){if(this.input[0].value===""||a&&this.valueIsPlaceholder()){if(this.isPassword)try{this.input[0].setAttribute("type","text")}catch(b){this.input.before(this.fakePassword.show()).hide()}this.input.addClass("placeholder")this.input[0].value=this.input.attr("placeholder")}}, 

hide:function(){if(this.valueIsPlaceholder()&&this.input.hasClass("placeholder")&&(this.input.removeClass("placeholder"),this.input[0].value="",this.isPassword)){try{this.input[0].setAttribute("type","password")}catch(a){}this.input.show()this.input[0].focus()}},valueIsPlaceholder:function(){return this.input[0].value==this.input.attr("placeholder")},handlePassword:function(){var a=this.inputa.attr("realType","password")this.isPassword=!0if(b.browser.msie&&a[0].outerHTML){var c=b(a[0].outerHTML.replace(/type=(['"])?password\1/gi, 

"type=$1text$1"))this.fakePassword=c.val(a.attr("placeholder")).addClass("placeholder").focus(function(){a.trigger("focus")b(this).hide()})b(a[0].form).submit(function(){c.remove()a.show()})}}}var e=!!("placeholder"in document.createElement("input"))b.fn.placeholder=function(){return e?this:this.each(function(){var a=b(this),c=new d(a)c.show(!0)a.focus(function(){c.hide()})a.blur(function(){c.show(!1)})b.browser.msie&&(b(window).load(function(){a.val()&&a.removeClass("placeholder")c.show(!0)}), 

a.focus(function(){if(this.value==""){var a=this.createTextRange()a.collapse(!0)a.moveStart("character",0)a.select()}}))})}})(jQuery)

3.代码哪里下的,有地址可以看么?

用jscript实现新建和保存一个word文档

Demonstration script that retrieves network adapter data from a computer,

displays that data in a Microsoft Word document, and then saves the

document as C:\Scripts\Word\Testdoc.doc.

复制代码 代码如下:

Set objWord = CreateObject("Word.Application")

objWord.Caption = "Test Caption"

objWord.Visible = True

Set objDoc = objWord.Documents.Add()

Set objSelection = objWord.Selection

objSelection.Font.Name = "Arial"

objSelection.Font.Size = "18"

objSelection.TypeText "Network Adapter Report"

objSelection.TypeParagraph()

objSelection.Font.Size = "14"

objSelection.TypeText "" &Date()

objSelection.TypeParagraph()

objSelection.TypeParagraph()

objSelection.Font.Size = "10"

strComputer = "."

Set objWMIService = GetObject("winmgmts:\\" &strComputer &"\root\cimv2")

Set colItems = objWMIService.ExecQuery _

("Select * from Win32_NetworkAdapterConfiguration")

For Each objItem in colItems

objSelection.Font.Bold = True

objSelection.TypeText "ARP Always Source Route: "

objSelection.Font.Bold = False

objSelection.TypeText "" &objItem.ArpAlwaysSourceRoute

objSelection.TypeParagraph()

objSelection.Font.Bold = True

objSelection.TypeText "ARP Use EtherSNAP: "

objSelection.Font.Bold = False

objSelection.TypeText "" &objItem.ArpUseEtherSNAP

objSelection.TypeParagraph()

objSelection.Font.Bold = True

objSelection.TypeText "Caption: "

objSelection.Font.Bold = False

objSelection.TypeText "" &objItem.Caption

objSelection.TypeParagraph()

objSelection.Font.Bold = True

objSelection.TypeText "Database Path: "

objSelection.Font.Bold = False

objSelection.TypeText "" &objItem.DatabasePath

objSelection.TypeParagraph()

objSelection.Font.Bold = True

objSelection.TypeText "Dead GW Detection Enabled: "

objSelection.Font.Bold = False

objSelection.TypeText "" &objItem.DeadGWDetectEnabled

objSelection.TypeParagraph()

objSelection.Font.Bold = True

objSelection.TypeText "Default IP Gateway: "

objSelection.Font.Bold = False

objSelection.TypeText "" &objItem.DefaultIPGateway

objSelection.TypeParagraph()

objSelection.Font.Bold = True

objSelection.TypeText "Default TOS: "

objSelection.Font.Bold = False

objSelection.TypeText "" &objItem.DefaultTOS

objSelection.TypeParagraph()

objSelection.Font.Bold = True

objSelection.TypeText "Default TTL: "

objSelection.Font.Bold = False

objSelection.TypeText "" &objItem.DefaultTTL

objSelection.TypeParagraph()

objSelection.Font.Bold = True

objSelection.TypeText "Description: "

objSelection.Font.Bold = True

objSelection.Font.Bold = False

objSelection.TypeText "" &objItem.Description

objSelection.TypeParagraph()

objSelection.TypeParagraph()

Next

objDoc.SaveAs("C:\Scripts\Word\testdoc.doc")

objWord.Quit