Jump to content


rcol36

Member Since 23/07/2007
Offline Last Active 20/12/2007, 15:09
-----

Topics I've Started

Formatação Do Numero

09/10/2007, 15:53

Tenho em meu site uma contagem regressiva de dez segundos, e gostaria de mudar o tamanho e a fonte dos numeros, e estou meio atrapalhado para resolver isto, segue o codigo da contagem:

<script type="text/javascript">
window.onload = function()
{
cont = 10;
verificaTempo();
}

function verificaTempo()
{
document.getElementById("countDown").innerHTML = cont;
cont--;

if( cont > -1 )
setTimeout("verificaTempo()", 1000);
else
alert("BUM!!!!");
}
</script>

<div id="countDown"></div>

[Resolvido] ConversãO De Variaveis

12/09/2007, 08:54

Estou tentando trazer do banco uma variavel do tipo varchar2 e transfoma-la em double, quando o numero vem inteiro, ele transforma numa boa mas como o numero vem por exemplo 3.5 ele da esse erro de conversão, alguem pode me dizer, se naum é possivel converter, ou onde estou errando:

CODIGO:

[codebox]Sub MontaTabRemuneracao()
Dim conexao
Dim valor

set conexao = CreateObject("ADODB.Recordset")
valor = CDbl(conexao("VALOR_ATUAL"))
Response.Write FormatCurrency(valor,2)

End Sub%>[/codebox]

Ae Galera, só para deixar como material pra quem tiver este problema:
O problema era no formato do numero, ele vinha com ponto do banco mais o FormatCurrency não conseguia formata-lo ai eu fiz este For e tranformei os pontos em virgulas, e funcionou.

Valeu
E ai vai o Codigo:

[codebox]
Sub MontaTabRemuneracao()
Dim conexao
Dim valor

set conexao = CreateObject("ADODB.Recordset")

valor = ""
For i = 1 to len(conexao("VALOR_ATUAL"))
If Mid(conexao("VALOR_ATUAL"),i,1) = "." then
valor = valor & ","
Else
valor = valor & Mid(conexao("VALOR_ATUAL"),i,1)
End If
Next

Response.Write FormatCurrency(valor,2)

End Sub%>[/codebox]

Centura

04/09/2007, 10:15

E aew galera!!!!
To precisando de algum material relacionado a essa linguagem chamada Centura, procurei pakas, mas naum achei nada consitente, se tiverem algo por favor me passem.

Grato.

Identificação Do Erro

23/08/2007, 15:13

Boa tarde galera!!!
Estou começando agora a mexer com asp, e fiz esse codigo simples de conexão a BD, mas ele da o sequinte erro:

*****


Technical Information (for support personnel)

Error Type:
Microsoft OLE DB Provider for ODBC Drivers (0x80004005)
[Microsoft][ODBC Microsoft Access Driver]General error Unable to open registry key 'Temporary (volatile) Jet DSN for process 0x7f4 Thread 0xf44 DBC 0x1f21a44 Jet'.
/r/teste.asp, line 53


Browser Type:
Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1; .NET CLR 1.0.3705; .NET CLR 1.1.4322)

Page:
GET /r/teste.asp

****

esse é o codigo:

<!--<%
sponsorURL = Request.querystring("url")
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("outpost.mdb")
sqlText = "insert into ad_log (sponsor, clickdate) values ('"
sqlText = sqlText & sponsorURL
sqlText = sqlText & "','"
sqlText = sqlText & NOW()
sqlText = sqlText &"')"
Conn.Execute(sqlText)
Conn.Close
set Conn = Nothing
%>-->

será que alguem pode me dizer aonde esta o erro???

Calendario Anual

02/08/2007, 16:59

Olá

Bom galera, estou com um problema...preciso fazer um calendario...que será mostrado em uma tela...ele tem de ser de jan a dez e com opção de trocar o ano, o adminnistrador da tela podera marcar alguns dias, e o usuario podera clicar naquele dia para abrir informações sobre aquela data...problema: Não sei nem como começar.


Se alguem puder me ajudar agradeço, pois estou perdido.


Valeu


Rodrigo Franchi

IPB Skin By Virteq