DELPHI-Man32

para gravar no banco de dados; nome = request.form("nome") idade = request.form("nome") sql = "insert into tabela(nome,idade) values('"&nome&"',"&idade&") conexao.execute(sql) response.write "Você cadastrou o nome: "&nome&", de "&idade&" anos." fechar conexao e destruir objeto Conexao.close set Conexao = nothing Obs: O chave primaria da tabela deve ser definida como um campo auto-increment, ou então criar uma rotina para incrementar o valor, que normalmente é um "ID" tipo integer;

<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=9,0,0,0" width="728" height="90"> <param name="movie" value="arquivo.swf" /> <param name="quality" value="best" /> <param name="menu" value="true" /> <param name="allowScriptAccess" value="sameDomain" /> <embed src="arquivo.swf" quality="best" menu="true" width="728" height="90" type="application/x-shockwave-flash" pluginspage="http://www.macromedia.com/go/getflashplayer" allowScriptAccess="sameDomain" /> </object> Acho que o ASP não tem nada a ver com isso, esse codigo ai não resolveria?

Se apenas para somar e saber a quantidade de registros, SQL no inicio e coloca o valor numa variavel, depois imprimi ela onde você quiser na pagina. sql = "select count(id) as total from tabela" set rs = conexao.execute(sql) total = rs("total") na hora de mostrar: <%=total%>

mas se eu passar nesse formato a data, o script não atualizado o contador, fica parado, não decrementa, se eu voltar ao formato Date(); ai sim ele atualiza o contador. estou criando a variavel e colocando o valor da data: no JS estou colocando o valor var hoje = new Date(<%=hojeASP%>); ele mostra o tempo que falta, mas fica parado sem atualizar. alguém sabe me dizer o por quê?

olá sebastiao, obrigado pela resposta, mas o que eu quero é saber qual o formato que sai dessa função Date() do java script, pra que colocar uma igual. ex. formado de saida da função dia 20/4/2011 e hora 15h00m25s quero saber como fica a saída da função, eu sei que ela pega a data do cliente e quero por exemplo usar as função do asp para montar o dia e colocar dentro dessa função, assim como você pode perceber na variavel "futuro". Thu Apr 21 16:05:42 UTC+0430 2011 <-- esse é o furmato, usando a função write.

