Andersonjb

É simples, dando um exemplo beeem resumido: Se as ações são executadas TODAS AO MESMO TEMPO, é porque são sincronas, se elas não tem um tempo pré-deerminado para serem enviadas ou não, são assincronas. Tipo, se você tem uma taxa de transferência determinada entre as instruções e elas tambem ocorrem ao mesmo tempo, a danada é SINCRONA. Agora, se existem diversas taxas de transferências e elas podem ocorrer em qualquer momento, são ASSINCRONAS. É essa a definição que você tinha na cabeça? Deu pra dar uma força?

Bom, vou fazer em VB.NET, olha isso daqui: Toda vez que você for manipular objetos, você tem que criar uma instância, isso é lógico. Mas, se isso não der certo, torne a variavel pública e manda bala, que não dá mais erro... Eu mesmo, no começo, tambem apanhei com isso, e fiz um longo debate sobre isso aqui no fórum, é só dar uma procurada que você acha, beleza? Flws!

Você está falando de VB.NET?

Não tinha pensado nessa possibilidade. Abri no edit e ele apareceu com erros somente quando apareciam caracteres acentuados. Isso quer dizer que ele é Unicode ou isso é Normal?

Opa, ai é que tá então: se são somente sequencia de caracteres, como um TXT exportado em uma versão do programa pode ser diferente da outra se a fonte é a mesma e os caracteres de sequencia tambem são os mesmos para os dois TXT's?

Então, Gray, o problema e que, no programa e tambem no bloco de notas, são aceitos somente valores inteiros. Então, eu teria que modificar isso via programação... E como eu modifico o tamando da fonte em polegadas? Olha só, a fonte que eu estou utilizando é a Lucida Console, Tamanho 7, ela tem todos os caracteres com o mesmo tamanho tambem. A logica do calculo, eu acho que esta certa, mais mesmo colocanco o inteiro mais proximo do resultado, não deeu muito certo não... Mais eu vou tentar via programação, porque quero ter certeza de que não é isso. Então, como eu mudo o tamanho da fonte de um documento em "Polegadas" em um TXT? Existe um método ou procedimento para isso? Ou Até mesmo uma API?

E ai pessoal, beleza? Bom, vou explicar meu problema, e vamos ver se voces conseguem me ajudar nesse calculo... Bem, estou exportando relatorios no Crystal de duas versões diferentes: da 8 e da 11. Bem, exportar da versão 8 e moleza, os relatorios saem bonitinhos, patati patata. Mais quando eu exporto da versão 11, o layout sai todo desconfigurado. E eu descobri porque. Quando se exporta um relatorio na versão 11, ele pede para você definir quantos "caracteres por polegadas" você deseja. Ai é que está o segredo. Como os layouts das versões saiam diferentes, tentei tirar a margem matematica no metodo de erro e tentativa. So que quem disse que eu consegui? Então, eu vou pra partir pra velha e boa matematica computacional. E queria que voces me ajudassem. Como eu posso saber qual e o "caracter por polegada" de um TXT? E sobre a medida da fonte normal, qual e o numero que bate exatamente com um caracter por polegada? E em o que e baseado essa medida da fonte? valeu, pessoal!

Eu tenho o do Como Programar em Visual Basic.NET, da Deitel. Eu recomendo ele pra consulta, não para aprender.

Eu consegui esconder a linha aqui, então resolvi deixar assim. So que surgiu mais um problema... Olhem esses topicos: http://scriptbrasil.com.br/forum/index.php...8&hl=imagem http://scriptbrasil.com.br/forum/index.php...3&hl=imagem O meu problema e o mesmo. Como eu insiro uma imagem no Crystal pelo VB? alguém sabe?

Na época esse código tinha dado certo, agora é so você trabalhar em cima dele. Abraços!

Oh, eu consegui, achei uma propriedade aqui: rptReport.ParameterFields(1).AddCurrentValue "hauhahau" rptReport.EnableParameterPrompting = False CRV.ReportSource = rptReport CRV.ViewReport O foda agora é que eu preciso criar uma "linha dentro do relatório", e o programa não me dá permissão pra isso. Existe algum tipo de permissão para se mecher com o crystal?

E aew kuroi viado. Vem trabalha mais não, vagabundo? Então, eu achei um post seu com a mesma resposta aqui no fórum, mais acontece que eu passo o valor dessa maneira e ele não é atribuido. Outra: todo campo de parâmetro tem um Prompt, e eu não consegui, talvez até por falta de prática, removê-lo. É só essa linha de código ou tem que ter mais alguma coisa mesmo? Porque só ela não resolveu não... Por exemplo: via código, ele é atribuido sim. Tanto que, se você tentar atribuir o mesmo valor novamente, ele dá um erro falando que o valor já existe no campo parâmetro. Mais no formulário, nada é modificado. E agora?

