kuroi

gaspar, sobre visual basic 2010, poste na sala de .net. moverei para la.

tópico fechado pois existe outro com o mesmo assunto: http://scriptbrasil.com.br/forum/index.php?showtopic=156430

com um for ou um while. vai somando um contador e comparando com os numeros da sequencia. quando o numero for diferente do contador, o valor q estiver no contador é o numero vago.

movido para outras linguagens.

carol, você usa access né?? mas acho q o gafanhoto tem razao, teria q ser assim ó: Dim Sql As String = "SELECT * FROM BDFACTORING WHERE ANO = ? ORDER BY Factoring" o resto do codigo deve ta certo. não funcionou assim?? continua a mesma mensagem de erro?? no outro form funcionou com @NOME??

carol, deve ser o mesmo erro do outro tópico. algum campo com o nome errado...

viktormartin, deixa eu ver se eu entendi direito... você está rodando tudo isso dentro do linux?? não sabia q dava pra rodar vbs no linux... se eu entendi, o problema é pra escrever a aspa, é isso?? se for tenta assim: txtfile.write ("PerfCounter=NetOut,""\Interface de rede( ") ou assim: txtfile.write ("PerfCounter=NetOut," & Chr(34) & "\Interface de rede( ")

olhai: http://www.freevbcode.com/ShowCode.asp?ID=9043

você pode guardar o tempo em segundos ou minutos, e usar uma funcao como essa pra mostrar nesse formato: http://scriptbrasil.com.br/forum/index.php?showtopic=108910

como ficou o seu codigo e em q linha ocorre o erro?? possivelmente, o seu pc não tem instalado o provider do MSDAOSP (Microsoft OLE DB Simple Provider). de uma olhada no google pra ver se você consegue fazer o download dele.

moverei o tópico pra sala de .net e deixarei o link aqui em crystal, já q o assunto envolve as duas areas, assim você tem mais chance de obter resposta.

contato, evita ficar abrindo varios topicos sobre o mesmo assunto. já exclui dois posts seus sobre isso.

beleza heheh mas se quiser insistir nisso, a gente ta ai. e de qualquer modo, quando eu voltar pro meu pc, eu testarei esse sql ce, nunca tinha tentado trabalhar com ele. ai se eu descobrir qual o problema, posto aqui.

era pra rodar esse codigo a partir do sql server, no compact acho q não vai não... você não conseguiu fazer o sql funcionar no seu pc?? nesse caso, eu encontrei um codigo pra ler a lista dos providers odbc a partir do registro do windows, só q é pra c# (.net). se eu tivesse vb6 nesse pc q estou, eu ate tentava adaptar, imagino q deveria funcionar nele tambem. o link é esse: http://flylib.com/books/en/1.105.1.185/1/ se você tiver o visual studio do .net instalado ai, não deve ser dificil de rodar. é só você abrir um projeto novo pra windows application selecionando a linguagem c#. no form, você poe um textbox, poe como multiline (aumenta o tamanho dele pra poder ler depois) e poe nele o nome de "resultTextBox". nas primeiras linhas onde estiver "Using System;", etc, você copia copia todos os "using" q estao no inicio do codigo do link q passei. depois você dá duplo clique no form pra chamar o evento do form load (ou usa um commandbutton, funciona como no vb6), e dentro do evento você coloca todo o codigo do link q passei, mas só o q estiver depois de "// Registry Scan". ai você roda e testa. mas se você ta com dificuldade pra fazer o sql funcionar, a gente pode tentar resolver, o fulvio manja bastante dessa parte.

você trabalha ate as 23 da noite é?? sei bem o q é isso...

seria tipo isso q você quer?? http://support.microsoft.com/kb/271772/en-us

o onibus é uma imagem de fundo certo?? então você não vai precisar desenhar o banheiro nem a privada nem nd, certo?? então, se entendi direito, o seu codigo deve ser mais ou menos esse aqui: <table> <% Dim i i = 1 For x = 1 to 60 If (i - 1) Mod 12 = 0 Then Response.Write("<tr>") End If If i \ 12 <> 2 And i <> 36 And i <> 48 Then If Not RSonibus.EOF Then If RSonibus("poltrona") = Right("0"& i, 2) Then Imagem = "xx" RSonibus.MoveNext Else Imagem = Right("0"& i, 2) End If Else Imagem = Right("0"& i, 2) End If i = i + 1 %> <td><img src="img/poltr<%=Imagem%>.gif" width="31" height="28"/></td> <% Else %><td></td><% End if If i Mod 12 = 0 Then Response.Write("</tr>") End If Next %> </table>[/code]

