kuroi
-
Total de itens
7.184 -
Registro em
-
Última visita
Tudo que kuroi postou
-
isso está errado: & "<body bgcolor=""#FFFFFF"">"_ você não pode por aspas dentro de aspas, eu acho... não seria assim? & "<body bgcolor=" + Chr(34) + "#FFFFFF" + Chr(34) + ">"_
-
usando o <asp:requiredfieldvalidator> tem como validar o controle apenas se algum outro controle atender a uma condicao?? exemplo, preciso que um campo esteja preenchido apenas se um outro campo select do formulario esteja com a opcao "SIM" selecionada. se não estiver, o cara pode gravar em branco normalmente. é possivel usando o requiredfieldvalidator, ou so da pra fazer por codigo??
-
já tinha sugerido algo parecido. so que eu achava melhor que quando ele postasse alguma coisa com palavra proibida, os post so seria realizado depois de aprovado por um moderador. acho que seria melhor assim, porque pode acontecer de um cara fazer um post serio so que precise usar uma palavra que esteja bloqueada. é ruim em?! Se o moderador ficar ausente por 1 dia, ou seja, ela posta e tem que esperar até a boa vontade do mod entrar no forum pra liberar e mais um dia pra responderem... eu procuro outro forum se for assim... B) pra isso a gente também tem monitores... mas isso podia não depender de salas (senao sql tava perdido sem moderador), ficaria um link tipo na pagina inicial, em algum lugar, visivel apenas aos moderadores (todos) com todos os topicos pra serem aprovados, assim quase que instantaneamente o post era aprovado ou descartado, já que sempre temos moderadores online... é... na verdade é uma ideia meio que besta, mas da pra pensar em cima dela sim...
-
está faltando o nome do campo: select * from t_ponto Where CAMPO between '07:50' and '08:10' e se seu bd for access, ainda acho que tem que ser assim: select * from t_ponto Where CAMPO between #07:50# and #08:10#
-
já tinha sugerido algo parecido. so que eu achava melhor que quando ele postasse alguma coisa com palavra proibida, os post so seria realizado depois de aprovado por um moderador. acho que seria melhor assim, porque pode acontecer de um cara fazer um post serio so que precise usar uma palavra que esteja bloqueada.
-
no evento click do combobox, você seleciona as permissoes referente ao usuario selecionado. ai você testa campo por campo e dependendo se ele tem permissao ou não você altera o checkbox. se você não sabe, você faz isso pela propriedade value do checkbox. se você puser 1 ele fica checado, se você puser 0 ele fica em branco.
-
da uma olhada que uma das opcoes da bios deve ser de exibir ou não esta tela, já vi isso em mtas placas
-
tem que ser assim: If TimeValue(Now) < CDate("08:10") Then response.redirect "formponto.asp" response.end ElseIf TimeValue(Now) >= CDate("08:10") Then response.redirect "default.asp" response.end End If[/code]
-
e continua não dando certo??
-
como assim, no onchange de dois grupos?? um grupo tem que ficar dentro do outro. acho que pra fazer o que você quer você tem que por no onchange do grupo pai. pois quando ele mudar o outro também vai mudar junto, entendeu?? ou se você quer que resete no change de qualquer um dos dois grupos, ponha no reset do de dentro. porque vai ficar tipo assim: deu pra entender??
-
Erro Com Alias (#1248 - Every Derived Table Must Have Its Own Alias)
pergunta respondeu ao pblrodrigues de kuroi em MySQL
acho que as subqueries precisam de alias, senao você vai estar fazendo select de uma table sem nome. ficaria assim: SELECT COUNT(*) AS TOTAL FROM (SELECT * FROM USU_GRUPO) AS U mas na verdade, não precisaria de subquery. o que você quer fazer funciona assim: SELECT COUNT(*) AS TOTAL FROM USU_GRUPO AS U -
acho que é a conexao com o banco que não foi feita/declarada direito. tipo ela esta mesmo aberta?? ou o recordset. ele foi declarado como: Set alt1 = Server.CreateObject("ADODB.RecordSet") ?? ou sera que ela não chama conexao?? porque você escreveu conexo. seria assim: Set alt1 = conexao.execute("UPDATE categoria SET nome = '"&request.form("nome")&"' WHERE id = '"&request.form("idalt")&"' ") alias pra fazer update você nem precisa do recordset. ficaria assim: conexao.execute "UPDATE categoria SET nome = '"&request.form("nome")&"' WHERE id = '"&request.form("idalt")&"' "
-
na verdade, depois do 6 sairam o Visual Studio 7 que é o Visual Studio .NET 2002, o Visual Studio 7.alguma coisa que é o Visual Studio .NET 2003 e atualmente estamos na versao 8 que é o .NET 2005. não sei detalhes mas, como você pode ver no tópico do Graymalkin esta sendo desenvolvida uma nova versao sim (que possivelmente seria o Visual Basic 9)
-
esse é um campo formula ou um campo da tabela. as unicas possibilidades que eu já vi (e que eu lembro agora) de um campo não aparecer pra fazer soma são as seguintes: 1 - já existe no relatorio o mesmo campo somado. Essas debaixo so servem para campos formula: 2 - Na formula do campo você usa uma funcao de sumarizacao, tipo sum, count ou qualquer outra. se o campo já é uma soma você não pode fazer outra em cima dela. 3 - Esse é um campo que so pode ser calculado depois do relatorio ser carregado. exemplo se você usar as funcoes Next(), Previous() ou os campos Page Number, Record Number, etc. se você não se encaixa em nenhum desses, não sei mesmo então qual é o problema. se estiver, então não tem o que fazer... alias, dependendo tem sim, mas vai ser foda... talvez você que não tenha visto o campo. se não me engano, na listbox, ele mostra primeiro os campo que estao sendo usados no report. mais pra baixo é que ele mostra todos os campos de todas as tabelas e, em seguida, estao os campos formula.
-
não é sintaxe sql não, não aceita between não. você teria que fazer assim: (IIf ({T_Inadimplencia.vl_venda_loja} <> 0, Sum ({T_Inadimplencia.Valor_Boleto}, {T_Inadimplencia.Cod_Lojista}) / {T_Inadimplencia.vl_venda_loja} * 100, 0)) >= x And (IIf ({T_Inadimplencia.vl_venda_loja} <> 0, Sum ({T_Inadimplencia.Valor_Boleto}, {T_Inadimplencia.Cod_Lojista}) / {T_Inadimplencia.vl_venda_loja} * 100, 0)) <= y[/code] ou você poderia por a soma toda numa variavel, assim a formula ficaria menor. mas não estou te passando do codigo porque não lembro como declara variavel na sintaxe do crystal. a outra coisa é que se você tiver qualquer soma, qualquer sumario no report footer, ela vai somar todos os registros, desprezando o group selection formula. você teria que usar Summary Fields, confere pra ver se é isso mesmo.
-
fez isso já?
-
isso so vai funcionar mesmo no group selection formula. mas acho que ele não aceita que você aponte para um campo, você teria que passar a formula do campo para a formula do select. tenta isso, no group selection formula: (IIf ({T_Inadimplencia.vl_venda_loja} <> 0, Sum ({T_Inadimplencia.Valor_Boleto}, {T_Inadimplencia.Cod_Lojista}) / {T_Inadimplencia.vl_venda_loja} * 100, 0)) > x
-
aquela linha que eu disse pra você adicionar (Set rs = Server.CreateObject("ADODB.RecordSet")), você tirou. e sem ela não vai funcionar mesmo. o abreconn tem que ficar assim: <% Sub AbreConn Dim bco, sql, rs Set bco = Server.CreateObject("ADODB.connection") Set rs = Server.CreateObject("ADODB.RecordSet") bco.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="& Server.MapPath("usuarios.mdb") End Sub '----------------------------- Sub FechaConn bco.close Set bd = Nothing End sub %>[/code]
-
a é isso mesmo, posta sua formula ai pra gente analizar melhor. porque dependendo da funcao que você usa, ela não é aceita no selection formula. exemplo se você usa funcoes como Previous(), Next() ou usa campos como Record Number, Page Number ou qualquer tipo de sumario na formula, ele realmente não aceita porque precisa ser calculada depois mesmo. ai não tem o que fazer. mas dependendo da sua formula, você pode usar no Group Selection Formula, tenta la, senao der posta sua formula aí
-
cara não usa .inc não, porque se por exemplo você hospeda o site na internet, e alguém tentar abrir seu arquivo .inc ele volta todo o codigo fonte. inclusive uma possivel senha do seu banco de dados, caso o seu .inc faca a conexao com o banco de dados. grava o arquivo como .asp mesmo. e so criar um arquivo qualquer com extensao .asp e digitar as subs uma embaixo da outra, tipo assim: <% Sub AbreConexao - Código - End Sub Sub FechaConexao - Código - End Sub %>[/code] e ai pra incluir, digite essa linha em todos os arquivos .asp que forem usar alguma funcao desse include: [code]<!--#Include file="nomedoseuarquivo.asp" -->
-
de novo isso??? você alterou o abreconn??
-
qual o erro que deu?? no Selection Formula, o esquema é escrever somente isso, por exemplo: {@Campo} >= x And {@Campo} =< y
-
então, aquele x que eu passei era so um exemplo, não é pra usar também. eu passei um valor pra x e formatei o valor. no caso, é otro valor que você quer formatar. ai ficaria assim: Private Sub TextBox3_Change() If TextBox3.Value = "" Then Else Set busca = Workbooks(Worksheets("Sistema").Range("F20").Value).Worksheets("PRODUTOS").Cells.Find(TextBox3.Value) If Not busca Is Nothing Then Label8.Caption = Workbooks(Worksheets("Sistema").Range("F20").Value).Worksheets("PRODUTOS").Range("B" & busca.Row).Value Label10.Caption = Format(Label8.Caption - Label7.Caption, "#,##00.00;-#,##00.00") Else Label8.Caption = "Não existe!" End If End If End Sub[/code]
-
que banco de dados você usa?? parece que é sql/mysql não?? se for faca assim, então: mail = "SELECT * FROM USUARIO WHERE B1 = '"& TIPO &"' AND B14 = '"&DATA(i)&"' ORDER BY B10 DESC" Set mails = CONEXAO.Execute(mail)[/code] se for access, faca assim: [code]mail = "SELECT * FROM USUARIO WHERE B1 = '"& TIPO &"' AND B14 = #"&DATA(i)&"# ORDER BY B10 DESC" Set mails = CONEXAO.Execute(mail)