rodfraga

Vou me meter sem ter certeza mas... Eu executo um comando sql assim: rs.Open sql, conexao

Bem, eu tenho que anunciar. Eu tinha dois projetos pra entregar nesse fim de semana. Com o atolamento de provas, eu não tive tempo de fazer essea etapa, entrei até muito pouco na internet... se é que entrei! Ou seja, vou me desclassificando dessa etapa(se a data não for adiada). Rodrigo

Dim strProcura As String, vetor() As String, temEspaco As Boolean, ultimo As Integer strProcura = Text1.Text tabela.Open "Select nomedocampo FROM tabela", conexao Do While Not tabela.EOF For i = 1 to Len(tabela("campo") If Mid(tabela("campo"), i, 1) = " " Then temEspaco = True Exit For Else temEspaco = False End If Next i If temEspaco Then vetor() = Split(tabela("campo"), " ") For i = Lbound(vetor) to Ubound(vetor) If vetor(i) = strProcura Then txtAchados.Text = txtAchados.Text & ", " & tabela("campo") End If Next i Redim vetor(0) Else If tabela("campo") = strProcura Then txtAchados.Text = txtAchados.Text & ", " & tabela("campo") End If End If Loop tabela.Close If txtAchados.Text <> "" Then vetor = Split(txtAchados.Text, ", ") ultimo = Ubound(vetor) + 1 Msgbox "Foram achados " & ultimo & " resultados" Redim vetor(0) Else Msgbox "Não foram achados resultados" End If Eu fiz aqui de bobeira. Tenho minhas dúvidas se está certo, não testei. Porém está aí um que procura por palavras e expressões. Para fazer algo mais preciso, muitos incrementos serão necessários, e provavelmente devem haver erros no que fiz. Mas está aí minha contribuição.

Não sei se essa informação é verdadeira, porém li em algum lugar (tenho a impressão que no Macoratti.net) que bancos Access não tem uma boa atuação em trabalhos que ele seja acessado por mais de 35 aplicativos ao mesmo tempo, já que ele só suporta esse número de acessos aos dados.

Acho que voce se equivocou ali, o nome do form deve ser frmPrincipal e não frmPrincipal.Show. Isso é claro se o form se chamar frmPrincipal. O erro quer dizer que não existe o objeto frmPrincipal.

Cara faz uma busca no forum, voce vai achar varios topicos sobre isso...

Bem, eu to desenvolvendo o meu, e não entendi o "explore sua criatividade"... Que incremento a gent epode dar a um jogo da velha... não precisa me dar uma dica fenomenal para que meu jogo fique dahora... Mas se pudesse dar uma explicação do que voce quis dizer com isso...

Acho que foi assm que eu fiz. Não lembro.. ta paradao... alias é melhor eu continuar ele...

Eu estou fazendo um sistema que anda meio parado. Eu fazia assim: O login, ai se o login for correto: Session("nivel") = tabela("nivel") Ai esse valor vai ficar por toda execução do sistema, e toda página restrita do sistema verifica o nivel guardado na session, e dependendo do conteudo, só admins acessam. Mas todas as paginas a não ser do login, só se pode acessar logado.

Agora entendi.

Mais uma missão bem resolvida por tio Macoratti

Olha esse link: http://www.macoratti.net/vb_p2p.htm

É, mas eu tinha feito isso, porem tinha dado errado tambem... Mas na hora de copiar essa parte, eu hesitei e acabei não copiando...

Isso que eu quis dizer. Porém, esse nome, seria mais uma variável a ser criada, o que acarretaria em mais uma (insignificante) ocupação da memória do computador, certo?

Vou falar a verdade... Nunca usei a IsNull(), pois na verdade, existem muitos comandos que não estou acostumados. Porém, fui vendo como fazer. O graymalkin falou algo de definir a variável como nula, eu não entendi direito, pois o bob quer que a variavel possa ficar vazia ou não. Eu fiz o seguinte código: Private Sub Form_Click() Dim var1, var2 var1 = CVar(Text1.Text) var2 = CVar(Text2.Text) If IsNull(var1) = True Or IsNull(var2) = True Then MsgBox "vazio" Else MsgBox "chein" End If End Sub Porém, o que quer eu faça aparece a msgbox escrito: "chein"

Na verdade eu acho que não. A função resultaria nesse valor, atuando como uma variável. Estou errado?

Mas o código do William e do Bob, estao iguais, não?

Ah valeu, eu tava imagindo isso da quantidade de caracteres, porem a do +1 no inicio nem imaginava... Realmente, eu nunca usei o Mid()... Obrigado Rodrigo

Cara, eu sei que era só a dica... Mas nesse ngócio ai eu me compliquei(QI baixo é fogo...) Eu botei como sendo var(i).nome + 0(o que na minha opiniao não poderia ser) e sendo var(i).nome + 2, porem o mesmo acontece que antes... Será que eu preciso de aulas para contar caracteres?

Mas e as versoes gratis no site da microsoft?

Ah, obrigado... Vivendo e aprendendo...

Voce teve Pascal na escola?

Saquei então... Ah eu queria saber o que voce queria dizer com If's aninhados(na XScript)... Agora descobri?

Por isso que eu digo... Levanta o traseiro e vai aprender java logo... Mas é sério. Se voce aprender a programar com java, java vai ser facil... Creio eu... EDITADO GRaymalkin, voce mexe com o que? Delphi, VB, Clipper, Python, e mais o que? Aonde voce acha memoria pra tudo isso?

O que? O metodo Update pra tratar com bancos de dados?