Decio
-
Total de itens
797 -
Registro em
-
Última visita
Tudo que Decio postou
-
Neste site tem alguns links, veja se algum serve para você: http://casadosprogramadores.com.br/compiladores.html
-
O TRIM tira os espaços em branco do inicio e fim da string , e não os espaços do meio da string. O Replace, serve para substituir uma determinada string por outra. No seu caso , não é necessário usar o replace , use isto: celular = " 98765432 " ddd=" 11" NewString=Trim(ddd) & Trim(celular) Response.Write NewString A saida será: 11999-9999
-
Qual é o erro que está dando?? Em todo caso , no seu código , você esta atribuindo um valor a uma váriavel a partir de um campo do database , antes de ter dado um 'select', isto vai gerar um erro. Option Explicit dim db, rs, sql set db = Server.CreateObject("ADODB.Connection") set rs = Server.CreateObject("ADODB.Recordset") db.open "provider=microsoft.jet.oledb.4.0.data source="& Server.MapPath("dados.mdb") dim email, apelido email = trim(request.form("email")) apelido = rs("apelido") senha = rs("senha")%><html>
-
Tenta fazer o de sempre: Entra no Setup da máquina , e desabilita o teste de memória , deixe o valor do HD fixo , e não como AUTO , se não tiver mais de um HD , deixe o restante como NONE, mude a sequencia de boot para C: e depois qualquer coisa..., se tiver opção de verificar vírus, desabilite... Isto deve melhorar um pouco.
-
Então, para declarar um char, você faz da mesma forma que você fez com o int: char MyStr [10][10]; Para inicializar: char[2]="linha3"; Para mostrar: printf("%s",MyStr[2]); A saida na tela será: linha3 Se você for usar valores fixos , você também pode fazer assim: char *MyStr[]= { "linha1" , "linha2;", "linha3", "linha4", }; para mostar: printf("%s",MyStr[2]); A saida na tela será: linha3 Ou simplesmente: char[10]; Ou char[]="Teste"; Depende da ocasião... Ajudou alguma coisa?? B)
-
Mostre um trecho do código que você está querendo fazer e o que não está dando certo que fica mais fácil para entender. A principio , você esta declarando certo a váriavel do jeito que você quer.
-
Para cadastrar e enviar e-mail é simples em ASP. Para receber, eu não tenho idéia de como se faz. Se você tiver os sistemas que não estão funcionando direito e quizer me enviar para eu dar uma olhada , envie para deciohp@yahoo.com.br , que posso tentar ver o que acontece.
-
Esta correto, você criou uma matriz de 10 linhas e 10 colunas de um inteiro. porque ?? não funcionou??
-
Minha sugestão é que você faça uma busca mai especifica, por exemplo: se você procura por "RENATO RUSSO" da seguinte forma: Select * from Produtos Where musicaCantor = 'RENATO RUSSO' a consulta acima só vai retornar o que for relativo ao cantor, mas se você incluir também a categoria, vai aparecer mais resultados que correspondem ao criterio. Não sei se é isso.. Abraço
-
Olha , eu costumo abrir conexão assim: Dim conn Set conn = Server.CreateObject("ADODB.Connection") <% 'Para MySql 'conn.Open "Driver={Mysql}; Server=ServerName ; " &_ ' "Database=NomeDataBase; UID=NomeUsuario; " &_ ' "PWD=Senha" 'Para Access 'conn.ConnectionString = "DRIVER={Microsoft Access Driver (*.mdb)};" & _ ' "DBQ="& server.mapPath("\db\MeudataBase.mdb") ' 'Para SQL: conn.ConnectionString = "driver={SQL Server};" & _ "server=NomeServidor;" & _ "database=NomeDataBase;" & _ "Uid=Usuário;" & _ "Pwd=Senha;" conn.open %> Verifique se desta forma funciona.
-
Se o campo pode ser nulo em algumas situações , o mais simples seria alterar a propriedade do banco de dados para permitir gravar em campo nulo.
-
Se o arquivo está no mesmo diretório da aplicação tente isto: x = Shell(App.Path & "\" & "arquivo.exe", vbNormalFocus)
-
É melhor converter para PDF , assim pode ser lido diretamente de uma página HTML .
-
Blzzzz... Nelson , não quis ofender.
-
Eu criei uma conexão assim e funcionou: <% Dim conn Set conn = Server.CreateObject("ADODB.Connection") Conn.ConnectionString = "driver=MySQL ODBC 3.51 Driver;server=NomeServidor;uid=root;pws=;database=NomeDatabse" Conn.Open %>
-
O step pula 1 a cada loop. se você usou o TOP 5 e sabe que existe 5 registros na sua consulta, basta dar o comando rs.Move 5 para pular 5 registro a frente. Outra coisa cara, em ASP você não pode usar variaveis no next: Ex: For A = 0 to 5 Count = Cont +1 Next A No código acima vai dar erro você tem que escrever o Next sem o A..
-
Desculpe ai Nelson , mas sua lógica esta errada: O que está sendo proposto é : de 21 e 26 pontos , responda ruim No seu código If numero>21 and numero<26 then , quando o resultado for 21 ou 26 , não será mostrado nada pois 21 não é maior que 21, nem 26 é maior que 26.
-
você pode pegar assim <% MyVar = Request.QueryString("ponto") Response.Write MyVar %> Abraços, Decio Gonçalves :ph34r:
-
Se for pra gerar um arquivo html você pode usar este código: (É preciso ter permissão de escrita) Set Objeto = CreateObject("Scripting.FileSystemObject") Set Obj = Objeto.GetFile(Server.MapPath("PAGINA.HTML")) Set HPAGE = Objeto.OpenTextFile(Server.MapPath("PAGINA.HTML"),forAppending, rue) HPAGE.WriteLine("<html>") HPAGE.WriteLine("<head>") HPAGE.WriteLine("<body>") HPAGE.write("<font size='5' >mensagem</font>") HPAGE.WriteLine("</Body>") HPAGE.WriteLine("</head>") HPAGE.WriteLine("</html>") HPAGE.close set objeto = nothing set obj = nothing
-
Veja bem: if hora>="00:00:01" then response.write ("Boa madrugada") 22:40 é maior que 00:00:01 , portanto está correto, tem mesmo que mostrar a hora. você tem que fazer um AND para até quando vai ser dada a mensagem "Boa Madrugada" Tipo assim: If hora>="00:00:010" AND hora<="06:00:000" then response.write ("Boa madrugada")