Jump to content


faixa_preta

Member Since 01/05/2005
Offline Last Active 12/03/2009, 10:12
-----

Topics I've Started

Erro Punk Rock!

13/06/2007, 16:21

Fala ai rapazeada..

espero que alguem possa me ajudar...
ate ontem o sistema mexo estava funcionando bem demais.............. porem no dia de hj ele deu um tilt do mal! e nao funciona mais a parte de inserir no banco.

tento inserir os dados e me aparece a linad msg de erro:

[codebox]Microsoft JET Database Engine erro '80004005'

A operação deve usar uma consulta atualizável.

/LM/W3SVC/1058982575/Root/global.asa, line 105
[/codebox]

a linha 105 seria essa:

[codebox] dim tbs(3)
tbs(0)="tbYears"
tbs(1)="tbMonths"
tbs(2)="tbDays"

Application("level")=""


objDb=server.MapPath("/scripts/resultados/bd1.mdb")
set objConn=server.createObject("ADODB.Connection")
objConn.open"provider=Microsoft.jet.OLEDB.4.0;Data source="&objDb&""

'_______________Begin_Hits/Dia

set objTable3=objConn.execute("Select count(id<>0) from "&tbs(2)&" where cdYear="&data(2)&" and cdMonth="&data(1)&" and cdDay="&data(0)&"")
if objTable3.fields("Expr1000")>0 then
set objTable3=objConn.execute("Select * from "&tbs(2)&" where cdYear="&data(2)&" and cdMonth="&data(1)&" and cdDay="&data(0)&"")
sql3="update "&tbs(2)&" set cdHits="&objTable3.fields("cdHits")+1&" where cdYear="&data(2)&" and cdMonth="&data(1)&" and cdDay="&data(0)&""
linha 105---> objConn.execute(sql3)
else
sql3="insert into "&tbs(2)&"(cdYear,cdMonth,cdDay,cdHits) values("&data(2)&","&data(1)&","&data(0)&",1)"
objConn.execute(sql3)

end if

'_____________End Hits/Ano
[/codebox]

Pois bem, li, reli e nada............
se alguem puder ajudar!

um grande abraço!!!

Organizando Numeros (dezenas)

31/10/2006, 15:01

Fala ae rapazeada do forum! Salve... Salve!!!

Bem aqui estou eu novamente com dúvidas em my head! bem, vamos lá... Vejamos se alguem pode me ajudar.

Seguinte, tenho 1 pagina e a mesma tem 1 form, este form, vai receber somente numeros (ou grupo de 4 ou de 6 numeros). (2 DEZENAS ou 3 DEZENAS) Minha duvida é a seguinte, como faço para organizar esses numeros antes de salvar em 1 coluna no banco?

Tipo o cliente digita: 010502 e antes de de salvar no banco, organizar para 010205.

To queimando a cabeça e ta complicado isso hein.... quando organiza ele fica 000125..!

Alguem ai poderia ajudar?! Já pesquisei algo em javascript LENGTH mais nao achei nada.

ABRAÇOOOO AE GALERA!!!!!!!!!! :assobio:

Newsletters Cdonts. Html C/ Imagens

18/09/2006, 11:17

Fala ai rapazeada!! blzura?!

Bem, o problema de hj é o seguinte... fiz uma newletters, e consigo fazer o envio tranquilamente em formato de texto.. Porém para ficar uma coisa mais apresentavel resolvi enviar em html. Esse foi o problema!!.. O bagulho não esta enviando nem por nada!!...............

fiz um exemplo de como quero que a galera recebe os emails:

http://www.xxx.com.br/newsletters/

Alguem poderia me ajudar..... Olha o código que fiz para tentar enviar dessa forma...

<!--#include file="conexao.asp"-->
<%
Server.ScriptTimeout = 2000000000
Response.Buffer = True

If IsEmpty(Session("subject")) Then
	Session("subject") = request("subject")
End If

If IsEmpty(Session("message")) Then
	Session("message") = request("message")
End If