E ai pessoal, beleza? Bem, é o seguinte: preciso modificar um campo de um relatório via programação. Tentei achar algum método nas classes que possuo aqui e não tinha nada que modificava um campo, ou pelo menos, um objeto de texto. Então, decidi modificar via valores de variáveis, olhem o código: Public rptReport As CRAXDRT.Report Public rptRepApp As CRAXDRT.Application Public rtpViews As CRAXDRT.DatabaseTable Private Sub Form_Load() ReportFileName = App.Path & "\Relatório CI.rpt" Set rptRepApp = New CRAXDDRT.Application Set rptReport = New CRAXDDRT.Report With CRV Set rptReport = rptRepApp.OpenReport(ReportFileName, 1) .ReportSource = rptReport .ViewReport End With End Sub Private Sub Command1_Click() rptReport.SetReportVariableValue "legal", 1 CRV.Refresh End Sub Só que quando modifico o valor da váriavel: rptReport.SetReportVariableValue "legal", 1 Ele fala que eu não tenho permissão para isso. Porque?

acho que não... acredito que pirataria é apenas você usar/comprar o software não original. agora se você distribuir o software, você pode ter problemas se alguém descobrir que você usa um você pirata, agora acho que não teria problemas pra quem comprasse, uma vez que você não esta distribuindo o visual basic, e sim um arquivo executavel mais umas dlls. Claro que não. Software desenvolvido em IDE pirata tambem é pirata, ora bolas!!!

Bem básico e simplificado então, ok? Váriaveis: 'Variavel de Conexao Public Conexao As ADODB.Connection 'Variavel simuladora da Tabela Public Tabela As ADODB.Recordset 'Variavel de Instruções SQL Public Instrucao As String Inserindo Dados: Instrucao = "INSERT INTO CI (Num, Empresa) VALUES ('" & txtnumero.Text & "','" & dbempresa.Text & "')" Set Tabela = New ADODB.Recordset Set Tabela = ConexaoCI.Execute(Instrucao) Editando Dados: Instrucao = "UPDATE CI SET Data = '" & txtdata.Text & "', De = '" & txtde.Text & "' WHERE Num = " & txtnumero.Text & " AND Empresa = '" & dbempresa.Text & "'" Set Tabela = New ADODB.Recordset Set Tabela = ConexaoCI.Execute(Instrucao) Excluindo Dados: INSTRUCAO = "DELETE * FROM CI WHERE Num= '" & txtnumero.Text & "'" Set tabela = New ADODB.Recordset Set tabela = CONEXAO.Execute(INSTRUCAO) Certo? Os dados são volateis, representando uma tabela minha aqui, mais é so substituir e tirar as duvidas em cima, beleza? Lembrando que foi usado VB6 utilizando conexão ADO. Falows

Pessoal, já achei o erro. Eu tenho que definir a propriedade AdUserClient na Conexão, e não na Tabela. valeu, e foi mals, auhahu!

Pessoal, beleza? Bem, estou tentando inserir dados de uma tabela em uma DG. Olhem o código: Dim tabe As New ADODB.Recordset tabe.CursorLocation = adUseClient Set Me.datagrid.DataSource = Nothing Set tabe = ConexaoCI.Execute(Instrucao) Set Me.datagrid.DataSource = tabe Bem, nesse tópico... http://scriptbrasil.com.br/forum/index.php...kable&st=20 ... Deu pra entender o problema. Mais aí que está: o que o código do cara tem de diferente do meu???

Deu certo, valeu Gray! Agora só um pouquinho por fora do assunto: Não existe algum site em Portuga (Português) de API's não? Poxa, pra quem não manja muito de inglês que nem eu, é complicado... Falows!

E ai pessoal, firmeza? O negocio e o seguinte: estou capturando a tela do desktop e gravando num arquivo de imagem. Só que o problema é que eu não consigo redimensionar a imagem na resolução que eu quero. Olhem o código: Declarando as API's Public Declare Function BitBlt Lib "gdi32" (ByVal hDestDC As Long, ByVal X As Long, ByVal Y As Long, ByVal nWidth As Long, ByVal nHeight As Long, ByVal hSrcDC As Long, ByVal xSrc As Long, ByVal ySrc As Long, ByVal dwRop As Long) As Long Public Declare Function GetDesktopWindow Lib "user32" () As Long Public Declare Function GetDC Lib "user32" (ByVal hwnd As Long) As Long Capturando Imagem e Salvando: Picture1.AutoRedraw = True Picture1.Height = Screen.Height Picture1.Width = Screen.Width h = GetDC(GetDesktopWindow()) BitBlt Picture1.hDC, 0, 0, 800, 600, h, 0, 0, vbSrcCopy SavePicture Picture1.image, Img_Modif Img_Modif é o endereço da minha imagem. Bem, alguém tem alguma idéia de como eu possa redimensionar a minha imagem? Ah, só uma outra coisa: Eu tentei mexer em alguns parâmetros da Função GetDC, no caso, as duas seguintes que contem o "0,0", e elas não mudaram a resolução, a apenas cortaram a imagem, salvando com a mesma resolução e com o resto que foi cortado em branco.

