Ir para conteúdo
Fórum Script Brasil

kuroi

Membros
  • Total de itens

    7.184
  • Registro em

  • Última visita

Tudo que kuroi postou

  1. esse site ta hospedado, ou você ta rodando localmente?? você usou esse endereco "site/mecanica/benu.jpg". mas em q pasta esta esse arquivo html q esta tentando mostrar a imagem?? se ele já esta dentro da pasta "site", então pra mostrar a image, você teria q por só "mecanica/benu.jpg". se o arquivo html já ta dentro da pasta "mecanica", então você teria q por somente "benu.jpg".
  2. faltou abrir o <tr> antes do <td>. e tb é possivel q o endereco da imagem esteja errado. essa imagem existe mesmo nesse caminho??
  3. não entendi sua pergunta, mas posta ai o codigo todo q você usou.
  4. hum, aqui o codigo seria assim: Set NewItem = ListView1.ListItems.Add(, , Application.Cells(i, 1).Value) NewItem.SubItems(1) = Application.Cells(i, 2).Value[/code] mas antes você tem q ter setado q o listview tem duas colunas. hum, então você teria q guardar o numero da linha do item. você poderia usar uma coluna nova pra isso, mas se você não quer q tenha mais uma coluna, você pode usar a propriedade Key do item. o problema é q o Key é meio chato porque ele não aceita valores numericos, então você tem adicionar um caractere não numerico junto, mas ai da pra resolver com o Val(). ai você faria assim: [code]Set NewItem = ListView1.ListItems.Add(, i & "a", Application.Cells(i, 1).Value) ai o codigo no clique do check ia ficar ate mais facil: Private Sub ListView1_ItemCheck(ByVal Item As MSComctlLib.ListItem) If Item.Checked Then Application.Cells(Val(Item.Key), 3).value = "conciliado" Else Application.Cells(Val(Item.Key), 3).value = "não conciliado" End If End Sub[/code] tenta ai.
  5. você podia tentar esconder a janela usando a api ShowWindow(), de uma olhada naquele tópico q passei q falo sobre isso la.
  6. o windows do cara deve ta zuado, não sei muito o q fazer, você pudia tentar um reg cleaner, essas coisas, mas mtos erros do pdw não acontecem se você fizer o instalador pelo inno setup.
  7. não sei se tem uma maneira melhor, mas esse codigo aqui resolve: function somar() { var f = document; var soma = 0; for (var i = 0; i < f.all.length; i++) { if (f.all[i].id.substring(0, 7) == "calculo") { soma += parseFloat(f.all[i].innerHTML); } } return soma; }[/code] ai no caso é so você escrever o retorno dessa funcao somar() na celula q quiser. so acho tb q essa funcao pode ser melhorada, já q esse codigo vai percorrer todas as tags html abertas no documento todo. um jeito de simplificar seria pegar direto da sua tabela, so q você teria q procurar dentro de cada <tr></tr>.
  8. norberto, se esta na coluna C, tudo o q você tem q fazer é trocar Application.Cells(i, 2).Value por Application.Cells(i, 3).Value naquele codigo q passei. não entendi a parte do refresh, mas pra alterar na planilha a partir do clique no checkbox da listview, você pudia fazer uma pesquisa a partir do texto do item, caso ele não se repita: Private Sub ListView1_ItemCheck(ByVal Item As MSComctlLib.ListItem) Dim ultima_linha As Long, i As Long ultima_linha = Application.Cells(Application.Cells.Rows.Count, 1).End(xlUp).Row For i = 1 To ultima_linha If Application.Cells(i, 1).Value = Item.Text Then If Item.Checked Then Application.Cells(i, 3).Value = "conciliado" Else Application.Cells(i, 3).Value = "não conciliado" End If Exit For End If Next End Sub[/code] EDITADO: acho q entendi a parte do refresh. porque se o item mudou pra "conciliado", então ele tem q sair do listview, certo?? nesse caso, é so você adicionar a linha ListView1.ListItems.Remove Item.Index antes do Exit For no codigo q passei acima.
  9. o where você poe apenas uma vez. e você tem q saber onde é texto e onde é codigo, não vai tudo dentro da aspa ne. mas o esquema é você montar o where numa variavel: Dim filtro As String filtro = "" filtro = filtro & IIf(Text1.text = Empty, "", IIf(filtro = "", "Where ", "And ") & "Campo = '" & Text1.Text & "'") filtro = filtro & IIf(Text2.text = Empty, "", IIf(filtro = "", "Where ", "And ") & "Campo = '" & Text2.Text & "'") ... filtro = filtro & IIf(Text11.text = Empty, "", IIf(filtro = "", "Where ", "And ") & "Campo = '" & Text11.Text & "'") RSexemplo.Open "Select * From TB_exemplo " & filtro[/code] mas isso não é muito diferente do codigo do crispim. inclusive se você fizer com if, o codigo deve ficar mais organizado e ainda evitaria processamento desnecessario. agora pra simplificar bem o codigo, você pudia fazer com um For Each, ou então você criava um array de textbox e fazia com q cada um dos seus texts fosse um indice dele. ai você simplesmente checava com um For simples.
  10. não sei se você ta usando esse codigo mesmo, ou você alterou na hora de postar mas você ta passando a senha vazia, ta certo isso?? require ("classes/Conectar.class.php"); $con = new Conecta; $con->hostname = 'localhost'; $con->username = 'root'; $con->password = ''; //<-- OLHA AQUI $con->database = 'db'; $con->conecta();[/code]
  11. o codigo seria mais ou menos esse pra inserir na listview (imagino q você teja usando o objeto listview dentro do visual basic 6): Dim NewItem As ListItem Dim ultima_linha As Long, i As Long ultima_linha = Application.Cells(Application.Cells.Rows.Count, 1).End(xlUp).Row For i = 1 To ultima_linha If Application.Cells(i, 2).Value = "não conciliado" Then Set NewItem = ListView1.ListItems.Add(, , Application.Cells(i, 1).Value) End If Next[/code] no caso, ele procura as opcoes "conciliado" ou "não conciliado" na coluna 2, e se encontrar "não conciliado", insere o valor da coluna 1 na listview.
  12. os dados tão vindo do banco de dados?? se você tiver usando um recordset, você pode pegar os dados direto dele. agora, quanto aquela funcao, eu não costumo trabalhar dessa forma em datagrid (sempre costumo usar recordsets e toda informacao q preciso, pego direto deles), então não sei ate onde esse codigo, funciona, mas acho q com datagrid, aquela funcao seria mais o menos assim: Private Function getColumnSum(mfg As DataGrid, clmn As Integer) As Double Dim j As Integer With mfg .Col = clmn For j = 0 To .ApproxCount - 1 .Row = j getColumnSum = getColumnSum + CDbl(.Text) Next j End With End Function[/code]
  13. você quer q ele calcule qtde * valor unitário na hora q o usuario digitar?? se for, é so você declarar uma funcao javascript assim: &lt;script type="javascript" language="text/javascript"> function calculo(qtde, vl) { return qtde * vl; } </script>[/code] e depois, você chama ela do change do text da quantidade: [code]<td class='conteudo_tabela'><input type='text' id='qtde' value='0' size='10' onchange='document.getElementById(\"calculo" . $valor['cod'] . "\").innerHTML = calculo(this.value, ".$valor['valor_unit'].");'></td> <td class='conteudo_tabela' id='calculo" . $valor['cod'] . "'></td></tr>"; mais ou menos isso, veja ai.
  14. o php é executado no servidor ANTES da pagina ser carregada. o javascript é executado no cliente DEPOIS da pagina já ter sido carregada. por isso não da pra executar javascript junto com php.
  15. se você quiser postar seus codigos php, a gente pode ver se consegue descobrir.
  16. gabi, ponha margin: auto; no body e veja se não funciona.
  17. você adicionaria o include assim: <?php require("pagina.php"); ?>[/code] isso se a pagina estiver no mesmo diretorio. se estiver em outro, você faria: [code]<?php require("diretorio/pagina.php"); ?> então, se aquela pagina q você tava pondo no iframe, escreve o codigo php q você quer mostrar, você poderia simplesmente usar aquele codigo de cima dentro do <td></td>. so q, como eu disse, você não ia precisar abrir todas as tags html, head e body de novo. você simplesmente escreve o codigo como se fosse continuacao do html. ou você pudia criar uma function pra escrever todo aquele codigo, ai você poe o include no inicio da sua pagina, e chama a funcao dentro do <td></td>, assim deve ficar mais organizado. so q ai já não sei como funciona esse cutenews. ve se você consegue adaptar o seu codigo, se não poste o codigo php daquela pagina q tava dentro do iframe. mas o melhor seria abrir um novo tópico na sala de php.
  18. crispim, a imagem q ta aparecendo é "403 forbidden". mas acho q deve ser a janela do windows mesmo q aparece, com dois campos, certo?? você não poderia primero escrever o nome do administrador no primeiro campo, e depois usar um SendKeys "{TAB}", pra passar de campo e depois escrever o login??
  19. crispim, ele abre a janela do dos pedindo senha, não é isso?? você poderia usar o sendkeys pra escrever a senha, como foi feito nesse tópico: http://scriptbrasil.com.br/forum/index.php?showtopic=124445
  20. entendi, valeu. gostei desse link, apesar do meu processador nem aparecer na lista...
  21. não conhecia esse metodo do tutorial, mas se eu entendi o q ele faz é usar o php pra escrever o javascript baseado em parametros. não serve pra ler outras paginas php, e nem vai dar pra executar codigos php especificos pra cada acao do javascript. isso ai q o cara passou não é ajax. o q você quer fazer é possivel, mas não com esse metodo e sim com ajax mesmo. se você quiser eu te passo uns links com uns tutoriais legais de ajax.
  22. vou adaptar o codigo pra somar uma coluna so: Private Function getColumnSum(mfg As MSFlexGrid, clmn As Integer) As Double Dim j As Integer With mfg .Col = clmn For j = 0 To .Rows - 1 .Row = j getColumnSum = getColumnSum + CDbl(.Text) Next j End With End Function[/code] ai pra somar a coluna 1 você faz assim (sendo q a primera coluna é a 0): [code]soma = getColumnSum(nome_do_seu_flexgrid, 1) não testei mas acho q não tem erro.
  23. kuroi

    Projecto Encravado

    Visual Basic 2005 Express Edition = Visual Basic .NET moverei pra sala de .net.
  24. esse codigo é pra funcionar. so q ele não soma uma coluna so, ele soma um range de colunas q você passa por parametros. e se você estiver usando numeros com virgula (formatados com virgula e não com ponto), é melhor trocar o Val() por CDbl(). você tentou esse codigo e ele so ta pegando a primera linha??
  25. é, gabi, mas eu tava pesquisando um pouco e vi q o iframe realmente é muito ruim pra trabalhar com tamanhos, porque ele não cresce com o conteudo, é você q teria q setar o tamanho dele, mesmo se fosse com o javascript ou algo assim. mas eu tava pensando... essa pagina mostrada no iframe, é você mesmo q faz com o php?? porque você não poe o codigo dela num include, e depois chama a partir da pagina principal, e poe direto dentro do td, sem usar iframe?? assim deve resolver tudo sem ter muito trabalho. so acho q seria bom você revisar o jeito como você escreve essa pagina q ta sendo mostrada no iframe. olhei o codigo fonte dela e vi q a tag html ta sendo aberta varias vezes. ai alem do seu html ficar sem o menor sentido, você pode ter problema de layout e problema pra usar javascript tb se for precisar depois.
×
×
  • Criar Novo...