Ir para conteúdo
Fórum Script Brasil

ursolouco

Veteranos
  • Total de itens

    2.314
  • Registro em

  • Última visita

Tudo que ursolouco postou

  1. ursolouco

    Server.transfer

    Brother!! Como de costume... Posta o código!!!
  2. Brother! -Este é um trecho de um código que utilizei em uma aplicação para um cliente - Este código não contém paginação, basta você utilizar um pouco de matematica e lógica que você dividi os registros numa boiada só!!! - Em relação a Arrays, eu, traduzo da minha forma: É um conjunto de registro, armazenados em uma variavel organizados por um indice ! Mas como não sou ninguém... deixo a palavra com José Carlos Macoratti. OBS: O Artigo é escrito para VB, mas você não vai ter muito dificuldade de entender. Abração!!!
  3. ursolouco

    Esqueci Minha Senha

    Olá Carine!! Seja bem a ScriptBrasil!! Mostre o código que você já possui desenvolvido ou realize uma pesquisa na seção, que você vai encontrar muita coisa que possa lhe ajudar. Abraços!!!´ [uRSO]
  4. ursolouco

    Sistema De Users On

    Não conheço... Manda um exemplo, por favor.. OBS: seu avatar é muito feio... pode parar!!
  5. ursolouco

    Sistema De Users On

    Mas tem que dar Refresh né!!! Quero ver... sem... Invoca o método lá!!! Tipo... Jogar um sistema de calculo, para dentro do Application e acessa-lo sem Refresh..
  6. ursolouco

    Sistema De Users On

    Brother!! Só 1 avisu...... estou meia hora lá, e ainda num fui espirrado ! Dá uma olhadinha lá, ou me explica melhor seus sistema Abraços!!
  7. Tipo assim ? <% Vetor = Recordset.GetRows maxLinhas = UBound(Vetor, 2) Contador = 0 Response.Write("<table border=1>") For I = 0 To maxLinhas Response.Write("<tr>") For C = 0 To 2 If Contador <= maxLinhas Then Response.Write("<td><p>" & vetor(1, Contador) & "</p></td>") Contador = Contador + 1 End If Next Response.Write("</tr>") Next Response.Write("</table>") %> O 'IF' é opcional... na aplicação que utilizei, tive que posiciona-lo desta forma... mas pode ser antes mesmo do 'For C' Abraços!! OBS: Veja um vetor, desta forma, c/ paginação
  8. ursolouco

    Sistema De Users On

    Brother!! Perguntinha boba..... Como, você fez, para que ao atingir 3 min, 'xô' cabloco (hehehe, se você não entendou o 'xô cabloco', eu quis dizer.... saida de membro) ? Algum esquema de contagem com JavaScript ? Me dá uma luz ae..... Abraçus!!
  9. ursolouco

    Asp No Xp

    E no Win XP Pró não ? Asp funciona na boa, e nos dois.... Relativamente não tem nada a ver... a vantagem é que o Win 2000 foi totalmente estruturado para serviços de rede, c/ tecnologia NT, a unica coisa que muda. Isso na minha opinião!!
  10. ursolouco

    Gráfico - Owc

    Não sei se sua pesquisa na web ... retornou este resultado: ColorIndex Property by MSDN. Boa Sorte!!!
  11. ursolouco

    Sql Server

    Pesquisando mais afundo na web, num forum de SQLServer... encontrei o seguinte código: SET IDENTITY_INSERT [ database. [ owner. ] ] { table } { ON | OFF } e este: BEGIN TRANSACTION SET QUOTED_IDENTIFIER ON SET TRANSACTION ISOLATION LEVEL SERIALIZABLE SET ARITHABORT ON SET NUMERIC_ROUNDABORT OFF SET CONCAT_NULL_YIELDS_NULL ON SET ANSI_NULLS ON SET ANSI_PADDING ON SET ANSI_WARNINGS ON COMMIT BEGIN TRANSACTION CREATE TABLE dbo.Tmp_aaa ( vruconfirmation char(6) NULL, jobtype char(3) NULL, jobid char(10) NULL, id int NOT NULL ON [PRIMARY] GO IF EXISTS(SELECT * FROM dbo.aaa) EXEC('INSERT INTO dbo.Tmp_aaa (vruconfirmation, jobtype, jobid, id) SELECT vruconfirmation, jobtype, jobid, id FROM dbo.aaa TABLOCKX') GO DROP TABLE dbo.aaa GO EXECUTE sp_rename N'dbo.Tmp_aaa', N'aaa', 'OBJECT' GO COMMIT Veja se pode lhe ajudar..
  12. ursolouco

    Sql Server

    Brother!! Não sei, é um bica... mas no comando ALTER TABLE não é possivel de se fazer esta modificação ? é um chutão... alter table Usuario add Codigo int identity (1,1) not null Boa Sorte!!!
  13. 'Tinha' <!---#include file="dados.asp"---> <% useraction = request("action") SELECT CASE useraction CASE "login" user = CInt(Trim(request("user"))) pass = CStr(Trim(request("pass"))) SQLClientes1="SELECT * FROM tab_Usuarios WHERE codigo=" & user & " AND senha ='" & pass & "'" SET RSClientes1 = Server.CreateObject("ADODB.Recordset") SET RSClientes1 = Conexao4.EXECUTE(SQLClientes1) IF RSClientes1.eof THEN response.write "<script>alert('Código de Acesso ou senha não cadastrado(s).');</script>" ELSE session("status") = "ok" response.redirect "clidown.asp" END IF END SELECT %> Experimenta aí..
  14. ursolouco

    Sessions

    Ok!!! Vou trancar seu tópico, quanquer coisa, PM à um moderador para reabri-lo novamente.... Abraços e Boa Sorte
  15. ursolouco

    Tabelas

    Listando Tabelas do Banco de Dados!! Deixo avisar, não testei viu...
  16. ursolouco

    Recebi Virus

    Desculpe!! Mas nunca vi isto na minha vida...... Já experimentou abrir o equipamento para uma verificação no POWER (Liga e Desliga ) ?
  17. ursolouco

    Socorro!

    Brother!!! Adicionando Cookies: Response.Cookies("NomedoCookie")("NomedaChave") = "ValordaChave" Fonte: MSDN Abraços!!!
  18. Brother você Precisa exportar a base de dados ? Já tentou usar um DSN para enviar os dados ? []s
  19. ursolouco

    Busca Exata

    Brother "SELECT * FROM tabela WHERE campo Like='%" & var_busca & "%'" Espero que lhe ajude...
  20. ursolouco

    Sessions

    Fonte : MSDN Visualize!! <%@ LANGUAGE="VBSCRIPT" %> <% Dim sessitem Dim anArray(2) response.write "SessionID: " & Session.SessionID & "<P>" anArray(0)="one" anArray(1)="second" anArray(2)="third" Session("anArray")=anArray Session("scalar")="1234567890ABCDEFG" set objConn=server.createobject("adodb.connection") set Session("object")=objConn response.write "List of " & Session.Contents.Count & " items in Session contents collection:<HR>" For Each sessitem in Session.Contents If IsObject(Session.Contents(sessitem)) Then Response.write(sessitem & " : Session object cannot be displayed." & "<BR>") Else If IsArray(Session.Contents(sessitem)) Then Response.write "Array named " & Session.Content(sessitem) & "<ol>" For each objArray in Session.Contents(sessitem) Response.write "<li>" & _ Session.Contents(sessitem)(objArray)& "<BR>" Next Response.write "</ol>" Else Response.write(sessitem & " : " & Session.Contents(sessitem) & "<BR>") End If End If Next %> Boa Sorte!!
  21. Olá Renata!! Não sei bem como esta sua estrutura da tabela... mas vamos recordar... '' para string (texto) e sem aspas para numeros (t-sql)!!!! Se os campos da sua tabela estão como texto, CHAZAM!!!! Aspas simples na consulta.... SQLClientes1="SELECT * FROM tab_Usuarios WHERE codigo=" & user & " AND senha ='" & pass & "'" Caso contrário, NO ASPAS!!! Veja a estrutura da sua tabela, é, caso seja texto, experimente converter sua strings (CStr) []s
  22. ursolouco

    Senha No Bd

    Acredito que sim... mas se for no Server. Deveria funcionar normalmente.... poste seu código inteiro aí... q dou um olhada... OBS: faça isso, até as 14:00
×
×
  • Criar Novo...