Pessoal, estou com problemas em redirecionar uma imagem. É o seguinte: estou capturando a tela do meu Desktop. Só que o problema é que a imagem vem muito grande, na resolução total da tela. E aqui no VB 6, eu não consegui redimensionar... :( Olhem o Código: If KeyCode = vbKeyF1 Then tela.AutoRedraw = False h = GetDC(GetDesktopWindow()) BitBlt tela.hDC, 0, 0, ScaleX(tela.Width, 1, 3), ScaleY(tela.Height, 1, 3), h, 0, 0, vbSrcCopy SavePicture tela.image, "c:\teste.jpg" Form1.Visible = True End If Inclusive, o código para se capturar a tela foi pego de um exemplo aqui do Graymalkin. E o Objeto e uma PictureBox. alguém tem alguma idéia de como eu posso redimensionar essa imagem?

é, sei lá, e não esquenta não, Aqcua! Mais meu, que foi emocionante foi, po, quando que isso ia acontecer? Po, muuuuuito tosco, hauauhuha!!!

Ohhhhhhh tio kuroi, não zua não, huauah! Não, e o mais engraçado, é que ele tiro umas duvidas minhas de VB 6 pra que eu passase na empresa em que ele iria aplicar o teste, mais quem aplicou foi um cara que ele ensinou a programar. Po, com essa agora, já conheço dois moderadores pessoalmente: o renatomejias e agora kuroi, a lenda! Agora, eu juro que se eu encontra um traveco e ele fala que o nick dele aqui no forum é AcquaBlue eu juro que me suicido, auhaah!

Estou aqui para contar uma história. Mais não é uma história simples. Prestem atenção: há certo tempo, adicionei o Moderador kuroi no MSN, para tirar algumas duvidas sobre VB 6. Bem, conversei com ele, adquiri um certo grau de amizade, tirei minhas duvidas, e papo vai, papo vem, descobri que ele conhecia um amigo meu, pois ele estudava na FATEC de São Paulo, e havia entrado na mesma época do meu amigo. Bem, já achei uma p*** coincidencia de ele conhecer um amigo meu, e pensei: Caraaaaaaaalho, mais que mundo pequeno. Mais a vida me mostrou que o mundo que eu tinha visto na conversa ainda era grande se for comparado com o acontecimento dos próximos dias. Estava eu, no meu recente trabalho, quando um dia, chega um cara chamado Rafael, que havia trabalhado no local e tinha sido chamado pelo Chefe, para fazer manutenção em alguns sistemas e colocar alguns serviços para frente. Bem, comecei a conversar com ele. Claro que reparei alguns defeitos: Cara Feeio, Maaagro, Careeeca, mais gente fina. Então, depois de ele ver meu curriculo, perguntou se eu havia estudado na ETE de Maua, e se eu conhecia o Renato Mejias, que é moderador da Seção Office. Eu fiquei surpreso: Como ele conhecia um amigo meu da ETE? Aí que veio a surpresa: ele o conhecia da Script Brasil! Ai ele falou: você também é amigo do Shark da FATEC, não é? Ai eu quase tive um ataque: Como ele sabia disso? Ai que veio a pergunta: - Por acaso você e o viadinho do kuroi do Script Brasil? Que que ele respondeu? - Sou eu sim, aquela bicha! Maaaaaano, que mundo pequeno da poooooooooora! Poutz, encontrei o kuroi no meu trampo. A lenda, véi! Ai ficamo naquele momento de surpresa, extasiados com o momento e a surpresa. E pensei: agora sim esse mundo é pequeno. Meeeeeeeew, de milhares de pessoas que acessam o Script no Brasil, eu fui encontrar logo o kuroi! Po, eu vo joga na loteria! Mais o importante e que eu peguei um autografo da lenda!!! meu, meu, meu! To muito surpreso! Breve fotos pra não dizer que eu to mentindo, huauahua! Falows!

E ai pessoal, beleza? Bem, agora já não é mais pergunta besta, já to quase dominando e partindo pro lado técnico. Bem, eu estou usando uma MS FlexGrid para carregar meu BD. Mais acontece que, eu tenho muitos registros no meu Banco, e quando eu falo muitos, eu falo muuuuuuuuuuuuitos, mesmo, cerca de 600.000 á 1.000.000 de registros. Aí é que tá o problema. QUando eu tento carregar todos eles na Grid, dá um erro de "Out of Memory". Bem, isso, provavelmente, deve se dar á capacidade da GRID de não suportar tudo isso, estou certo ou estou errado? E se é isso mesmo, como faço para contornar esse problema? Falows!

E ai J Pedro, beleza? Vamos lá: Não tem correlação entre as tabelas, porque eu simplesmente quero pegar um campo da outra tabela, e não relacioná-las. Mais eu não coloquei ela, quem colocou foi você. Depois dos seus conselhos, a consulta ficou assim: SELECT SUM(Tabela481.Valor), Tabela481.Codigo, Tabela481.Indicador, Tabela495.Descricao FROM Tabela481, Tabela495 GROUP BY Tabela481.Codigo, Tabela481.Indicador, Tabela495.Descricao; Mas mesmo assim, a consulta roda, roda, roda, e simplesmente não para de rodar, não trava, mais o processamento tambem não trava. Alguma opnião???