lcs_sp

A maneira mais fácil e você baixar um programa chamado MySQL Control Center, é muito simples de usar você cria o usuário em seguida tem uma lista dos bancos de dados e tabelas ai e só seleciona quais o usuário tem acesso. Procure o download no www.mysql.com t+

Olá HighBass, O que você pode fazer e de acordo com a conta do susário bloquear as tabelas e database´s o qual ele não tem acesso. T+

valeu pessoal brigadão, e desculpe pelo IMASTERS....

Salve galera do IMASTERS!!! Toh fazendo um relacionamento com 2 tabelas, até ai tudo bem, mas preciso que este relacionamento seja limitado a tres. fiz algo assim, mas não funcionou select count(contato.nome),contato.*, ddd11.* from ddd11,contato where contato.nome=ddd11.nome and count(contato.nome)<=3 SOCORRO....já num sei mais o q fazer Valeu..

Pessoal consegui...vou postar a resposta caso alguém mais precise....valeu Dim sql As String Set cnn = CreateObject("adodb.connection") cnn.Open "DRIVER={Microsoft Visual Foxpro Driver}; SourceDB=D:\; SourceType=DBF;DBQ=D:\;Exclusive=yes" Set rs = CreateObject("adodb.recordset") sql = "select telefone from [D:\tabela.dbf] where p1='" & UCase(nome(1)) & "' and p2='" & UCase(nome(0)) & "'" rs.Open sql, cnn cnn.Execute sql Valeu pessoal....

E aí pessoal, beleza... Estou tentando fazer uma consulta no banco de dados DBase (*codigo abaixo), mas esta retornando o seguinte erro: "A tabela externa não esta no formato esperado." *Codigo: Private Sub Command1_Click() Set rs = CreateObject("ADODB.Recordset") Set oConn = CreateObject("ADODB.Connection") oConn.Open "Driver={Microsoft dBASE Driver (*.dbf)};DriverID=277;Dbq=C:\banco" sql = "select * from estado" rs.Open sql, oConn End Sub Obrigado...

E ai pessoal beleza???? Toh batendo a cabeça mas num vejo onde está errado, montei um menu e ao passar o mouse por cima muda a cor de fundo, tava funcionando beleza....mas do nada parou ????? Help.... pagina de erro Obs. se clicar no link Serviços o menu dele tb num funciona, mas se abrir direto do link funciona..... : unsure: valeu

E ai pessoal beleza ??? toh tentando vazer o seguinte: tenho uma string e quero quebrar com um split e depois pegar o número máximo do vetor, mas tah dando erro, o q tah errado : 'vetor de conversão de dia Dim vet_dia As String Dim dia(0 To 30) As String dia = "F1|E1|D1|C1|B1|A1|Z0|Y0|X0|V0" vet_dia = Split(dia, "|") MsgBox UBound(vet_dia) Valeu

E ai pessoal beleza..???? E o seguinte, toh precisando criar um sistema, e pela utilização desse sistema o cliente pagaria um valor mensal, mas para que o obrigasse a pagar este valor gostaria de que o sistema ao virar do mes pedisse uma keycode, o meu problema é a lógica de funcionamento de uma keycode.... como gerar ???? aonde o sistema gravaria estas informações ?? Valeu....

Valeu pessoal vou dar uma olhada nos dois... sou nó cego em VB mesmo;; meu negócio é ASP.... Brigadão

E ai pessoal beleza????? Tem algum componente ou ferramenta para montar um relatório não sendo o Cristal reporte?? Valeu

Valeu pessoal era isso mesmo.. Brigadão..

E ai pessoal beleza...... toh usando uma flexgrid para exibir a resposta de um select, mas qd vou fazer outro, ele adiciona linhas..... como eu faço para limpar as linhas antes de incluir a nova consulta ? Valeu

Valeu PiGmEu era isso mesmo.... Brigadão

E ai pessoal beleza..... sou iniciante em vb e num sei como montar a resposta em tabela igual quando você abre a tabela do access em colunas Como eu faço isto ????

Pessoal muito obrigado...funcionou belezinha.... A topeira aki errou a senha de acesso... Brigadão....

com a linha de comando que você me passou ele informa: nome da fonte de dados não encontrado e nenhum driver padrão especificado

Agora aparece um erro de usuário ou senha invalido, mas eu conecto normalmente com ferramentas de admistrativas do banco de dados ????? o q é isso? cnn.Open "DRIVER={MySQL ODBC 3.51 Driver};database=listabrasil;user=listabrasil;password=rollingstones;server=127.0.0.1;Option=16834;"

E ai pessoal beleza......toh iniciando no vb agora e toh tentando conectar no Mysql e num consigo.... o q tah errado ???? Private Sub Form_Load() Set cnn = CreateObject("ADODB.Connection") cnn.Open "DRIVER={MySQL ODBC 3.51 Driver};user=listabrasil;password=rollingstones;server=localhost;option=20499" Set Rs = CreateObject("ADODB.RecordSet") Set Rs.ActiveConnection = cnn Ssql = "select * from DDD11 where nome='Valdeci fernandes'" Rs.Open Ssql, cnn cnn.Execute Ssql End Sub Valeu

seria isso: <select onclick="javascript:alert('mensagem');">

teste isto: <HTML> <HEAD> <META NAME="GENERATOR" Content="Microsoft Visual Studio 6.0"> <TITLE></TITLE> </HEAD> <BODY> <script language="javascript"> function habilita() { teste.disabled = false; } </script> <INPUT type=text onclick="javascript:habilita();"></P> <INPUT id="teste" disabled></P> </BODY> </HTML>

e ai pessoal beleza.... toh precisando posicionar uma imagem de fundo numa posição determinada e fazer com que não se repita pelos espaços em branco, é possivel ? Valeu

isto é um operador trinário, funciona assim: teste?se verdadeiro executa isto:se não executa isto; falow

dim variavel,cont variavel="0124" if len(variavel)<5 then cont=len(variavel)-5 for i=0 to cont variavel="0" & variavel next end if tente isto

altere o TOP e o LEFT .... style="LEFT: 100px; POSITION: absolute; TOP: 100px; z-index:10; width: 678px; height: 271px;"> falow tenta ai.....