cyberalexxx
-
Total de itens
2.500 -
Registro em
-
Última visita
Tudo que cyberalexxx postou
-
Acho que o melhor jeito é usar select top 2, e de cara já dar um MoveNext no recordset
-
Explica melhor!! Como você quer as colunas? Uma coluna para cada mes??
-
Voce pode contar o numero de produtos que tem determinada idcategoria, caso seja maior q zero ai você mostra. Contando: SQL ="Select Count(tabelaprodutos.idcategoria) as quantidade from tabelaprodutos Where tabelaprodutos.idcategoria='"="&("idcategoria") &"" depois é so verificar se o campo quantidade do RecordSet é maior que zero. entendeu??
-
é só usar: <% Response.ContentType = "application/msword" %> no inicio do arquivo ASP
-
Voce deve fazer as seguintes mudanças: Essas mudanças colocam a mensagem no padrão html agora você pode inserir qualquer tag html dentro da mensagem tipo <a href="site.com.br">link</a> Olha um exemplo completo tirado da documentação do CDONTS na microsoft: <%@ Language=VBScript %> <HTML> <HEAD> <META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0"> <% Dim myMail Dim HTML Set myMail = CreateObject("CDONTS.NewMail") HTML = "<!DOCTYPE HTML PUBLIC""-//IETF//DTD HTML//EN"">" HTML = HTML & "<html>" HTML = HTML & "<head>" HTML = HTML & "<meta http-equiv=""Content-Type""" HTML = HTML & "content=""text/html; charset=iso-8859-1"">" HTML = HTML & "<meta name=""GENERATOR""" HTML = HTML & " content=""Microsoft Visual Studio 6.0"">" HTML = HTML & "<title>HTMLMail</title>" HTML = HTML & "</head>" HTML = HTML & "<body bgcolor=""FFFFFF"">" HTML = HTML & "<IMG SRC=""http://www.microsoft.com/library/" HTML = HTML & "images/gifs/homepage/microsoft.gif"" BORDER=0 " HTML = HTML & "WIDTH=167 HEIGHT=36 ALT=""Microsoft Corporation"">" HTML = HTML & "<p><font size =""3"" face=""Arial""><strong>" HTML = HTML & "Microsoft Exchange CDONTS Example</strong></p>" HTML = HTML & "<p><font size =""2"" face=""Tahoma"">" HTML = HTML & "CDO for NTS allows an easy way to send mail.<br>" HTML = HTML & "This example shows how the content can be " HTML = HTML & "an HTML page<br>" HTML = HTML & "which allows you to send rich text and" HTML = HTML & "inline graphics.</p>" HTML = HTML & "</body>" HTML = HTML & "</html>" myMail.From="someone@microsoft.com" myMail.To="someone@microsoft.com" myMail.Subject="Sample CDONTS HTML Message" myMail.BodyFormat=0 myMail.MailFormat=0 myMail.Body=HTML myMail.Send set mymail=nothing Response.Write "Message Sent" %> </HEAD> <BODY> </BODY> </HTML>
-
Voce que usar txt com asp??? Ou quer usar txt com cgi que talvez seu servidor tenha suporte?? Se for CGI me avisa que eu movo o tópico pra lá. Caso seja txt com asp, faça uma busca no forum que tem varios tópicos sobre FSO e arquivos txt.
-
na pagina resultados.asp você deixa a instrução SQL assim search = request.form("search") SQL = "SELECT * FROM imoveis WHERE nomedocampo='" & search &"'" entendeu??
-
mais esse metodos utilizam outro metodo... para criar o rs não entendi o q você quiz dizer
-
faz assim: <% if request.form("BtnCalc") <> "" then Salario = request.form("TxtSalario") Salario = Clng(Salario) if Salario < 500 then Novo_Salario = Salario * 1.15 end if if Salario <= 1000 and salario > 500 then Novo_Salario = Salario * 1.10 end if if Novo_Salario > 1000 then Novo_Salario = Salario * 1.05 end if response.write Novo_Salario end if %> <form name="Calc_Porcento" method="post"> Digite o salario:<input type="Text" name="TxtSalario"><br> <input type="Submit" name="BtnCalc" value="Calcular"> </form>
-
continuo não entendendo muito bem, busca por código?? Seria um Select eu algum campos que obedeça uma condição?? tipo SELECT * from tabela where campo=condição
-
Ta dando erro? Que erro? em que linha?
-
Para exibir a pagina atual: response.write pag Para exibir o total de paginas: response.write rzo.PageCount para exibir o nº de 3 paginas: criar um contador de pag até pag+2 a lógica é essa, procure desenvolver, infelizmente to sem tempo agora pra adaptar esse seu código
-
Cara!! poe o código todo ai pra gente dar uma olhada
-
Voce fez isso? <% on error resume next Set objUpload = Server.CreateObject("Dundas.Upload.2") objUpload.UseVirtualDir = false objUpload.Useuniquenames = false objUpload.MaxFileSize = 3048576 objUpload.Save "e:\home\aerostarleme\web\imagens\avioes" Set FSO = Server.Createobject("Scripting.FilesystemObject") For Each File in objUpload.Files path = File.OriginalPath file = FSO.GetFileName(path) response.write (file) & "<br>" Next %>
-
Esse é o código funcionando??
-
2 dicas, são basicas, mais nunca é demais: Usar replace nos campos dos formulários para substituir possiveis aspas simpes ' (usado para impedir SQL Injection) Usar Html.Encode para evitar que o usário insira tags que possam desconfigurar seu sistema
-
Eu acessei aki e também não apareceu, e meu navegar ta configurado para aceito cookies.
-
pelo x vermelho, é imagem não encontrada.
-
é so criar uma célula dentro do loop (for / next)
-
Coloque o response.write dentro do For/Each
-
Criando o link: <%Set FSO = Server.CreateObject("Scripting.FileSystemObject") Set principal = FSO.GetFolder("c:\intranet") ' coloque a pasta principal Set arquivos = principal.Files 'criando vetor dim nome nome=array() For each arq in arquivos redim preserve nome(Ubound(nome)+1) nome(Ubound(nome)) = arq.name next 'listando arquivos for x = 0 to Ubound(nome) %> <a href="<%=nome(x)%>"><%=nome(x)%></a><br> <%next%>
-
Listando os arquivos de uma pasta: <%Set FSO = Server.CreateObject("Scripting.FileSystemObject") Set principal = FSO.GetFolder("c:\intranet") ' coloque a pasta principal Set arquivos = principal.Files 'criando vetor dim nome nome=array() For each arq in arquivos redim preserve nome(Ubound(nome)+1) nome(Ubound(nome)) = arq.name next 'listando arquivos for x = 0 to Ubound(nome) response.write nome(x) & "<br>" next %>
-
Tenta isso: <% on error resume next Set objUpload = Server.CreateObject("Dundas.Upload.2") objUpload.UseVirtualDir = false objUpload.Useuniquenames = false objUpload.MaxFileSize = 3048576 objUpload.Save "e:\home\aerostarleme\web\imagens\avioes" Set FSO = Server.Createobject("Scripting.FilesystemObject") For Each File in objUpload.Files path = File.OriginalPath Next file = FSO.GetFileName(path) response.write (file) %>
-
ai é html, é so montar uma tabela legal, e listar os dados dentro. Pra facilar: Monte uma tabela com 7 colunas verifique o dia da semana do 1º dia do mes para saber em qual coluna você inicia e depois é so preencher o resto dos dias.
-
É facil!!! O que voce vai precisar: 1 - Cadastro no banco de dados de compromissos 2 - pagina listando os dias do mes com um link que passa a infomação data para a pagina que mostra os compromissoes 3 - criar a pagina que mostra os compromissos e dar um SELECT no banco WHERE data=Request.QueryString("datadesejada") 4 - Criar um looping e exibir os registros Comece a desenvolver e qqer duvida é só postar.