Jump to content


UweedI's Content

There have been 17 items by UweedI (Search limited from 30/03/2023)


Ordernar por                Order  

#457383 Pausar Uma Movie

Posted by UweedI on 06/10/2004, 10:55 in Adobe Flash e ActionScript

valeu velho.... muito obrigado !!

[]'s



#457349 Pausar Uma Movie

Posted by UweedI on 06/10/2004, 10:16 in Adobe Flash e ActionScript

Ola,
gostaria de saber como fazer para pausar um movie e retornar depois de um determinado tempo..... tipo como sleep(30) que pausaria o programa por 30 segundos

Obrigado desde de já

[]'s



#261454 Parar Apenas Uma Camada

Posted by UweedI on 22/12/2003, 11:27 in Adobe Flash e ActionScript

Por favor, tenho uma animação aonde no final aparecem algumas coisas escritas, gostaria de que estas palavras ficassem paradas e o resto continuasse desde o começo novamente...
tem como ??

[ ]'s



#220085 Ajuda

Posted by UweedI on 31/10/2003, 09:55 in ASP

faz assim:
primeiro vc da um response.write pra ve se o nome do usuario esta vindo mesmo

<%
usuario=request.querystring("usuario")
response.write "Usuario "&usuario
response.end
%>
se estiver ok retire os response.write e troca o seu selct por esse:

sql = "select pm,pb,tp,tc,si,te,media,faltas from "&usuario&"order by Código"



#219737 Erro Na Paginação

Posted by UweedI on 30/10/2003, 17:01 in ASP

tenta deste jeito aqui

<%
Dim login
login = request.form("login") 'recuperando o valor para login numerico

if login="" then
login= request.querystring("login")
end if

n_page=request("n_page")
If n_page="" Then n_page = 1

set db = server.CreateObject("ADODB.Connection")
db.Open "DBQ=C:\inetpub\wwwroot\monitoria\monitoria.mdb;Driver={Microsoft Access Driver (*.mdb)}"
Set RecSet=Server.CreateObject("ADODB.Recordset")
RecSet.Open "SELECT * FROM monitorias WHERE re= "& login & "", db, 3,3

IF RecSet.EOF then
Response.Write "nenhum registro encontrado"
Response.End 'paramos o programa
ELSE
RecSet.PageSize = 1 'registros por página
RecSet.AbsolutePage = Cint(n_page) 'redireciona os registros para a página
contador=0
do While not RecSet.EOF AND contador < RecSet.PageSize
contador=contador+1
response.write "<font face=verdana size=2><b>"
response.write RecSet("nome")&"</b><BR>"

RecSet.MoveNext
loop

response.write "<br>"

For navega= 1 to RecSet.PageCount
If navega = Cint(n_page) Then
response.write "<font face=verdana size=2><b>"
response.write navega
Else
response.write "<font face=verdana size=2><b>"
response.write space(1) & "<a href=paginacaoteste4.asp?login=" & login & "&n_page=" & navega & ">" & navega & "</a>" & space(1)
End If
Next

response.write "<br><br>"

anterior = n_page - 1
proxima = n_page + 1

If anterior > 0 Then
response.write "<a href=paginacaoteste4.asp?n_page="&anterior&"&login =" & login & ">Anterior</a>"
End If

If proxima < navega Then
response.write space(1) & "<a href=paginacaoteste4.asp?n_page="&proxima&"&login =" & login & ">Próxima</a>"
End If
End If
%>



#219114 Erro Na Paginação

Posted by UweedI on 29/10/2003, 18:29 in ASP

blz cara
é o seguinte: quando vc faz uma busca utilizando like ele devolve todos os resultados que tenham na string o valor do like
exemplo:
banco= login1
digito =1
no resultado vai aparecer o login1 tbm, pois nele vc tem a string 1 tbm

acredito que deve estar retornando mais de um resultado por causa disso
para testar se é isso mesmo troque
RecSet.Open "SELECT * FROM monitorias WHERE re LIKE '%" & login & "%'", db, 3,3
por
RecSet.Open "SELECT * FROM monitorias WHERE re = '%" & login & "%'", db, 3,3

[ ]"s



#219099 Parar Execução De Script

Posted by UweedI on 29/10/2003, 17:55 in ASP

response.end



#219098 Sistema De Login

Posted by UweedI on 29/10/2003, 17:53 in ASP

tente colocar desta forma:

tempo=now()
query = "INSERT INTO User_LogTime (user_id, SID, Login_Time, user_ip) VALUES ('" & Session("member") & "','" & Session.SessionID & "','" &tempo & "', '" & ip_usr & "')"



#216969 >> E-commerce Virtuastore Asp Ajuda Ae

Posted by UweedI on 26/10/2003, 02:01 in ASP

vc ja verificou as datas??



#216956 Gb

Posted by UweedI on 26/10/2003, 00:53 in ASP

Bom Fernando,
Acredito que não aconteceu nada pq vc passou o numero como numero mesmo

passe este valor como uma string pois so assim vai funcionar, e se so para corrigir o ultimo post se vc reparar vai ver que seu não dei left(var,3), e sim primeiro eu conto quantas casas tem ate o ponto ou virgula, somo dois e depois dou o left com esse valor

