AlexCT

Membros

Perfil Explorar Conteúdo

Total de itens
330
Registro em
Junho 16, 2003
Última visita
Março 23, 2005

Tipo de Conteúdo

Todas Atividades

Perfis

Fóruns

Tudo que AlexCT postou

Confirmação De Numeros Ou Palavras Da Imagem

pergunta respondeu ao AlexCT de AlexCT em ASP

não digo, aquela imagem que tem nos sites de cadastro onde a pessoa tem que copiar o numero ou palavra que apareecna imagem para poder confirmar o cadastro.
- Janeiro 30, 2004
- 4 respostas
Iis Problema

uma questão postou AlexCT ASP

eu estava usando o IIS, tive que reinstala-lo, mas não esta rodando mais esta dando este pau HTTP 500.100 - Servidor interno Erro - erro do ASP Internet Information Services Informações técnicas (para a equipe de suporte) * Tipo de erro: Microsoft JET Database Engine (0x80040E14) Desconhecido /jogos/principal.asp, line 104
- Janeiro 30, 2004
- 4 respostas
Confirmação De Numeros Ou Palavras Da Imagem

pergunta respondeu ao AlexCT de AlexCT em ASP

mas e com aquele tipo de imagens?
- Janeiro 29, 2004
- 4 respostas
Confirmação Da Senha

uma questão postou AlexCT Ajax, JavaScript, XML, DOM

Na parte de cadastro existe dois campos: Senha Confirmar Senha Como faz algo para confirmas e os dois campos são iguais?
- Janeiro 27, 2004
- 1 resposta
Confirmação De Numeros Ou Palavras Da Imagem

uma questão postou AlexCT ASP

Gostaria de saber como é feito ou posso fazer algo, que tem nos sites de chat, cadastros ou sites de votação aquela imagem que tem numeros ou certa palavra e a pessoa tem que digitar como esta para prosseguir. grato!
- Janeiro 27, 2004
- 4 respostas
Paginação - Ótimo Script

uma questão postou AlexCT Repositório de Scripts - ASP

