Decio
-
Total de itens
797 -
Registro em
-
Última visita
Posts postados por Decio
-
-
Neste site tem alguns links, veja se algum serve para você:
-
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.
-
-
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")
Guertbook
em ASP
Postado
Caso não suporte você pode fazer um cadastro em algum site que tenha suporte a ASP (www.brinkster.com por exemplo) e direcionar seu livro de visita para este link.