Jump to content


phoennix

Member Since 06/01/2008
Offline Last Active 01/10/2009, 14:55
-----

Posts I've Made

In Topic: Código Media Player

01/10/2009, 14:55

Seque abaixo o codigo html que uso no meu site para uma rádio-on line

queria saber como alterar o código para a rádio iniciar pausada e so começar a tocar apos dar play. Obrigado

<object classid="CLSID:6BF52A52-394A-11D3-B153-00C04F79FAA6" id="MediaPlayer2" standby="Carregando componentes do Windows Media Player..." style="width: 80px; height: 65px" type="application/x-oleobject">         <param value="mms://67.159.5.244:9001/skygospel" name="url"/>         <param value="0" name="EnableContextMenu"/>         <param value="0" name="AutoStart"/>         <param value="-1" name="rate"/>			<param value="0" name="balance"/>			<param value="0" name="currentPosition"/>			<param value="" name="defaultFrame"/>			<param value="1" name="playCount"/>			<param value="0" name="currentMarker"/>			<param value="-1" name="invokeURLs"/>			<param value="" name="baseURL"/>			<param value="10" name="volume"/>			<param value="-1" name="mute"/>			<param value="full" name="uiMode"/>			<param value="0" name="stretchToFit"/>			<param value="0" name="windowlessVideo"/>			<param value="-1" name="enabled"/>			<param value="0" name="fullScreen"/>			<param value="" name="SAMIStyle"/>			<param value="" name="SAMILang"/>			<param value="" name="SAMIFilename"/>			<param value="" name="captioningID"/>			<param value="0" name="enableErrorDialogs"/>         <embed pluginspage="http://www.microsoft.com/Windows/MediaPlayer/" autostart="1" type="application/x-mplayer2" height="62" src="mms://67.159.5.244:9001/skygospel" style="width: 60%;" width="81%" showcontrols="1 ShowPositionControls=0 ShowStatusBar=1 EnableContextMenu=0 AutoSize=0 AnimationAtStart=1 TransparentAtStart=1"></embed>  </object>&lt;script type="text/javascript"><!--google_ad_client = "pub-6862860515939987";google_ad_host = "pub-1599271086004685";/* 728x15, criado 27/08/09 Link */google_ad_slot = "6240067315";google_ad_width = 728;google_ad_height = 15;//--></script>&lt;script src="http://pagead2.googlesyndication.com/pagead/show_ads.js" type="text/javascript"></script>


Olá!

Tem uma parte no código (embed) que é bem assim:

autostart="1"

Ponha 0 nesse também.

Abraços!

In Topic: Problemas Para Gerar Pdf Com Dados Do Banco

01/10/2009, 14:48

OLá pessoal.
Estou aqui tentando gerar um arquivo pdf das informações contidas no banco de dados. Depois de fazer uma busca no banco de dados, escolho o item que preciso gerar as informções no PDF, mas o que acontece é que gera sempre o primeiro dado do banco de dados..o que estou fazendo de errado? Segue o script que tenho...

<!--#include file="fpdf.asp"--><%dim recordset1dim Recordset1_numRowsset Recordset1 = Server.CreateObject("ADODB.Recordset")Recordset1.ActiveConnection = "DBQ=C:\rede\SI.mdb;Driver={Microsoft Access Driver (*.mdb)};"Recordset1.Source = "SELECT * FROM intima ORDER BY nome"Recordset1.CursorType = 0Recordset1.CursorLocation = 2Recordset1.LockType = 3Recordset1.Open()Recordset1_numRows = 0dim pdf// criando o pdfset pdf=CreateJsObject("FPDF")// aki poderemos adcionar várias funções como titulos padroes para todas as páginasm numeração de páginas e etc.// montando o corpo do pdf, setando o tipo da folha, tipo de medida e o tamanho da folhapdf.CreatePDF "P","mm","A4"pdf.SetPath("fpdf/")pdf.Open()// adcionando páginapdf.AddPage()// setando fonte e tamanhopdf.SetFont "times","",12// setando grossura da linhapdf.SetLineWidth(0.4)// setando linhas, reapare que, as medidas são feitas em x1, y1, x2 e y2, començando no ponto inicial de x e y e finalizando nos mesmo.pdf.Line "7","52","200","52"// criamos aki uma linha horizontal, a linha pode ser feita de qualquer jeito, vertical, diagonal e td mais, somente setando os valores de x e y.// escrevendo um textopdf.Text "70","35","ESTADO DO RIO GRANDE DO SUL"pdf.Text "90","40","POLÍCIA CIVIL"pdf.Text "92","45","DPM / DPRPA"pdf.Text "60","50","DÉCIMA SEGUNDA DELEGACIA DE POLÍCIA"pdf.Text "60","90",(recordset1.Fields.Item("nome").Value)// na linha acima setamos primeiro a função Text, depois aonde começamos a escrever apartir do x e y e por fim o texto a ser adcionado// presta-se atenção aki, pois quem precisa fazer uma leitura de banco de dados ou resgatar uma session para ser impressa no pdf, n se pode usar as ' ' na função de textonomIma = "logopc.jpg"pdf.Image nomIma, 93, 10, 20, 20, "JPG", "http://www.se_quizer_aqui_vai_o_link.html"// pdf.Image(string logopc.jpg, float 3, float 8, float 4 [, float h [, string type [, mixed link]]])// fechando o pdfpdf.Output()%>



è simples... vc precisa da um While para que puxe todos os dados do BD:

Nessa linha:
pdf.Text "60","90",(recordset1.Fields.Item("nome").Value)

Seria:
While (NOT recordset1.EOF)
	 pdf.Text "60","90",(recordset1.Fields.Item("nome").Value)
recordset1.MoveNext()
wend

Abraços

IPB Skin By Virteq