Set RS = Server.CreateObject("ADODB.Recordset")
RS.ActiveConnection = conn
RS.CursorLocation = 3
RS.LockType = 1
strSQL = "select email, subject, message"
RS.Open strSQL
Set rs.ActiveConnection = Nothing

   
Function envia_email(email,subject,message)

	HTML = "<HTML><HEAD><TITLE>Novidades Tec Prima Cartões</TITLE></HEAD>"
	HTML = HTML & "<body bgcolor=#ffffff leftMargin=0 topMargin=0 marginheight='0' marginwidth='0' text=ffffff>"
	HTML = HTML & "<table border='0' cellpadding='0' cellspacing='0' width='550'> <tr>"
	HTML = HTML & "<td><img src='http://www.xxx.com.br/newsletters/images/spacer.gif' width=550 height=1 border=0></td>"
	HTML = HTML & "<td><img src='http://www.xxx.com.br/newsletters/images/spacer.gif' width=1 height=1 border=0></td>"  
	HTML = HTML & "</tr><tr><td><img name='index_r1_c1' src='http://www.xxx.com.br/newsletters/images/index_r1_c1.gif' width=550 height=34 border=0></td>"
	HTML = HTML & "<td><img src='http://www.xxx.com.br/newsletters/images/spacer.gif' width=1 height=34 border=0></td>"   
	HTML = HTML & "</tr><tr><td bgcolor='#56AA1C'><table width='100%'  border='0' cellspacing='0' cellpadding='0'>"	 
	HTML = HTML & "<tr><td width='34%'><div align='center'><img src='http://www.xxx.com.br/newsletters/images/logo.gif' width='168' height='73'></div></td>"	
	HTML = HTML & "<td width='66%'><div align='right'><img src='http://www.xxx.com.br/newsletters/images/escrita.gif' width='288' height='73'></div></td>"	  
	HTML = HTML & "</tr></table></td><td><img src='http://www.xxx.com.br/newsletters/images/spacer.gif' width='1' height='76' border='0'></td>"	
	HTML = HTML & "</tr><tr><td><img name='index_r3_c1' src='http://www.xxx.com.br/newsletters/images/index_r3_c1.gif' width='550' height='43' border='0'></td>"	 
	HTML = HTML & "<td><img src='http://www.xxx.com.br/newsletters/images/spacer.gif' width='1' height='43' border='0'></td>"		 
	HTML = HTML & "</tr><tr><td><div align='justify'>" &request.form("message")& "</div></td>"
	HTML = HTML & "<td><img src='http://www.xxx.com.br/newsletters/images/spacer.gif' width='1' height='264' border='0'></td>"					
	HTML = HTML & "</tr><tr><td><img name='index_r5_c1' src='http://www.xxx.com.br/newsletters/images/index_r5_c1.gif' width='550' height='33' border='0'></td>"			
	HTML = HTML & "<td><img src='images/spacer.gif' width='1' height='33' border='0'></td>"
	HTML = HTML & "</TR></table<table width='600'  border='0' align='center' cellpadding='0' cellspacing='0'><tr><th scope='row'>&nbsp;</th>"		 
	HTML = HTML & "</tr></table></BODY></HTML>" 


	Set objeto = Server.CreateObject("CDONTS.NewMail") 'cria o objeto'
	objeto.From = "mario@xxx.com.br" 'Email de quem envia a mensagem. Neste caso o email digitado no formulario'
	objeto.To =  rs("email") 'Email que vai receber a mensagem'
	objeto.Subject = request.form("subject") 'assunto da mensagem'
	objeto.Body = HTML
	objeto.Bodyformat = 0 'faz com que o cdonts envie conteudo html'
	objeto.MailFormat = 0 'faz com que o cdonts envie conteudo html'
	objeto.Body = request.form("message")
	objeto.Send 'envia a mensagem'
	Set objeto = Nothing 'finaliza o objeto'

End Function

Se alguma alma puder ajudar ai.. seria de bom agrado!

Duvidas Exibir Resultado

23/08/2006, 14:09

Fala ai rapeize! na moral?

Seguinte.. to com uma duvida cruel..... Tenho uma pagina em ASP. Essa pagina eu preciso exibir o NOME DO ALUNO MAIS VELHO, NOME DO MAIS NOVO E A QUANTIDADE DE ALUNOS.

Consigo exibir o ALUNO MAIS VELHO. Porém ja tentei inumeras vezes e nao to conseguinto exibir o NOME DO ALUNO MAIS NOVO, e nem a QUANTIDADE DE ALUNOS.

Como podem ver na pagina:
http://www.gastando....e/1/calculo.asp
Eu consigo exibir o ALUNO MAIS VELHO... Sei que colocando DESC depois do nascimento ele ordena o mais novo.... Porém, como fazer isso ? eu to fazendo e ta dando conflito...

eu teria que fechar o banco e abrir denovo? to perdidao!! :wacko:

eu to usando o seguinte codigo.

<% set conexao = Server.CreateObject("ADODB.Connection")
conexao.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("pecas.mdb") & ";Persist Security Info=False" 
Set rstCarro=Server.CreateObject("ADODB.RecordSet")
rstCarro.Open "Select TOP 1 aluno, nascimento, med1, med2, med3, med4, (med1+med2+med3+med4) /4 AS Media From carro order by nascimento", conexao %>


Alguém poderia ajudar? sei nada de SQL.. e to aprendendo.. conseguindo fazer isso.. ja vai ajudar pra caramba!!

Abração para todos!!!!!

Exibir Consulta... Problemas!

18/08/2006, 09:48

Bom dia rapazeada! blza?
eis me aqui novamente com minhas duvidas inacabaveis!!

agora sao 2.. hehehehe!!

DÚVIDA 01
Tenho 1 banco. puxo as info desse banco e faço um calculo na pagina... ele pega a data de nascimento - data atual e da a idade.. porém o resultado esta vindo assm: 29.3369863013699. Utilizei o FIX para nao mostrar os numeros depois do ponto... só que não funcionou! :huh:

DÚVIDA 02
Resolvendo ou nao esse problema da idade, gostaria de saber, como puxar o nome do aluno mais velho na tabela e jogar em qualquer lugar da pagina... o banco ja esta ordenado pela data de nascimento (order by nascimento) só que eu quero somente pegar o nome do aluno mais velho... eu consigo puxar, só que vem a coluna inteira com todos os nomes!!

alguem poderia ajudar??

vlw rapazeada!!! :boxing:

IPB Skin By Virteq