Search the Community
Showing results for tags 'ado'.
Found 4 results
-
Vb 2012 - Conexão via código (Ado e Dao) do banco de dados access.
aluizs100 posted a topic in Visual Basic
Olá. Estou tentando localizar um código para conectar um banco de dados access utilizando o Visual Studio 12, porém só encontrei a com conexão direta via programa e eu queria fazer esta conexão via código. alguém poderia me auxiliar em enviando esta rotina ou me indicando o local onde encontro. Obrigado. -
ERRO -3704 OPERAÇÃO NÃO PERMITIDA QUANDO O OBJETO ESTÁ FECHADO
lsmecenas@gmail.com posted a question in Perguntas e respostas rápidas
Oi gente, comecei a mexer em banco de dados na semana passada, então sou muito leigo em algumas partes.... Não estou conseguindo atualizar uma tabela, eu quero trocar todas as células que estão escritas 'RE1' por 'B1', e depois fazer mais atualizações ( mas não nesse momento). Esse aqui colado abaixo, é o meu código, e quando vou atualizar o meu arquivo, ele dá o erro -3704 "OPERAÇÃO NÃO PERMITIDA QUANDO O OBJETO ESTÁ FECHADO". Alguém poderia me ajudar por favor? Sub conexão() Dim cnn As ADODB.Connection Dim rs As ADODB.Recordset Dim SQLstr As String 'PathArqTUCA1 = "\Reportes\" & rngData(iArquivo, 1) 'nomeArquivo = "[" & rngData(iArquivo, 2) & "]" Set cnn = New ADODB.Connection cnn.Provider = "Microsoft.ACE.OLEDB.12.0" cnn.ConnectionTimeout = 90 cnn.ConnectionString = "Data Source= C:\Nova pasta\Testando\" _ & ";" & "Extended Properties=""text;HDR=Yes;FMT=Delimited""" cnn.Open Set rs = New ADODB.Recordset rs.CursorLocation = adUseClient SQLstr = _ " UPDATE [UCBT_01.txt] " & _ " SET GRU_TAR='B1'" & _ " WHERE GRU_TAR= 'RE1';" rs.Open SQLstr, cnn, adOpenForwardOnly, adLockReadOnly, adCmdText 'cria arquivo texto 'Set txtFile = fso.CreateTextFile("C:\Nova pasta\Testando\arqTexto.txt", True) 'escreve e utiliza o separador ( tabulado ) entre os campos 'txtFile.Write (rs.GetString(adClipString, , "", vbCrLf, "")) 'MsgBox "Arquivo texto gerado com sucesso !", vbInformation, "Exportando um Recordset como Texto" 'Exit Sub 'trata_erro: 'MsgBox "Ocorreu o seguinte erro : " & Err.Description ' End Sub Planilha1.Range("F2").CopyFromRecordset rs rs.Close cnn.Close End Sub -
Usando C++ Builder TADOQuery para consultar planilhas Excel contendo células mescladas
jjeffman posted a topic in C/C++
Olá, Eu estou usando TADOQuery para ler planilhas de um arquivo do Excel. ADOQX->SQL->Text = "Select * from [" + sPlan + "]"; try{ ADOQX->Active = true; } catch(Exception *E){ //MemoLog->Lines->Add ("PLanilha: "+ sPlan + " "+ E->Message ); continue; } //MemoLog->Lines->Add ( "Obter as colunas da planilha "+ sPlan); for(int Col = 0; Col < ADOQX->FieldCount; Col++) { Planilha->AddColumn( Col, ADOQX->Fields->Fields[Col]->FieldName ); } O retorno de ADOQX->FieldCount representa o número total de colunas presentes na planilha porém, como há duas linhas de cabeçalho antes dos dados e a primeira linha possui células que foram mescladas, os valores retornados por ADOQX->Fields->Fields[Col]->FieldName em alguns casos foram substituídos por F2, F3, .. etc Há alguma maneira de identificar se existe célula mesclada na linha da planilha usando os componentes ADO do C++ Builder ( Delphi ) ? Obrigado. -
Desabilitar textbox dentro de tabela html quando checkbox em outra pagina for marcado
Maurilio Filho posted a topic in ASP Clássico
Olá galera, bom dia a todos!! Gostaria de um auxilio com algumas dicas e ideias, pois nao estou conseguindo resolver um problema em meu site ASP classico. Preciso de adicionar uma opção em uma pagina onde ao clicar em um check box seja desabilitado um textbox dentro de uma tabela HTML e em vice versa se desmarcar o checkbox habilita novamente o textbox dentro dessa tabela. A questão maior é em relação a pagina em que sera desabiltado o textbox, pois ela uma outra pagina, exemplo (pagina1.asp) formulario de pesquisa, (pagina2.asp) resultado da pesquisa, onde elas estao separadas por frames(lateral menus(fixos sempre),acima pesquisa, abaixo resultado). Então carregar a pagina de pesquisa exixte um botao onde faz um post para carregar a pagina de resultado que contem a tabela e os campos de textbox dentro dela habilitado para inputar dados, ai quando na pagina de pesquisa for selecionado o checkbox preciso que esse textbox seja desabilitado. Se algum conseguiur me auxiliar ficarei muito grato! Obrigado ate mais!