kuroi

então, pra saber qual ta checado ou não, assim como pra deschecar todos, é so percorrer com um For todos os elementos do ListBox. ai pela propriedade Selected do ListBox, você sabe se ta checado ou não. tipo assim: Dim i As Integer With List1 For i = 0 To .ListCount - 1 If .Selected(i) Then MsgBox "O item " & Chr(34) & .List(i) & Chr(34) & " está selecionado!" End If Next End With[/code] ai pra deschecar é so fazer: [code]List1.Selected(indice) = False

tenta separar a section em dois (clica com o botao direito nela e clica em Insert Section Below). ai você dexa a divisao entre as duas bem embaixo desse seu campo. e a linha você pode na section debaxo.

pra abri o arquivo bat é so usar o shell: Shell "C:\Caminho\Arquivo.bat" ai se no caso, você vai definir os comando do bat variavelmente via codigo, é so escrever o bat via codigo como se fosse um txt normal e depois abrir com shell.

opa, acho q só o q não precisa é ficar setando toda hora o recordset como novo (Set TBSemi = New ADODB.Recordset). você so precisaria fazer isso da primeira vez, nas outras, acho q você pode apagar essa linha q deve funcionar. e tb o select count do graymalkin deve dexar mais rapido (muito mais rapido quando a tabela tiver bastante registros) tb.

o q você quer dizer com Dialog Box?? você quer dizer tipo uma janelinha pra ele passar esses parametros?? ou é algum componente q eu não conheco?? você não pode fazer um formulario com todos esses campos e pronto?? qual é exatamente seu problema??

opa e ae. você quer q ele não deixe cadastrar duas vezes o mesmo crm_medico, é isso?? cara se for, a melhor forma q vejo de fazer isso é na propria programacao mesmo (você esta trabalhando com alguma linguagem, não??). claro q existem varias formas no sql, mas na programacao você pode tratar certinho a mensagem e tudo mais. é so fazer um select pra ver se já não existe o valor q ele ta incluindo. o q você pode fazer tb no sql, é setar o campo crm_medico como chave. ai ele já bloqueia automaticamente e retorna erro quando ele tentar incluir de novo o mesmo valor. outro jeito é fazer isso por procedure, ou ainda por trigger e ai você mesmo pode montar a mensagem de erro q quiser com a funcao raiserror. um exemplo de trigger aqui: http://scriptbrasil.com.br/forum/index.php?showtopic=106582

cara, o SQL Server Management Studio Express tem tudo la. o q exatamente você precisa q não achou??

tenta assim ó: Set rstBotaoA = conn.execute("Select * From tbl_Posts Where idpost = (Select Max(idpost) From tbl_Posts Where idpost < " & idpost & " and codusuario = 15) and codusuario = 15") não entendi. como assim codigo fora de tags?? os codigos asp vao dentro de <% %> e você pode por onde quiser (ou onde for conveniente pra você). os javascripts vao normalmente no head porque normalmente são funcoes q gente dexa la pra chamar depois. no asp você tb pode ate criar subs pra dexar la em cima, mas se você quiser executar qualquer coisa no meio da pagina (enquanto ta sendo carregada) você vai ter q abrir <% %> no meio de qualquer jeito, nem q seja so pra chamar as subs. e no mysql algumas coisas vao mudar sim. o principal de tudo é a conexao com o banco. mas a sintaxe das queries varia um poco de banco pra banco, e, apesar de ser na maioria a mesma coisa, o mysql tem algumas diferencas pro access. por exemplo, essas duas queres q eu te passei acho q já não vao funcionar em mysql. e pra falar a verdade, acho q da pra fazer ate mais simples no mysql, usando o comando Limit (q não existe em access).

tenta tipo assim ó: Update cadastromedico Set cadastromedico.territorio = (Case alteracao.territorio When Null Then cadastromedico.territorio Else alteracao.territorio End)[/code] se não funcionar, tenta assim: [code]Update cadastromedico Set cadastromedico.territorio = (Case When alteracao.territorio Is Null Then cadastromedico.territorio Else alteracao.territorio End) e assim por diante pra tdos os campos.

tenta assim no visual basic ó: Set Engine = CreateObject("JRO.JetEngine") Engine.CompactDatabase "Provider= Microsoft.Jet.OLEDB.4.0;Data Source=C:\Caminho\Banco_Original.mdb", _ "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Caminho\Banco_BackUp.mdb"[/code] pra ver se ele compacta (no caso ele vai compiar o banco compactado no outro endereco q você passar). mas vo mover pra access pra ver se a mulecada la tem alguma ideia melhor.

o problema é q você não passou a querystring id.