danyy, eu tinha movido o outro tópico pra office porque discutia sobre a versao do excel, e poderia se encaixar na sala de office tambem. sobre vba, poste la na sala de vba mesmo, como você já fazia antes. moverei pra la. agora, aquele codigo q usamos no outro tópico, não vai servir pra você achar a ultima linha?? (http://scriptbrasil.com.br/forum/index.php...st&p=600941) imagine q a ultima linha q ele encontre seja a 4. ai você soma mais 1 e vai pra proxima e faz isso a cada vez q ele inserir uma linha nova: Range("a" & ultima_linha & ":e" & ultima_linha).Select Activecell.formular1c1 = text1.text ultima_linha = ultima_linha + 1[/code]

estranho... antes essa connection string causava esse erro, certo?? agora mudou pra esse?? era a mesma connection string, não?? de qualquer modo, esse erro acontece no Open() da conexao, mesmo, ou está acontecendo em outra linha?? não devia precisar adicionar referencia nenhuma não. tenta, o seguinte, descobri uma sp do sql q te listaria todos os providers ole db instalados no computador. ai a gente ve se encontra na lista o tal "Microsoft.SQLSERVER.CE.OLEDB.3.5" ou algum outro. encontrei nesse site: http://www.onedotnetway.com/get-a-list-of-...-in-sql-server/ como o sql management aberto, clique em New Query e tente executar o seguinte (digite isso e aperte F5): EXEC master..xp_enum_oledb_providers se a funcao funcionar, e veja a lista q ele retornar e procure algum provider relacionado com o compact edition ou poste ai a lista q ele mostrar.

larissa, sobre asp.net, poste na sala de .net. moverei o tópico para la. agora, quanto a sua pergunta, em programacao pra web, não tem muito sentido tentar pegar a variavel da outra pagina, o q exatamente você ta precisando fazer?? pra passar informacoes de uma pagina para outra, você pode usar variaveis de sessao, querystring, postagem de formulario, dependendo você pode usar ajax (de javascript) pra ler informacoes de outra pagina, ou ainda se a informacao q você quer for uma constante, você pode deixa-la declarada no web.config. dê uma explicada melhor no q você está precisando fazer.

muito estranho. talvez você tenha mais de uma copia do banco no seu pc. ai talvez você esteja olhando uma copia diferente daquela a q a connection string está apontando. se não for esse o caso, então, pra testar e ver quais tabelas ele ta conseguindo visualizar, faca o seguinte: adicione no seu projeto a referencia Microsoft ActiveX Data Objects Extensions for DDL and Security 2.x (x é o numero da sub-versao q aparecer pra vc, escolha a mais recente). então, só pra testar, insira um ListBox e um Command Button qualquer no seu formulario e, no clique desse botao, use esse codigo (com a conexao já aberta): Private Sub Command1_Click() Dim cat As New ADOX.Catalog Dim tbl As New ADOX.Table Set cat.ActiveConnection = conexao For Each tbl In cat.Tables List1.AddItem tbl.Name & vbTab & tbl.Type Next End Sub[/code] (adaptado do site do macoratti: http://www.macoratti.net/adox.htm) no list box devem aparecer os nomes de todas as tabelas q a sua conexao está conseguindo encontrar.

é, é meio complicado fazer funcionar esse compact edition no vb6. qual o erro q estava dando antes de você colocar o caminho certo?? você ta usando a versao 3.5, mesmo ne?? pelo menos é o q diz seu primeiro print. imagino q você tenha o .net framework tb 3.5 tudo certinho... pelo q li, na instalacao do sql ce, os providers já são instalados certinho tb. tenta então trocar a connection string por essa aqui: con.Open "Provider=Provider=Microsoft.SQLSERVER.MOBILE.OLEDB.3.0;DataSource=D:\sqlbd.sdf;" se nada der certo, qual o service pack do seu windows?? tente atualizar pro sp3, caso ainda não seja, e veja se não resolve...

danleon, o "myPath" era só um exemplo. tente usar "DataSource=D:\sqlbd.sdf;" q acho q é o caminho onde ta o seu banco (ou ponha o caminho certo). se continuar dando erro, poste a mensagem. EDITADO: a linha toda assim: con.Open "Provider=Microsoft.SQLSERVER.CE.OLEDB.3.5;DataSource=D:\sqlbd.sdf;"

como o raphael disse, você precisa da condicao de saida para o loop. no seu caso, você colocou frase como condicao. nesse caso, existem duas possibilidades: se frase[0] valer 0, ele vai entender como falso e nem entrará no loop; ou se frase[0] tiver qualquer valor diferente de 0, ele entenderá como verdadeiro e ficara em loop, ate q o i chegue em um indice de frase q tenha valor 0, ou ate chegar numa area de memoria q seu programa não tenha permissao de acessar, o q deve levar seu programa a travar e ser finalizado, o q vier primeiro. agora, imagino q frase seja um array de char onde você esteja guardando um texto. então se você estiver tratando esse texto corretamente, deve ter um 0 no final dele, então não devia somar infinitamente. sendo assim, sua condicao deve estar certa. se seu programa não esta funcionando, deve ser alguma coisa anterior no codigo, ou algum erro dentro do for. agora, se você quer q some infinitamente, pode escrever true la q é mais simples.

sera q no banco na esta prontuário com acento, ou coisa assim??