Já que ninguém postou uma resposta para mim Eu editei este post para colocar como eu consegui fazer tem dois Tipos Paginação 01 a paginação que deixa sempre a pagina atual centralizada primeira Anterior 1 2 3 4 [ 5 ] 6 7 8 9 10 Proxima ultima primeira Anterior 21 22 23 24 [ 25 ] 26 27 28 29 Proxima ultima --------------------------------------- Paginação 02 Que não fica centralizado , deixando como esta mesmo clicando nas paginas primeira Anterior ... 1 [ 2 ] 3 4 5 6 7 8 9 10 ... Proxima ultima primeira Anterior ... 1 2 [ 3 ] 4 5 6 7 8 9 10 ... Proxima ultima e ao clicar nos 3 pontinhos primeira Anterior ... [ 11 ] 12 13 14 15 16 17 18 19 20 ... Proxima ultima Postei a paginação completa, Esta funcionando perfeirtamente. Pois estou usando. <% PagAtual = Request.QueryString("PagAtual") 'página atual Set Conn= server.createobject("adodb.connection") DSNtest = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.Mappath("../database/db_jogo.mdb") Conn.Open DSNtest Set RS= Server.CreateObject("ADODB.Recordset") 'acrescentei por causa da paginação SQL = "SELECT * FROM jogos WHERE permissao='0' ORDER BY id ASC" RS.Open SQL, conn, 3 '############## paginacao Introdução ################# '------- Coloque aqui a quantidade de registros que você deseja por página -------- SELECT CASE np CASE "1" NumPorPage = "1" CASE "15" NumPorPage = "15" CASE ELSE NumPorPage = "5" END SELECT 'Const NumPorPage = 20 'Verifica qual a página solicitada Dim PagAtual IF Request.QueryString("PagAtual") = "" Then PagAtual = 1 'Primeira página Else PagAtual = Request.QueryString("PagAtual") End If 'Cria conexão com o Banco de Dados, já abrir anteriormente 'Criado anteriormente Set RS = Server.CreateObject("ADODB.Recordset") '>>> FIZ EM CIMA RS.CursorLocation = 3 Acerta a posição do cursor . 3 ou adUseClient RS.CacheSize = NumPorPage 'Define o tamanho do Cache = para o número de registros 'Cria a String SQL '>>> FIZ EM CIMA Dim SQLpag '>>> FIZ EM CIMA SQLpag = "SELECT * FROM jogos" '>>> FIZ EM CIMA RS.Open SQLpag, Conn Abre o RecordSet RS.MoveFirst 'Move o RecorSet para o início RS.PageSize = NumPorPage 'Coloca a quantidade de páginas Dim TotalPages 'Pega o número total de páginas TotalPages = RS.PageCount RS.AbsolutePage = PagAtual 'Configura a página atual '############## paginacao Introdução - FIM ################# Count = 0 'Zera o contador 'Inicia a Função DO, utilizando a quantidade de páginas especificadas 'Ou seja ele irá executar a ação até que o valor Count seja menor que "20" como está no nosso exemplo i = 0 DO WHILE NOT RS.EOF And Count < RS.PageSize 'paginacao And Count < RS.PageSize ' ----- linhas coloridas ------- if i mod 2<>0 then cor = "#F4F4F4" else cor = "#e1e1e1" end if '------------------------------- %> CONTEUDO HTML <% i = i+1 Count = Count + 1 'paginacao RS.MoveNext LOOP 'tb paginacao %> PAGINAÇÃO 01 <% '################## paginacao 01 ##################### 'Coloca o Nº página atual / Nº Total de páginas Response.Write(" Página " & PagAtual & " de " & TotalPages & " - ") 'Mostra os botões: Anterior e Próxima, utilizando da opção de IF IF PagAtual > 1 THEN 'Se for a primeira página, Mostra apenas o botão Próximo e Ultima Response.Write("") Response.Write("<a href='jogos.asp?PagAtual=" & 1 & "'>") Response.Write("Primeira") Response.Write("</a>  ") Response.Write("") Response.Write("<a href='jogos.asp?PagAtual=" & PagAtual - 1 & "'>") Response.Write("Anterior") Response.Write("</a>  ") Response.Write("") Response.Write("<a href='jogos.asp?PagAtual=" & PagAtual - 1 & "'>") Response.Write("Anterior") Response.Write("</a>  ") Else Response.Write("") Response.Write("Primeira") Response.Write("  ") Response.Write("") Response.Write("Anterior") Response.Write("  ") End If '------------------- numero ------------------------- '---------- Numero de numeros para ser mostrados ---- max_n_mostrados = 9 intervalo = Int(max_n_mostrados /2) inicio = PagAtual - intervalo final = PagAtual + intervalo If CInt(inicio) <1 Then inicio = 1 final = 10 END IF If CInt(final) > CInt(TotalPages) Then final = TotalPages For i = inicio To final If CInt(i)=CInt(PagAtual) Then Response.Write "[ " & i & " ]  " END IF If CInt(i) < CInt(PagAtual) Then Response.Write "<a href='jogos.asp?PagAtual=" & i & "'>" & i & "</a>  " END IF If CInt(i) > CInt(PagAtual) Then Response.Write "<a href='jogos.asp?PagAtual=" & i & "'>" & i & "</a>  " END IF Next '------------------------------------------------------ IF CInt(PagAtual) <> CInt(TotalPages) THEN 'Se estiver na última página, mostra apenas o botão Anterior e Primeira Response.Write("") Response.Write("<a href='jogos.asp?PagAtual=" & PagAtual + 1 & "'>") Response.Write("Próxima") Response.Write("</a>  ") Response.Write("") Response.Write("<a href='jogos.asp?PagAtual=" & TotalPages & "'>") Response.Write("Ultima") Response.Write("</a>  ") Else Response.Write("") Response.Write("Próxima") Response.Write("  ") Response.Write("") Response.Write("Ultima") Response.Write("  ") End If '################## fim paginacao 01 ######################## PAGINAÇÃO 02 '################## paginacao 02 ######################## '@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ '@@@@@@@ ALEX TEIXEIRA - alexct@hotmail.com @@@@@@ '@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@@ 'Coloca o Nº página atual / Nº Total de páginas Response.Write(" Página " & PagAtual & " de " & TotalPages & " - ") 'Mostra os botões: Anterior e Próximo, utilizando da opção de IF '----------- Numeros - Calculos --------------------------------------------- var01 = Len(PagAtual) 'Lê o tamanho do numero var02 = var01 - 1 'subtrai um da variavel , retirando o digito menos sig. var03 = Left(PagAtual,var02) 'obtem os digitos mais sig. do numero var04 = Right(PagAtual,1) 'obtem o digito menos sig. do numero var05 = var03 & 0 ' Acrecenta ZERO no final IF var04 <> 0 THEN ' condição se o digito menos sig. é Zero inicial = var05 + 1 final = inicial + 9 ELSE inicial = var05 - 9 final = var05 END IF indice_i = var04 - 1 'ultimo digito - 1 indice_f = 10 - var04 ' 10 - digito menos sig. ' If CInt(inicial) < 1 Then inicial = 1 If CInt(final) > CInt(TotalPages) Then final = TotalPages '------------------------------------------------------------------------------ IF PagAtual > 1 THEN 'Se for a primeira página, Mostra apenas o botão Próximo e Ultima Response.Write("") Response.Write("<a href='jogos.asp?PagAtual=" & 1 & "'>") Response.Write("Primeira") Response.Write("</a>  ") Response.Write("") Response.Write("<a href='jogos.asp?PagAtual=" & PagAtual - 1 & "'>") Response.Write("Anterior") Response.Write("</a>  ") IF PagAtual > 10 THEN Response.Write("") Response.Write("<a href='jogos.asp?PagAtual=" & inicial - 1 & "'>") Response.Write("...") Response.Write("</a>  ") ELSE Response.Write("") Response.Write("....") Response.Write("  ") END IF Else Response.Write("") Response.Write("Primeira") Response.Write("  ") Response.Write("") Response.Write("Anterior") Response.Write("  ") Response.Write("") Response.Write("...") Response.Write("  ") End If '---------------------- NUMEROS --------------------------- For i = inicial To final If CInt(i)=CInt(PagAtual) Then Response.Write "[ " & i & " ]  " END IF If CInt(i) < CInt(PagAtual) Then Response.Write "<a href='jogos.asp?PagAtual=" & i & "'>" & i & "</a>  " END IF If CInt(i) > CInt(PagAtual) Then Response.Write "<a href='jogos.asp?PagAtual=" & i & "'>" & i & "</a>  " END IF Next '------------------------------------------------------ IF CInt(PagAtual) <> CInt(TotalPages) THEN '##### CONDIÇÕES ######## 'digitos mais significativos do Numero com 1 no fim > PagAtual EX: 21 [ 22 ] 23 24 25 2 com 1 => 21 > 22 (F) 'OU 'PagAtual <= 10 E TotalPages > 10 'EX: ... 1 2 3 4 [ 5 ] 6 ... 5 <= 10 (V) E 6 > 10 (F) IF (p1 > PagAtual) or ((PagAtual <= 10) and (TotalPages > 10)) THEN Response.Write("") Response.Write("<a href='jogos.asp?PagAtual=" & final + 1 & "'>") Response.Write("...") Response.Write("</a>  ") ELSE Response.Write("") Response.Write("...") Response.Write("  ") END IF Response.Write("") Response.Write("<a href='jogos.asp?PagAtual=" & PagAtual + 1 & "'>") Response.Write("Próxima") Response.Write("</a>  ") Response.Write("") Response.Write("<a href='jogos.asp?PagAtual=" & TotalPages & "'>") Response.Write("Ultima") Response.Write("</a>  ") ELSE Response.Write("") Response.Write("...") Response.Write("  ") Response.Write("") Response.Write("Próxima") Response.Write("  ") Response.Write("") Response.Write("Ultima") Response.Write("  ") End If '################## fim paginacao 02 ####################### Rs.Close Set RS = Nothing Conn.Close Set Conn = Nothing %>
- Janeiro 24, 2004
- 19 respostas
Paginação

