Search the Community

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

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.

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!

Prezados, Instalei Oracle XE Server no meu computador. Consegui restaurar uma base de dados salva em arquivo .DMP. Ao tentar a conexão via aplicativo, surge a mensagem de erro: "Componentes cliente e de rede Oracle não encontrados. Estes componentes são fornecidos pela Oracle Corporation e fazem parte da instalação do software cliente Oracle versão 7.3.3 (ou posterior). O provedor não funcionará se esses componentes não forem instalados" Como solucionar esse problema? Desde já, agradeço

Prezados, Há alguns anos atrás, desenvolvi um aplicativo para acessar uma base criada em Oracle 9.2 (na época Windows XP), usando um aplicativo Delphi. A conexão com a base de dados é por ADO. Eu tinha um notebook com esse ambiente que, recentemente, precisei reformatar e, com o W7, não consegui instalar o Oracle 9.2. Semana passada, instalei o Oracle XE 11.2, criei o tablespace e o user necessários e consigo acessar os dados pelo SQL Plus, mas não consigo a conexão por ADO. Creio que o provider seja diferente da versão 9.2. Alguem pode me passar uma string de conexão para essa situação? O user é pedro e a senha é pedro. Desde já, obrigado.

Alguem tem uma luz Set Con = CreateObject("ADODB.Connection") Con.ConnectionString = "Provider=SQLOLEDB;Data Source=(Local);Initial Catalog=MyBank;Persist Security Info=False;Integrated Security=SSPI" OpenConnection = Con.Open Mensagem de erro Microsoft OLE DB Provider for SQL Server erro '80004005' Não é possível abrir o banco de dados "SimpleCrudWithBoostrap" solicitado pelo logon. Falha de logon.