Ir para conteúdo

POWERED BY:

Arquivado

Este tópico foi arquivado e está fechado para novas respostas.

marcosalmeida

reconhecendo flash no db

Por , em ASP Clássico

Recommended Posts

marcosalmeida    0

marcosalmeida
Postado

Boa noite pessoal.

Sou iniciante em programação e tenho algumas dificuldades em manupular codigos.

Estou com um script para rotacionar BANNER de web site. Porém não consigo fazer com que ele rode *.swf (flash). já descobri onde é o problema, mas n sei como resolver. Será que alguém pode me ajudar?

Po postar o codigo na intégra e negritar a linha com erro.

 

 

<body leftmargin="0" topmargin="0" marginwidth="0" marginheight="0"><%

Response.Expires = -1000

Dim oRS, oConn,sSQL

Dim rndMax,rndNumber

Set oConn = Server.CreateObject("ADODB.Connection")

oConn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("advertise.mdb"))

sSQL = "SELECT * FROM banners"

Set oRS = Server.CreateObject("ADODB.Recordset")

oRS.Open sSQL , oConn, 3

rndMax = CInt(oRS.RecordCount)

oRS.MoveFirst

Randomize Timer

rndNumber = Int(RND * rndMax)

oRS.Move rndNumber

response.write "<a href='" & oRS("alink") & "' target='_blank'><img border=0 src='anunciantes\" & oRS("aPicture") & "'></a>"

set oRS = nothing

set oConn = nothing

%>

 

 

 

*********

O bando de dados esta aceitando o *.swf normalmente. apenas n esta mostrando na tela. tá erro de imagem. como faço pra alterar isso? pode até ser somente para o flash, não me importo.

 

Abraços

Compartilhar este post

Link para o post
Compartilhar em outros sites

<%Rafael%>    0

<%Rafael%>
Postado

Faz assim...

 

If Right(oRS("aPicture"),3) = "swf" Then

Response.Write("<object></object>")

Else

Response.Write "<a href='" & oRS("alink") & "' target='_blank'><img border=0 src='anunciantes\" & oRS("aPicture") & "'></a>"

End If

No lugar de <object></object> coloca o script para abrir o flash..

 

Abraços!

Compartilhar este post

Link para o post
Compartilhar em outros sites
Ir para a lista de tópicos ASP Clássico
×

Informação importante

Ao usar o fórum, você concorda com nossos Termos e condições.

  Aceito