uma questão postou AlexCT ASP

postei o script inteiro em PAGINAÇÃO
- Janeiro 22, 2004
- 2 respostas
Link Do Pop-up, Fechar Ele E Abir Outro

pergunta respondeu ao AlexCT de AlexCT em Ajax, JavaScript, XML, DOM

por enquanto esta assim, abre no mesmo, mas o problema, que o conteudo são de tamanho diferentes.
- Janeiro 16, 2004
- 3 respostas
Menu Desce Junto Com A Página

pergunta respondeu ao AlexCT de AlexCT em Ajax, JavaScript, XML, DOM

mas não roda no netscape? como assim frane e iframe?, mas não desce junto com a pagina comose ficasse flutuando
- Janeiro 16, 2004
- 3 respostas
Menu Desce Junto Com A Página

uma questão postou AlexCT Dreamweaver

Tenho um menu(dentrod e uma camada) do lado esquerdo, gostaria que ele descesse com a página, ficando sempre visivel. como posso fazer?
- Janeiro 16, 2004
- 18 respostas
Menu Desce Junto Com A Página

uma questão postou AlexCT Ajax, JavaScript, XML, DOM

Tenho um menu(dentrod e uma camada) do lado esquerdo, gostaria que ele descesse com a página, ficando sempre visivel. como posso fazer?
- Janeiro 16, 2004
- 3 respostas
Link Do Pop-up, Fechar Ele E Abir Outro