coloca assim que vai funcionar

num=18.2333 'aqui vc vai entrar com qualquer numero
num=cstr(num)
num=replace(num,".",",")

numero=split(num,",")
total=len(numero(0))
total=total+2
numero=left(vari,total)
numero=replace(numero,",",".")
response.write "o numero agora é: "&numero



#216160 Gb

Posted by UweedI on 25/10/2003, 01:37 in ASP

i ai cara,
tipo eu não sei se tem alguma função que faz isso direto
sei que assim vai dar o resultado que vc quer

num="19,7654321" 'aqui entra o numero que vc quer

numero=split(num,",") 'aqui ele vai pegar apenas os caracteres antes da virgula

total=len(numero(0)) 'neste ponto ele conta qunatos caracteres tem

total=total+2 'soma mais dois pra ficar 1 depois da virgula

numero=left(vari,total) 'pega todos os caracteres mais 1 depois da virgula

response.write "o numero agora é: "&numero



#215640 Tempo Em Asp

Posted by UweedI on 24/10/2003, 12:58 in ASP

valeu cara
mas eu gostaria de saber mesmo er ama propriedade que pausase a aplicação
mas se vc falou que não existe............faze oq né

['s



#213574 Tempo Em Asp

Posted by UweedI on 21/10/2003, 16:13 in ASP

queria saber se tem alguma função que pause a execuxao do codigo, do tipo: delay, sleep, timer...



#213286 Formulário

Posted by UweedI on 21/10/2003, 01:40 in ASP

se for da maneira como entendi o jeito mais simples de fazer isso e enviando a responsta do seu questionario atraves do Cdonts pro exemplo.
vc cria uma nova pagina ASP que recebe todos os campos do formulario e anexa ao corpo do email e depois envia este para o seu email.



#212312 Insert: Erro De Sintaxe

Posted by UweedI on 19/10/2003, 15:15 in ASP

i ai cara experimenta verificar o sql resultante, desta forma:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<% Option Explicit %>
<% 'insere usuario
Dim conexao, rs, sql, usuario, matricula, dsn, rs2, sql2, id_dep, rsVerifica, hora_completa, hora, minuto, data_completa, dia, mes,
ano, solicitacao, descricao
usuario= TRIM(request.form("usuario"))
matricula= TRIM(request.form("matricula"))
solicitacao= TRIM(request.form("solicitacao"))
id_dep= TRIM(request.Form("departamento"))
descricao= TRIM(request.Form("descricao"))
hora=Hour(now)
minuto=Minute(now)
dia=Day(date)
mes=Month(now)
ano=Year(now)
hora_completa=hora & ":" & minuto
data_completa=dia & "/" & mes & "/" & ano
sql="insert into solicitacao(num_sol,hr_1,dt_1,desc) values('"&solicitacao&"','"&hora_completa&"','"&data_completa&"','"&descricao&"')"
sql2="insert into solicitacao_usuario(num_sol,matricula,nm_func,id_dep,hr_1,dt_1,desc) values('"&solicitacao&"','"&matricula&"','"&usuario&"','"&id_dep&"','"&hora_completa&"','"&data_completa&"','"&descricao&"')"

response.write "sql="& sql&"<br>"

response.write "sql2="& sql2&"<br>"

response.end


Set conexao= server.CreateObject("ADODB.Connection")
dsn = "d:\web\insite3d\dados\sigesa.mdb"
conexao.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & dsn& ";"
Set rsVerifica = conexao.Execute("Select matricula from lotacao Where matricula= "+matricula+" AND nm_func='"+usuario+"' AND id_dep='"+id_dep+"' ")
If rsVerifica.EOF <> True Then
set rs=conexao.execute(sql)
set rs=Nothing
set rs2=conexao.execute(sql2)
set rs2=Nothing
response.Redirect("confirmacao_solicitacao.htm")
Else
Response.write "<p>&nbsp;</p>"
response.write "<p><center><img src='http://www.aspecto.net/sigesa/imagens/logopeq.gif'></center>"
response.write "<br>"
Response.Write "<center><strong><font size=2 face=Verdana, Arial, Helvetica, sans-serif>Dados incorretos!</font></strong></center><p><center><img src='http://www.aspecto.net/sigesa/imagens/gif/fechar.gif'</img></center>"
Response.End
End If
%>


depois disso pegue o resultado obtido no browser e tente executar diretamente no banco, se der certo o erro deve estar na sua conexão ou algo assim, caso de erro dai deve ser incompatibilidade de dados ou sei la, mas fazendo isso no minimo vc vai ter como saber se os dados estão entrando corretamente, acredito que com isso vc consiga resolver seu problema.

[]'s
Uweedy



#210585 Insert: Erro De Sintaxe

Posted by UweedI on 17/10/2003, 00:55 in ASP

Qual erro esta dando???
vc possui campo chave primaria nesta tabela??



#209851 Asp Dentro De Asp

Posted by UweedI on 16/10/2003, 01:04 in ASP

intaum cara se vc quer atribuir valores a variaveis não precisa usar as tags é so colocar sem elas

hora= Hour(now)
minuto=Minute(now)
dia= Day(date)
mes=Month(now)
ano=Year(now)




IPB Skin By Virteq