Ir para conteúdo
Fórum Script Brasil

kuroi

Membros
  • Total de itens

    7.184
  • Registro em

  • Última visita

Tudo que kuroi postou

  1. podia comecar postando em office, vo mover pra la. não precisa de provedor pra acessar o outlook, veja se esse tópico ajuda: http://scriptbrasil.com.br/forum/index.php?showtopic=74905
  2. kuroi

    Tableless

    em tableless so se usa tabelas pra fazer tabelas mesmo. tipo pra montar uma lista, planilha, grid, etc. alguma coisa que seja visualmente e realmente uma tabela. não se usa tabela pra é pra fazer a estrutura do site.
  3. kuroi

    Bookmark

    você num tem um campo chave, tipo um id do registro?? guarde ele numa variavel e depois do refresh de um find no recordset pra acessa-lo.
  4. kuroi

    Combobox

    cara, você já postou isso uma vez, certo?? e to olhando agora no tópico antigo, você passou mais informacoes do que esse, por causa da resposta do otro membro: a combo esta recebendo valores de um banco ! e não sei qual vai ser o tamanho dos itens que ela vai receber !!! o tamanho (Width) é de 516 esse é o tamanho que ela tem que ficar no FORM mas o ListWidth tem que variar de acordo com os itens que receber!!! entendeu[/code] tenta não fazer isso, beleza?? o tópico antigo já tava andando. se você quisesse upar o tópico antigo tdo bem (desde que não exagerasse). td bem que o tópico antigo so teve uma resposta, mas ele já tinha sido discutido. ai abrindo um tópico novo, você perde tudo o que já foi dito, que poderia levar a alguma coisa. afinal, você mesmo disse coisa a mais na sua resposta no tópico antigo que pode levar a responder a sua duvida. e, otra coisa, isso que você disse na resposta, você devia ter dito no primeiro post desde o comeco. quando você for postar, tenta ser o mais claro possivel. quem vai ler o seu tópico não entende o que se passa na sua cabeca, então por mais besta que parecer a explicacao, tente ser o mais claro possivel. porque qualquer um que ler o seu tópico novo, vai pensar a mesma coisa que o macedo no tópico antigo e vai dar a mesma resposta. e, apesar de você ter dito que não é isso que você quer, você ainda não explicou direito, pois ainda não entendi o que você quer. tipo, você não quer mudar o width do combo, certo?? o que seria o listwidth?? estou imaginando (e justamente por não ter ficado claro, você não obteve resposta) que seja o tamanho da janelinha aberta com todos os itens quando você clica na setinha ao lado certo?? não tenho certeza, mas acho que não tem como mudar isso. pelo menos não de um jeito muito facil. mas talvez alguém saiba algo e poste ai. então tipo, da proxima vez, pelo menos passa um link pro tópico antigo dizendo, tipo: "olha, postei antes e não resolveu, mas ainda to precisando". EDITADO: link do tópico antigo: http://scriptbrasil.com.br/forum/index.php?showtopic=102892
  5. kuroi

    Tableless

    no meu modo de entender, a unica diferenca entre HTML e XHTML é que esse XHTML segue o padrão XML. ou seja, é mais organizado. enquanto no HTML você pode fazer o codigo "de qualquer jeito" que o browser entende, no XHTML você teria que fazer uma coisa mais bem feita, nos padroes XML, por exemplo, fechando todas as tags abertas sem execao, ficando assim numa estrutura que pode ser lida por interpretadores de XML. mas no fundo, XHTML meio que "nem existe" porque você pode também fazer o codigo "de qualquer jeito" que o seu browser vai continuar interpretando.
  6. kuroi

    Combobox

    acho que devia funcionar mesmo assim, não?? em todo caso, aqui a gente tem um forum de VBA, e você devia ter postado la. mas to movendo seu tópico pra la
  7. kuroi

    Consulta

    se o nome é uma string, então você num devia usar val(). val() é so pra numeros, tire o val() que deve funcionar.
  8. kuroi

    Horas Em Minutaos

    mas acho que o que você quer é so isso, não?? Hour("2:29") * 60 + Minute("2:29")
  9. kuroi

    Abrir Uma Pasta Varias Fotos

    acho que não exatamente criar um vetor pra guardar o resultado do dir. você teria que fazer um while pra ir lendo e, a medida que achasse as imagens, já fosse abrindo. se não sabe usar o dir(), veja aqui: http://msdn2.microsoft.com/en-us/library/d...ty4(vs.71).aspx e também você vai ter que ter um picturebox pra cada imagem. e como você não sabe qtas imagens vai ter na pasta, acho que você tera que criar as pictures em tempo de execucao. se tiver mais duviads sobre esse assunto, poste aqui mesmo. se for sobre otro assunto, abra otro tópico.
  10. kuroi

    Duvida!

    hum, eu criaria uma classe pra guardar os dados do jogo, como os times, o resultado, etc. mas como você é iniciante, isso pode ser meio complicado pra você. o esquema talvez seja criar dois arrays, um pro numero de gols de um time e outro pro outro time, com um indice pra cada jogo. e ai pra trazer um placar random, você pode fazer: Int(Rnd * 5) isso vai trazer um numero aleatorio de 0 a 5.
  11. kuroi

    Duvida!

    como exatamente você quer que seja?? tipo, você vai ter todos os times do campeonato e fazer um jogar contra o outro numa ordem aleatoria, seria isso?? tipo assim, o esquema é você já dexar montado. tipo time a joga com b na primeira rodada. na segundo a joga com c. e depois você distribui os times nos lugares. tipo o melhor seria você usar um array. tipo se o campeonato tem 8 times, você cria um array de indice 8, e já deixa definido na primeira rodada, o indice 0 joga com o 7, 1 x 6, 2 x 5, etc. ai na segunda, você faz o 0 X 6, e assim vai. pra não fazer 1 por 1 da ate pra fazer uma formula já. ai o esquema é preencher cada indice do array com um dois 8 times aleatoriamente. nesse tópico tem um exemplo: http://scriptbrasil.com.br/forum/index.php?showtopic=78756
  12. hum, testei aqui e não vai funcionar se você mudar a posicao do cursor no text, avancar com TAB e voltar com o Shift+TAB. acho que o velho Text1.SelStart = 0 Text1.SelLength = Len(Text1.Text)[/code] tem um codigo maior mas funciona sempre. alias, pra diminuir o tamanho do codigo, você pode fazer uma funcao que selecione o texto, e passar o textbox como parametro pra ela.
  13. acho que você ta esquecendo de zerar o y: ... ElseIf (y = 2) Then p(que) = n que = que + 1 y = 0 End If ...[/code]
  14. acho que tipo assim deve funcionar: <table> <% While Not rs_produto.EOF %> <tr> <td><% = rs_produto("produto") %></td> <% rs_produto.MoveNext %> < % If rs_produto.EOF Then %> <td><% = rs_produto("produto") %></td> <% rs_produto.MoveNext %> <% Else %> <td>&nbsp;</td> <% End If %> </tr> <% WEnd %> </table>[/code]
  15. como assim executar?? se você estiver usando uma linguagem de programacao que use algum componente (tipo crviewer) que faca a visualizacao do rpt, é so instalar a dll/ocx desse componente. ai depois se você tiver algum problmea (que acontece sempre) posta ai no forum.
  16. seria tipo assim: <table> <% While Not rs_produto.EOF %> <tr> <td><% = rs_produto.EOF("produto") %></td> <% rs_produto.EOF.MoveNext %> <td><% = rs_produto.EOF("produto") %></td> <% rs_produto.EOF.MoveNext %> </tr> <% WEnd %> </table>[/code] da uma olhada e adapte no seu codigo. mas cuidado que se você tiver menos de 8 produtos na sua tabela (e for um numero impar) ele vai dar erro no meio do loop, ai você teria que testar se é EOF entre uma coluna e outra.
  17. kuroi

    Problema Conexão...!

    mas pra pegar do webconfig, não seria assim: conexao = ConfigurationSettings.AppSettings["ConnectionString"]; ??
  18. kuroi

    Medias

    mano e eu la sei o seu email. mas se você tiver um codigo autonumeracao, deve dar certo assim: Select (((Select Top 1 y from Tabela Order By x Desc) + (Select Top 1 y from (Select Top 2 y, x from Tabela Order By x Desc) Order By x) + (Select Top 1 y from (Select Top 3 y, x from Tabela Order By x Desc) Order By x)) / 3) As Media From Tabela onde Tabela é o nome da sua tabela, x é o nome do seu campo autonumeracao, e y é o nome do campo que você quer calcular a media. veja se funciona, qualquer coisa posta aí
  19. cara você falando assim, deve ser coisa do crystal. mesmo que a query seja retornada rapidamente, ele deve demorar pra organizar tdo no relatorio. ainda mais se você tiver varias formulas e fizer varios calculos nele.
  20. então, datas devem ser gravadas entre aspas, e de preferencia no formato ano-mês-dia. tipo, tenta fazer o update assim: With cnnComando .ActiveConnection = cnnBiblio .CommandType = adCmdText .CommandText = "UPDATE Livros SET CodUsuario = " & vCodUsuario & _ ", Emprestado = True, DataEmprestimo = '" & Format(vDataEmprestimo, "YYYY-MM-DD") & _ "', DataDevolucao = '" & Format(vDataDevolucao, "YYYY-MM-DD") & "' WHERE CodLivro = " & _ vCodLivro & ";" .Execute End With[/code] veja se funciona, qualquer coisa poste aí
  21. kuroi

    Propriedade Para Matriz

    você quer poder acessar a propriedade assim: objeto.atributo[x,y].propriedade seria isso?? se for, da uma olhada nesse tópico: http://scriptbrasil.com.br/forum/index.php?showtopic=86135 mas especificamente nesse link: http://msdn2.microsoft.com/en-us/library/6x16t2tx.aspx o esquema é você criar uma classe indexada, que tenha essa duas propriedades e fazer com que esse seu atributo seja uma instancia dela.
  22. mas eu já te passei o codigo do insert certinho como tem que ficar já sem as aspas e já com esse problema do verdadeiro corrigido. bom, mas eu tava me referindo às aspas simples que você estava pondo nos campos Sim/Não. Eles devem ser gravados sem aspas (apesar de que se você passar 0/1 o access aceita com aspas, mas não sei quanto aos otros bancos). exemplo: Insert Into Tabela(Campo) Values(True) //está certo Insert Into Tabela(Campo) Values('True') //está errado[/code] agora quanto ao negocio do Verdadeiro, é justamente o contrario. o VB estava trocando True por Verdadeiro, e isso é errado. você concatenando com o CStr() resolve. olha o insert que eu te passei no otro post, ele deve funcionar (pelo menos essa parte do Sim/Não não deve mais dar problemas).
  23. não, ela tem pelo menos dois erros. primeiro - as aspas, já falei pra tirar naqueles dois campos. segundo - o Visual Basic esta convertendo o valor boolean na concatenacao. em vez de escrever "True", ele esceve "Verdadeiro". tente fazer o insert assim, e veja se funciona: vSQL = "INSERT INTO Livros " & _ "(CodLivro, Titulo, Autor, CodEditora, " & _ "CodCategoria, AcompCD, AcompDisquete, Idioma, Observacoes) VALUES (" & _ vCod & ",'" & _ txtTitulo.Text & "','" & _ txtAutor.Text & "','" & _ vCodEditora & "','" & _ vCodCategoria & "'," & _ CStr(vAcompCD) & "," & _ CStr(vAcompDisquete) & ",'" & _ vIdioma & "','" & _ txtObservacoes.Text & "');"[/code] apesar de que seria mais facil pegar o value do checkbox direto em vez de por em variavel. e depois, você também tem que por o CStr() no Uptade. veja ai se funciona
  24. cara, você tentou executar o conteudo do vSQL direto no banco?? tipo, o problema não deve ser do True/False, não. de teste criei um banco aqui cum um campo Sim/Não, executei o seguinte codigo: Dim x As New Connection x.Provider = "Microsoft.Jet.OLEDB.4.0" x.ConnectionString = "Banco.mdb" x.CursorLocation = adUseClient x.Open x.Execute "Insert Into a(a) Values(1)" x.Execute "Insert Into a(a) Values(True)"[/code] e os dois inserts funcionaram certinho. tipo, sabe a linha do execute?? clica nela e aperta F9. então rode o programa (F5). quando chegar la, aperte Ctrl + G pra mostrar a janelinha do Immediate. nela, digite [code]? vSQL copie o conteudo que vai aparecer e tente executar direto no access. se der erro, ele deve apontar (vai parar o cursor em cima) o campo que esta errado.
×
×
  • Criar Novo...