uma questão postou AlexCT Ajax, JavaScript, XML, DOM

Gostaria de saber se é possivel e como tenho um pop-up com um link que iria abrir outro pop-up, mas antes de abrir o outro gostaria de fechar o pop-up origem e depois abrir o outro. é possivel?
- Janeiro 16, 2004
- 3 respostas
Adicionar Link E Texto Editado No Campo De Texto

uma questão postou AlexCT ASP

Gostaria de Saber como se faz essa código que coloca comandos html no campo de texto Exemplo: Aqui mesmo, aonde estou digitado o Post, existe varios botoes onde posso deixar em negrito, italico, mudar de cor e colocar link Estou precisando algo, que mude de cor, negrito e Link (principalmente)
- Janeiro 11, 2004
- 1 resposta
Email - Www

uma questão postou AlexCT ASP

Como posso fazer algo , que identifica se o digitado no campo é um e-mail ou um endereço de página para depois acrescentar mailto: se for e-mail e se for site http:// Alguma sugestão?
- Janeiro 10, 2004
- 2 respostas
Conta Palavras

pergunta respondeu ao AlexCT de AlexCT em ASP

para que serve rs.RecordCount
- Dezembro 25, 2003
- 3 respostas
Busca Com Varias Palavras

pergunta respondeu ao AlexCT de AlexCT em ASP

mas já estou usando array
- Dezembro 25, 2003
- 8 respostas
Conta Palavras

pergunta respondeu ao AlexCT de AlexCT em ASP

tenho uma busca em uma tabela , e procura em varios campos, gostaria que conta-se qts vezes achou tal palavra na busca
- Dezembro 24, 2003
- 3 respostas
Conta Palavras

uma questão postou AlexCT ASP

Como posso fazer uma contagem de quantas palavras a busca achou?
- Dezembro 24, 2003
- 3 respostas
Artigo

pergunta respondeu ao AlexCT de AlexCT em ASP

mas quando faço isso, ele não retorna nada, mesmo eu digitando a palavra igualzinho como esta no BD porque sera?
- Dezembro 22, 2003
- 2 respostas
Artigo

uma questão postou AlexCT ASP

tenho uma busca e estou com dificuldades na hora de destacar as palavras Exemplo: Arco e Flecha quando for destacar, o artigo "e" destaca todos. então estou tentando faezr algo que ignore artigos e preposições tipo: a, e, o, na, no, da, de, do, ... como posso fazer para identificar eles? para cancela-los tentei fazer assim, mas não deu certo chr(24) = espaço chr(101) = e muda = replace(muda, chr(24)&chr(101)&chr(24), chr(24)) tentei assim e tb nada muda = replace(muda, " e ", "") ............................................. ....................................................... Estou querendo fazer uma busca exata estou usando assim - Like '%' & busca & "%' e esta retornando algumas coisas que não espero exemplo: bolo, a busca retorna simBOLO. Como faço para buscar exatamente bolo. tentei tirar os %, mas ai ele não busca nada. ............................................. ....................................................... E outro problema é quando mudo a primeira peltar para maiuscula, o artico "e", fica maiusculo e por isso não é grifado pois algumas palavras estão "Arco e Flecha" e ele busca por " Arco E Flecha" algum solução?
- Dezembro 21, 2003
- 2 respostas
Busca Com Varias Palavras

pergunta respondeu ao AlexCT de AlexCT em ASP

