- Fórum WMO
- → Viewing Profile: Tópicos: fabiosl
Community Stats
- Group Usuários
- Active Posts 8
- Profile Views 902
- Member Title Novato no fórum
- Age Age Unknown
- Birthday Birthday Unknown
-
Sexo
Não informado
User Tools
Friends
fabiosl hasn't added any friends yet.
Latest Visitors
-
Guest
04/11/2007, 04:36
Topics I've Started
Asp Para Php
07/11/2006, 12:19
Existe um sistema de fotos parecido com esse mas totalmente em php e qual eh?
http://www.vestcev.c...s.asp?nfoto=135
Existem um sistema de recados parecido com esse mas totalmente em php e qual eh?
http://www.vestcev.com.br/recado.asp
Caso nao tenham iguais, como faço para passa esses para php?
Se vc kizer me ajuda deixe seu MSN ai que entro em contato.
Muito Obrigado.
Informações Economicas
02/10/2006, 12:21
http://www.cma.com.b...ro=cliFolhadeSP
Esta na coluna do lado esquerdo em baixo do grafico.
Tenhu que puxar somente essas informações:
Bovespa
Nasdaq
Dolar Comercial;Paralelo;Turismo
Euro
Ja tinha um feito mas tentei modificar mas n consegui o restante dos dados :/
http://www.vestcev.c...dolar/dolar.asp
CODIGO DA PAGINA TODA:
</style>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1"></head>
<p><font color="#003366" size="2" face="Verdana, Arial, Helvetica, sans-serif">
<%
Session.LCID = 1046
Set obj = CreateObject("MSXML2.ServerXMLHTTP")
obj.open "GET", "http://www.cma.com.br/index.asp"
obj.send
textHTML = obj.ResponseText
dados = LCase(textHTML)
' Procura pela posição da string "Taxa de Venda"
i = 1
i = inStr(i,dados,"%")
' Procura pela 1ª tag <tr> depois de "Taxa de Venda"
i = inStr(i,dados,"<tr")
f = inStr(i,dados,"</tr") ' Pega a 1ª tag </tr> depois de <tr>
dados = Mid(dados,i,(f-i)) ' Retira somente linha da interesse
dados = Replace(dados,"</td>","|",1,2) ' Substitui </font> por "|" (2 vezes)
dados = Trim(LimpaHTML(dados)) ' Retira todas as tags
dados = Split(dados,"|") ' Separa criando a matriz
Function Strzero(val,num)
val = Trim(CStr(val))
Strzero = String(num-len(val),"0") & val
End Function
Function ConverteData (valor,formato)
if not isDate(valor) then
Response.Write "Data Inválida !"
Response.End
else
formato = UCase(formato)
if Trim(formato) = "" then formato = "DD/MM/YYYY HH:MI:SS"
formato = Replace(formato,"YYYY",Year(valor))
formato = Replace(formato,"MM",Strzero(Month(valor),2))
formato = Replace(formato,"DD",Strzero(Day(valor),2))
formato = Replace(formato,"HH",Strzero(Hour(valor),2))
formato = Replace(formato,"MI",Strzero(Minute(valor),2))
ConverteData = Replace(formato,"SS",Strzero(Second(valor),2))
end if
End Function
Function LimpaHTML(matriz)
Do While True
ini = InStr(1,matriz,"<")
If ini = 0 Then Exit Do
fim = InStr(ini,matriz,">")
parcial = Mid(matriz,ini,fim-ini+1)
matriz = Replace(matriz,parcial,"")
Loop
LimpaHTML = matriz
End Function
Function NumeroSQL(numero)
dim x
x = numero
x = Replace(x,".","")
x = Replace(x,",",".")
If isNumeric(x) Then
NumeroSQL = x
Else
NumeroSQL = numero
End If
End Function
%>
</font></p>
<table width="261" border="0">
<tr>
<td width="95"> </td>
<td width="74"><div align="right">ÚLTIMO</div></td>
<td width="12"><div align="right">%</div></td>
<td width="30"><div align="right">HORA</div></td>
<td width="28"><div align="right">DATA</div></td>
</tr>
</table>
<table width="262" border="0">
<tr>
<td width="92" class="style16"><div align="left" class="style20"><span class="style12"> Bovespa </span></div></td>
<td width="0" align="right" valign="middle" class="style16"><font color="#000000" size="1" face="Arial"><%=dados(2)%></font></td>
</tr>
<tr>
<td class="style16"><div align="left" class="style20"><span class="style12"> Nasdaq </span></div></td>
<td align="right" valign="middle" class="style16">
<div align="right" class="style16"></div></td>
</tr>
<tr>
<td class="style16"><div align="left" class="style20"><span class="style12"> Dólar comercial </span></div></td>
<td align="right" valign="middle" class="style16">
<div align="right" class="style16"></div></td>
</tr>
<tr>
<td class="style16"><div align="left" class="style20"><span class="style12"> Dólar paralelo </span></div></td>
<td align="right" valign="middle" class="style16">
<div align="right" class="style16"></div></td>
</tr>
<tr>
<td class="style16"><div align="left" class="style20"><span class="style12"> Dólar turismo </span></div></td>
<td align="right" valign="middle" class="style16">
<div align="right" class="style16"></div></td>
</tr>
<tr>
<td class="style16"><div align="left" class="style20"><span class="style12"> Euro </span></div></td>
<td align="right" valign="middle" class="style16">
<div align="right" class="style16"></div></td>
</tr>
<tr>
<td class="style16"><div align="left" class="style20"><span class="style12"> Poupança </span></div></td>
<td align="right" valign="middle" class="style16">
<div align="right" class="style16"></div></td>
</tr>
</table>
<p> </p>
Help-me PLEASE!
Sou novato nessa parte, se puder me ajuda com tudo mastigado agradeço mesmo.
Esticar Site
21/09/2006, 19:21
eu faço o desenho do site no fireworks e dps jogo ele la ja recortado com imgs e htm e talz numa pasta ai abro o index.htm no dreamweaver.
o que eu queria mesmo eh saber como faço para que o site estique pq as seçoes naum seriam todas do mesmo tamanho sempre haveria um menor ou maior ai eu necessitaria que o site esticasse para baixo, como faço isso?
html n tem como? qual linguagem e como faço isso?
sou novato em fazer sites e se perfeito se estivesse "mastigado" para melhor eu entender.
Obrigado T+
vlw galerinha
Iframe Abrindo
21/09/2006, 18:04
Eu utilizo esse iframe:
LINK:
<a href="index.htm" target="iframe"><img src="botao.gif"></a>
PAGINA INICIAL:
<iframe name="iframe" frameborder="0" width="500" height="600" marginheight="0" src="index.htm" scrolling="no"></iframe>
O LINK abre, qnd clicado, a pagina dele na parte que ta o iframe da PAGINA INICIAL de acordo com o tamanho ja definido (width="500" height="600") do iframe da pagina inicial, queria saber se existe uma forma desse iframe abrir sem precisar desse tamanho?
Exemplo:
O LINK com pagina 500x600 abre na pagina com iframe PAGINA INICIAL e fik encaixado perfeitamente e outro LINK com pagina 500x200 fik encaixado perfeitmante sem espaço em branco abaixo dele.
Caso não entenda, deixe, caso queira ajudar, o seu msn para min contactar.
Obrigado.
Copiar Dados De Outro Site
29/07/2006, 18:36
a fonte dos dados eh do site da UOL , www.folha.uol.com.br :
obs: img gerada do print screen.
Preciso urgentemente de formas de como faço para que ele atualize sozinho sem
que eu fosse la todos os dias atualizar.
Agradeço a compreensao.
Muito Obrigado.
- Fórum WMO
- → Viewing Profile: Tópicos: fabiosl
- Privacy Policy
- Regras ·