<script type="text/javascript"> function atualizaContador(YY,MM,DD,HH,MI,saida) { var SS = 00; var hoje = new Date(); var futuro = new Date(<%=OfertaDia("v_ano")%>,<%=OfertaDia("v_mes")%>-1,<%=OfertaDia("v_dia")%>,23,59,59); var ss = parseInt((futuro - hoje) / 1000); var mm = parseInt(ss / 60); var hh = parseInt(mm / 60); var dd = parseInt(hh / 24); ss = ss - (mm * 60); mm = mm - (hh * 60); hh = hh - (dd * 24); var faltam = 'Faltam: '; //faltam += (dd && dd > 1) ? dd+' dias, ' : (dd==1 ? '1 dia, ' : ''); faltam += (toString(hh).length) ? hh+':' : ''; faltam += (toString(mm).length) ? mm+':' : ''; faltam += ss; if (dd+hh+mm+ss > 0) { document.getElementById(saida).innerHTML = faltam; setTimeout(function(){atualizaContador(YY,MM,DD,HH,MI,saida)},1000); } else { document.getElementById(saida).innerHTML = ''; setTimeout(function(){atualizaContador(YY,MM,DD,HH,MI,saida)},1000); } } window.onload=function(){ atualizaContador('<%=OfertaDia("v_ano")%>','<%=OfertaDia("v_mes")%>-1','<%=OfertaDia("v_dia")%>','23','59','elemento'); } </script> Olá pessoal, estou com esse script ai para fazer uma contafem regressiva de uma oferta num site, porém preciso informar ao script a data atual do servidor e não do computador cliente que roda o javascript, pois posso incorrer no erro da data do pc do visitante esteja errada, ai ele não mostrará o tempo restante, é tipo esse lance dos sites de compra coletiva. como posso colocar a data do servidor, tipo a data que vem do banco de dados como já esta no script? var hoje = new Date(); <<---------- aqui, pois pega a data atual do pc, quero colocar ai a do servidor, usando asp. qualq seria o formado dessa data ai em JS? abraços.

'rapidim... sql = "select sum(comissao) as total from vendas" set rs = conexao.execute(sql) comissao_vendedor = rs("total") response.write "R$ "& comissao_vendedor não resolve isso ai em cima?

olá pessoal, o q quero é o seguine! numa página ASP, receberei varios registros, e para cada registro será criado um checkbox com valor do id do registro! nessa mesma página quero uma função em javascript para criar um array onde os elementos serão os valores dos ids que estao nos checkbox's! tipo: os checkbox's [ ] João, id=1 [ ] Pedro, id=2 [ ] Carlos, id=7 ai quando o usuario clicar nos checkbox's chama a função q vai incrementar o array com os valores seleionados (id); Ex. Se for clicado em: joao e pedro, nessa orderm! o array terá: Array[1,2]; caso seja carlos e pedro Array[7,2]; depois do array montado, ele será jogado num url passando para outra asp a qual ira inserir noutra tabela esses valores dos ids tipo: grava.asp?arrayID=7,2 ou grava.asp?arrayID=1,2 beleza?

amigo você pode! Dim Data Data = Now 'retorna daa e hora Dim Dia, Mes, Ano, Data Dia = Day(now) Mes = Month(now) Ano = Year(now) Data= Dia&"/"&Mes&"/"&Ano

não sei, mas pode ser tamanho do campo menor que o conteudo! dê uma olhada também no sql! executar= "update noticias set conteudo = '"&VarDesc&"',data = '"&vdata&"',fonte = '"&vfonte&"',titulo = '"&vtitulo&"' where codigo = "&id&"" separa os campos do update! executar= "update noticias set conteudo = '"& VarDesc &"', data = '"&vdata&"', fonte = '"&vfonte&"', titulo = '"&vtitulo&"' where codigo = "& id &""

feriadao de carnaval, tava off!!! mas eu no mesmo dia eu resolvi! funçei ate arrumei! agora a certinho! abração Rafa! obrigado!

me pareve um erro de concatenaçao da string... '9:43:53,IpAlterado='192.168.0.1' WHERE ID=17' -------------^

valeu Rafa! eu tinha feito isso, mas acontece um erro que não sei porquê! veja só! quando desenho a imagem no relatório, ele fica desorganizado os dados do loop que pegaos valores do banco de dados! já quando eu deixo sem imagem, ele gera o raltório certinho! segue os links! Com a imagem no relatorio! pdf com imagem sem a imagem sem imgame com logo, mas sem os dados do banco(sem loop) com logo, mas sem os dados do banco(sem loop) veja ai e me diz! o que pode estae errado... abração segue o script! <%@LANGUAGE="VBSCRIPT"%> <% Dim RelatorioPDF, i,a,y Dim RelatorioPDF_numRows 'variaveis com as coordenadas para impressao de textos do loop i = 40 'coordenadas gerais a = 10 y = 30 z = 35 Set Conn = Server.CreateObject("ADODB.Connection") Conn.open "PROVIDER=Microsoft.JET.OLEDB.4.0; Data Source="& Server.MapPath("*********") Set RelatorioPDF = Conn.Execute("select * from ESCOLAS order by nome asc") Set TotalEscolas = Conn.Execute("select count(id) as Total from ESCOLAS") Set TotalSalas = Conn.Execute("select SUM(salas) as Salas from ESCOLAS") RelatorioPDF_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = -1 Repeat1__index = 0 RelatorioPDF_numRows = RelatorioPDF_numRows + Repeat1__numRows %> <!--#include file="fpdf.asp"--> <% dim pdf, caminho '// criando o pdf logo = "logo.jpg" set 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 folha pdf.CreatePDF "P","mm","A4" pdf.SetPath("fpdf/") pdf.Open() '// adcionando página pdf.AddPage() '// setando grossura da linha pdf.SetLineWidth(0.3) '// setando fonte e tamanho pdf.SetFont "Arial","B",12 'texto do topo do documento pdf.Text "10","15","PREFEITURA MUNICIPAL DE JACUNDÁ" pdf.SetFont "Arial","",10 pdf.Text "10","19","SECRETARIA MUNICIPAL DE EDUCAÇÃO" pdf.Text "10","23","SIMAE - Sistema Integrado de Matrículas e Acompanhamento Escolar" pdf.Text "10","29","Relatório Simplificado: ESCOLAS CADASTRADAS" '// 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. '// 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. pdf.Line "10",31,"200",31 pdf.SetFont "Arial","B",8 '// escrevendo um texto pdf.Text "10",z,"TIPO:" pdf.Text "25",z,"NOME:" pdf.Text "75",z,"LOCALIZAÇÃO:" pdf.Text "100",z,"CÓD. INEP:" pdf.Text "129",z,"SALAS:" pdf.Text "145",z,"DIRETOR:" pdf.Line "10",36,"200",36 pdf.SetFont "Arial","",8 While NOT RelatorioPDF.EOF pdf.Text "10",i,RelatorioPDF.Fields.Item("moda").Value pdf.Text "25",i,RelatorioPDF.Fields.Item("nome").Value pdf.Text "75",i,RelatorioPDF.Fields.Item("localiza").Value pdf.Text "100",i,RelatorioPDF.Fields.Item("inep").Value pdf.Text "130",i,RelatorioPDF.Fields.Item("salas").Value if RelatorioPDF.Fields.Item("diretor").Value = "" then pdf.Text "145",i,"*******************" else pdf.Text "145",i,RelatorioPDF.Fields.Item("diretor").Value end if i = i+5 RelatorioPDF.MoveNext() Wend pdf.Line "10",i,"200",i pdf.Text "10",i+5,"Total de Escolas: "& TotalEscolas("Total") &", Total de Salas de Aula: "& TotalSalas("Salas") pdf.Text "10",i+10,"Relatório Gerado em: "& Day(Now)&"/"&Month(Now)&"/"&Year(Now) &" às "& Time() pdf.Close() pdf.Output() %> <% RelatorioPDF.Close() Set RelatorioPDF = Nothing %>

valeu Rafa!!!

olá pessoa, fiz uma busca e encontrei em parte o que preciso, gerar pdf com dados do mdb! ok, encontrei e adaptei. mas não encontrei nada sobre a função Image() do Fpdf! tentei usar, mas não da certo, estou usando o ASP para gerar o arquivo; gostaria de uma luz para poder insetir uma logo da empresa no relatorio, no topo acima do noma da empresa!!!! tentei. pdf.image("logo.jpg",10,50,0,0) mas deu erro dizendo que não posso usar parenteses para chamar a função! valeu

olá pessoal, depois de algum tempo longe voltei com esse layout de um site simples para uma empresa de taxi aereo. link: LINK PARA AVALIAÇÃO outra coisa, quanto cobrar por um projeto desses, como estpa o mercado? POR FAVOR...avaliem. Cores, Layout, Organização, etc. abraços a todos da comunidade. t++

obrigado Jonathan Queiroz, isso que dá você se dedicar a apenas uma plataforma de desenvolvimento, kkkk vou testar!

valeu Romerit, só que ele continua validando somente os do tipo input porque na condição de verificação: if ( frm.elements[i].value == "" ){ esta verificando somente os campos vazios, mas os select tem valor inicial "..." como poderia comparar os dois valores num mesmo if? poderia usar um "or"? ate mais

function valida(local){ var localValidar = document.getElementById('Escola'); var formulario = localValidar.getElementsByTagName("input"); for (var i=0; i < formulario.length; i++){ if (formulario[i].value == ""){ var aux = formulario[i].title.toUpperCase(); alert ("O campo " + aux + " deve ser preenchido"); formulario[i].style.backgroundColor = "#ffffcc"; formulario[i].focus(); return false; } } return true; } olá pessoal, segue esse codigo ai q to usando para validar um form dinamicamente, mas ele só valida campos do tipo "input" como adapta ele para validar tambem campos do tipo "select" em que a primeira opção seja "..."? desde já agradeço a todos

se você tiver iniciando, recomento o ASP por ser uma linguagem mais facil de aprender, depois você pode migrar para outra linguagem se preferir, sem contar q você cria um banco access sem segundos.

cara seu tópico esta muito vago, primeiro você só colocou o script e nem citou nada! segundo! simplefica suas classes e terceiro, você sabe inserir no banco usando sql? ah!! qual seu objetivo com essa inserção de variavel no banco de dados? para inserir, faz como o Jow falou ai! segue os passos: 1 - faz a conexao; 2 - pega a var; 3 - inseri no banco; 4 - mostra o valor;

tenho um conhecimento em ASP porem não muito em AS! então se você puder mandar seu exemplo em php, eu agraderia. meu problema maior é receber os dados no flash e animar. estava pensando em fazre um array com seis posições no ASP com as 6 ultimas noticas no DB eu então um loop para montar a sequencia de noticias no ASP. <% Function Dados(Instrucao) Dados = BD.Execute(Instrucao).GetRows() End Function Dim SQL Dim arrDados Dim intI SQL = "SELECT titulo FROM noticias" arrDados = Dados(SQL) If IsArray(arrDados) Then For intI = 0 To UBound(arrDados,1) arrDados(0,intI)%> Next End %> ou <% while not RS.eof response.write RS("titulo") &"<br>" RS.MoveNext Wend %> acho q seria algo assim no ASP, agora como pegar os valores do Array dentro do Flash? como animar esses titulos dentro de um MC? uma anição simples, da direita para esquerda interpolando... Ate mais.

procurei, procurei aqui no forum, mas a maioria dos topicos estao vagos e sem resposta. é o seguinte: Tenho um swf de 200x195 nele duas layers: Fundo e botoes tem um MC, instanciado como "mc" e um dynamic text inst. como Texto, esse campo está dentro do MC. para pegar o texto, estou usando um txt. so para teste. ate aqui, beleza, dentro do flash e texto aparece quando você testa o filme, quando coloco no navegador aparece "undefined". quero saber como faço para pegar as noticias do db, atraves deuma página asp, e animar essas noticias, passando uma a uma, são 5 ultimas. Se alguém tiver o componente: Flash news ticker(deve ser assim) manda pro meu email: mf_vagner@hotmail.com

olá pessoal, depois de alguns meses sem frequentar o forum, estou retornando com um problema em asp. estou fazendo um sistema de noticias e no banco de dados tenho apenas: id, data, titulo, cidade, local, hits. o campo local, contem o nome de um arquivo de texto. ex: 03102007_001.txt este arquivo estará numa pasta do servidor e será chamado atraves de um include file dentro da pagina de noticias. vamos ao script. <% 'antes vem a conexao e a criação do RS Dim Local Local = "<!--#include file=noticias/"& RS("local") &"-->" . . . . <% response.write (Local) %> mas não aparece o arquivo chamado na inclusao e também não dá erro no ASP, fica vazio o lugar onde apareceria a noticia. olhei o HTML depois de gerado e ta certinho. <!--#include file=noticias/03102007_001.txt--> será que alguém tem uma solução para este incomodo problema? desde já agradeco.

os botoes estao exagerados e esse texto no fundo não ficou legal como a sombra das curvas, mas está no caminho certo.! abraços