_ mas isso não basta, eu fiz assim e esta dando certo. Mas esta dando algo que não quero: - quando é digitado Ex: arco e felcha peço para deixar a primeira maiuscula, esta deixando assim Arco E Flecha, é possivel sempre deixar artigos e preposiçoes em minusculos? - estou usando para busca assim '%"palavra"%', e quando vou buscar algo por exemplo gás, ele retorna todas as palavras que contém gas no meio da palavras, como faço para buscar somente "gás" - E aquelas funçoes tira acentos, para que serve, pois sempre que vou buscar algo que a palavra tem acento e digito sem acento ou mesmo com acento e uso esta função, retorna como não existe nenhuma palavra e quando destivo esta função e procuro novamente a palavra como ela se escreve corretamente ela retorna. ( Estou usando Access). Para que serve então esta funão que tira acento pois nunca busca palavras que tem acento? Estou postanto abaixo o codigo que criei para DESTACAR palavra e frase. esta DESTACANDO palavras minusculas, MAIUSCULAS e 1a letra MAIUSCULAS '###### Função para Destacar palavra da busca ############### Function DestacaTexto(textoBD, n_palavras) y = n_palavras Alterado = textoBD DO WHILE 0 <= y palavra_M = UCase(palavra(y)) palavra_m = LCase(palavra(y)) palavra_Mm = UCase(MID(palavra(y),1,1)) & LCase(MID(palavra(y),2,Len(palavra(y)))) DestTexto = "" & palavra_M & "" Alterado = Replace(Alterado,palavra_M, DestTexto) DestTexto = "" & palavra_m & "" Alterado = Replace(Alterado, palavra_m, DestTexto) DestTexto = "" & palavra_Mm & "" Alterado = Replace(Alterado, palavra_Mm, DestTexto) y = y - 1 LOOP DestacaTexto = Alterado End Function '########################################### a variavel "i" é um contador de quantas palavras (ARRAY) da busca IF RS("descricao") <> "" THEN descricao = Replace(RS("descricao"),Chr(13)," ") descricao = DestacaTexto(descricao, i) Response.Write descricao END IF
- Dezembro 19, 2003
- 8 respostas
Upload

pergunta respondeu ao AlexCT de AlexCT em Ajax, JavaScript, XML, DOM

eu já estou usando ASP, mesmo querendo usar PHP, mas preciso arrumar tempo para dar uma lida, mas percebi que são semelhantes O problema mesmo é o que postei, é para verificar - dimensões maximas - tamanho em Kb pois os outros já encontrei
- Dezembro 18, 2003
- 4 respostas
Upload

pergunta respondeu ao AlexCT de AlexCT em ASP

o que você postou? funciona em ASP, pois vi que a extensao é aspx! Eu vou usar aqueles Upload sem componentes
- Dezembro 18, 2003
- 5 respostas
Upload

uma questão postou AlexCT ASP

Alguém sabe algum script que no Upload, limite: - dimensões maximas - tamanho em Kb - extensão - renomeia para um padrão pré estabelecido pois aqui no site os avatar, tem isso. E também os sites gratuitos de hospedagem
- Dezembro 17, 2003
- 5 respostas
Upload

uma questão postou AlexCT Ajax, JavaScript, XML, DOM

Alguém sabe algum script que no Upload, limite: - dimensões maximas - tamanho em Kb - extensão - renomeia para um padrão pré estabelecido pois aqui no site os avatar, tem isso. E também os sites gratuitos de hospedagem
- Dezembro 17, 2003
- 4 respostas

Entrar

AlexCT

Total de itens

Registro em

Última visita

Tipo de Conteúdo

Perfis

Fóruns

Tudo que AlexCT postou

Confirmação De Numeros Ou Palavras Da Imagem

Iis Problema

Confirmação De Numeros Ou Palavras Da Imagem

Confirmação Da Senha

Confirmação De Numeros Ou Palavras Da Imagem

Paginação - Ótimo Script

Paginação

Link Do Pop-up, Fechar Ele E Abir Outro

Menu Desce Junto Com A Página

Menu Desce Junto Com A Página

Menu Desce Junto Com A Página

Link Do Pop-up, Fechar Ele E Abir Outro

Adicionar Link E Texto Editado No Campo De Texto

Email - Www

Conta Palavras

Busca Com Varias Palavras

Conta Palavras

Conta Palavras

Artigo

Artigo

Busca Com Varias Palavras

Upload

Upload

Upload

Upload

Navegação

Atividades