cara, posta o codigo todo da pagina

mas você quer fazer um programa ou um website?? acho q seria melhor você fazer uma pagina em asp, php, asp.net, etc. mas da uma olhada aqui: http://scriptbrasil.com.br/forum/index.php?showtopic=108414

opa então. é porque você poe uma tabela no update e depois tenta pegar o campo de uma outra tabela no set. alias, é a mesma tabela, mas como você escreve de modo diferente o sql entende q a tabela do update não é a mesma q você usa no set e tem q ser (no Update você pos cadastromedico e no Set você pos [dbo].[cadastromedico]). é, na verdade não sei se é possivel fazer um update desse jeito, mas se eu descobrir qualquer coisa eu aviso. se tiver duvidas sobre o case, pode perguntar.

é verdade, pra pegar o anterior então veja se funciona assim ó: Select * From Tabela Where Id = (Select Max(Id) From Tabela Where Id < Id_QueryString) e pra pegar o proximo, tenta assim: Select * From Tabela Where Id = (Select Min(Id) From Tabela Where Id > Id_QueryString) acho q essas duas queryes devem fucionar tanto em access quanto em sql. agora se você tiver usando mysql, não sei ai você teria q testar. usando essas duas você não vai ter problema se tiver excluido qualquer foto, mas se der qualquer outro problema ou erro, posta ae. e não necessariamente vai dar erro quando você abrir a primeria ou a ultima não. nota q se você tiver mostrando a primeira foto, o select do anterior vai voltar EOF, então você tem q testar antes. assim como o select do proximo tb vai voltar EOF quando tiver na ultima foto. ou seja é so fazer um if pra ver se é EOF. se for, você não mostra a paginacao (do proximo ou do anterior dependendo do caso).

haha tb tentei isso... mas se você descobri algum jeito, posta ai. tem sim, você teria q por uma condicao pra cada campo. faz uma busca ai no forum sobre o comando case q tem alguns topicos ai q explicam como faz e tem exemplos. mas se você tiver duvidas pra usar o case, pergunta ae.

opa, foi mal, a sintaxe q eu te passei era pra funcionar no access. olhei aqui e vi q no sql tem q ser assim ó: Update cadastromedico Set cadastromedico.campo1 = alteracao.campo1, cadastromedico.campo2 = alteracao.campo2 From cadastromedico INNER JOIN alteracao ON cadastromedico.crm_medico = alteracao.crm_medico[/code]

vocÊ fala pra eu fazer um select para cada botã? falo pra voce fazer um select para cada botão. não são só dois botoes?? qual seria o problema de fazer dois selects?? mas se quiser fazer um só select, pode fazer where id >= id_querystring - 1 and id <= id_querystring + 1, mas nesse caso você vai ter trablaho no caso de ele abrir a primera ou a ultima foto.

tenta por um id pro seu iframe. exemplo: tre = document.createElement('iframe'); tre.id = "iddomeuiframe"; tre . src = roster.barra.value; tre . height = '100%'; tre . width = '100%';[/code] faca o mesmo pro otro iframe q você cria. ai o botao você faria tipo assim: [code]<input type="button" id="xxx" name="xxx" value="xxxxx" onClick="java script: getElementById('iddomeuiframe').style.display = 'none';" /> só presta atencao q javascript, no codigo é pra ser td junto, mas o forum separa quando a gente posta.

então pra pegar a anterior faca um select do id - 1 e pra pegar a proxima faca um select do id + 1.

Select * From Tabela Where Month(data) = Month(GetDate()) And Day(data) = Day(GetDate())

então, pra update acho q você teria q por campo por campo na query, não sei se existe alguma forma de fazer mas simplificada como é o caso desse insert. eu faria assim ó: Update cadastromedico INNER JOIN alteracao ON cadastromedico.crm_medico = alteracao.crm_medico Set cadastromedico.campo1 = alteracao.campo1, cadastromedico.campo2 = alteracao.campo2, cadastromedico.campo3 = alteracao.campo3, .... cadastromedico.campon = alteracao.campon[/code]

tenta assim: INSERT INTO cadastromedico (SELECT alteracao.* FROM alteracao INNER JOIN cadastromedico ON cadastromedico.crm_medico = alteracao.crm_medico)[/code] mas alias, isso não vai fazer os dados serem atualizados, mas vai inserir novos dados. pra atualizar tem q ser com update mesmo. ou faz com o insert assim e apaga os registros antigos.

mas q linguagem você usa no seu site?? asp, php, asp.net, etc??

acho q no access ficaria assim ó: select month(data) as mes, count(month(data)) as total from TABELA where not isnull(data) group by month(data)