Jump to content


net_man

Member Since 22/07/2008
Offline Last Active 23/04/2010, 11:08
-----

Posts I've Made

In Topic: Google Wave

30/06/2009, 16:49

Boas ...

eu assisti o video ontem e adurei a ideia do google wave ...

aixo q se vai tornar numa ferramenta muito importante principalmente no trabalho, sendo opensorce vai permitir a adaptação desta aplicação as necessidades das nossas empresas :D .



Cumps

In Topic: Ajuda Em Pesquisa No Access

30/06/2009, 15:32

Então pessoal ???
nenhuma resposta …

Bem de qualquer maneira agradece-vos pois sei se que se n ajudaram foi porque n puderam.

Eu revirei a cabeção procurei um pouco e por fim achei uma maneira de fazer o q queria…

aqui esta o código para alguem que tenha a msm duvida.



 
 
Private Sub cmd_all_Click()
Form_frm.RecordSource = "select * from db"
Form_frm.SetFocus
End Sub

Private Sub cmd_procura_Click()

		entrada = 0
		If (IsNull(campo1) = False) Then
			criterio = "campo1_na_tabela like '" & campo1.Value & "'"
			entrada = entrada + 1
		End If
		
		
		If (IsNull(campo2) = False) Then
			If entrada = 0 Then
				criterio = "campo2_na_tabela like '" & campo2.Value & "'"
				entrada = entrada + 1
			Else
				criterio = criterio & "and campo2_na_tabela like '" & campo2.Value & "'"
		End If
		
		If criterio = "" Then
			MsgBox ("Não inseriu nenhum parâmetro de pesquisa!")
		Else
			Form_frm.RecordSource = "select * from db where " & criterio
			
			If IsNull(Form_frm.ID) = True Then
				MsgBox ("Registo não existe!")
				Me.SetFocus
			Else
				Form_frm.Caption = "titulo"
				Form_frm.SetFocus
			End If
		End If



End Sub


Private Sub Form_Load()
DoCmd.OpenForm "frm"
criterio = ""
End Sub

Private Sub Form_Close()
DoCmd.Close acForm, "frm"
End Sub


frm e o form onde mostro os resultados da pesquisa este n contem qualquer tipo de codificação
campo1, campo2 .. campoN estes sao os campos com os criterios da pesquisa
criterio e uma variavel global q criei usando um modulo

In Topic: Votação 11º Desafio De Vetores - Tecnologia

31/01/2009, 10:48

1.PenDragon
2.JCamilo

In Topic: Votação 11º Desafio De Bitmaps - Ciborgue

31/01/2009, 10:44

Leone Fernandes
Helioth

In Topic: 11º Desafio De Bitmaps - Ciborgue

26/01/2009, 16:58

:yes: ainda vou a tempo...

Estive a formatar o PC e tava a var q n ia ter tempo, mas fiz uma coisinha rapida

1) Programa e Versão: Photoshop CS4
2) Ferramentas: Spot Healing Brush Tool, Pen Tool
3) Desafio: Instalar Photoshop antes do fim de desafio
4) Plugins: não
5) Créditos: Google e o meu tele...
6) Conceito: I Ciborgue
7) Trabalho: LINK

IPB Skin By Virteq