Ir para conteúdo
Fórum Script Brasil

Tiago Correa

Membros
  • Total de itens

    15
  • Registro em

  • Última visita

Posts postados por Tiago Correa

  1. Ae galera .. to precisando de uma força .. pois preciso trabalhar com planilhas do excel ... em páginas da web ... atraves do asp (vcscript) ... a baixo segue o código .... que não esta funcionando .. podem me ajudar?

    <%

    const caminho="c:/flac/produto.xls"

    Set conexao = Server.CreateObject("ADODB.Connection")

    conexao.open "driver={microsoft excel driver (*.xls)};dbq="&caminho

    Set RSProduto = Server.CreateObject("ADODB.recordset")

    RSProduto.open "SELECT * FROM produto"

    %>

    <%=rsExcel.fields("Codigo")%><br>

    <%=rsExcel.fields("Produto")%><br>

    <%=rsExcel.fields("Peso Caixa")%><br>

    <%=rsExcel.fields("GR preço")%><br>

  2. Ah, eu havia esquecido de dizer.

    Sabem porque o erro acontece?

    Acontece, porque o Usuário do IIS, o IUSR_<nome da maquina> por padrão não tem permissão de escrita em praticamente nenhuma pasta que não esteja compartilhada.

    Ou seja, se você colocar o banco de dados em algum diretorio que for um 'alias' do IIS, os codigos vao funcionar. Porque, ao compartilhar o diretorio para o IIS, você está dando permissão de escrita naquela pasta para o Usuario do IIS o IUSR_<nome da maquina>.

    O problema também se resolve, se você compartilhar a pasta na qual o banco está, para todos os usuarios da rede.

    Assim tb funciona, porém, deixa seu computador aberto para a rede, o que não é bom.

    Por isso, dando permissao de escrita no banco, o problema está resolvido!

    Abraços

    Cara essa foi realmente f.... agora funcionou ... brigradão ...

  3. Bem já que você tocou no assunto de preço .... não esta querendo gastar muito dinheiro ou mesmo não tem muito pra ficar gastando não é ...... certo ..... meu conselho é que você visite livrarias Megastore ... tipo Saraiva ... que lá tem sempre ótimos livros pra se comprar ..... e melhor é que você pode ler eles a vontade e decidir se é isso mesmo que você deseja ..... alem de poder ter um guia de consulta para o resto de sua vida .... vale a pena tentar .....

  4. Cara ... seja mais claro na sua dúvida .... se eu entendi bem .. você quer fazer uma busca do tipo .... selecionando alguns itens de formulários e depois exibi-los em uma tela ..... bem se eu estiver certo até aqui ..... você deve fazer isso atravez de uma consulta SQL com vbscript (asp) .... caso realmente queira isso ... entre no forum de asp .... e diga como fazer uma pesquisa com tais informações .... quanto mais clara for sua pergunta mais rápido será ajudado ....

  5. Cara ... seja um pouco mais especifico no que você quer fazer .... tipo ... não tem como você criar um menu no left frame e querer que o seu respectivo sub menu abra no main fraime ..... como o proprio nome mesmo já diz .... frame ... são quadros .... separados ... e não tem ligações entre si .... ao menos que você de uma target ao link .........

  6. estou com o mesmo problema .... mas para que você possa inserir uma variavel atraves do request .... tem que ser da seguinte forma:

    exemplo '%"& nomedavariavel &"%'

    .....ou seja aspas simples', sinal de porcentagem%, aspas duplas", e depois concatenação& .... ai sim vem o nome da variavel ... não esqueça de fechar tudo isso ... claro

    veja seu código .....

    <%

    dim conn, rssql, strsql ' não se esqueça de declarar as variaveis

    set conn = server.createobject("adodb.connection")

    conn.open = "provider=microsoft.jet.oledb.4.0;data source=" & server.mappath("cadastro.mdb")

    nome = request.form("nome")

    fone = request.form("telefone")

    strsql= "insert into tb_usuarios values ('" & nome & "','" & fone & "')"

    set rssql = conn.execute(strsql)

    response.write "inserido com sucesso"

    nem se esqueça de apagar a memoria

    set conn = nothing

    set rssql = nothing

    %>

  7. Ai pessoal ainda não deu certo o comondo insert ... o mesmo erro ocorre direto .... "A operação deve usar uma consulta atualizável." dry.gif

    eis o código

    <%

    dim conexao, rspilotos, varCodigo, varSql

    varSql = "insert into tabela(codigo, nome, equipe, idade, descrição) values ('06', 'Ralf Schumacher', 'Willians', '28', 'Piloto braço duro')"

    const caminho="c:/teste/pilotos.mdb"

    set conexao=server.createobject("adodb.connection")

    conexao.open "driver={microsoft access driver (*.mdb)};dbq=" &caminho

    set rspilotos = conexao.execute(varSQL)

    set conexao = nothing

    set rspilotos = nothing

    %>

    da uma forma ai galera ... valeu cool.gif

  8. cara faça dessa forma

    dim conexao, abre  'declaração de variáveis
    
    const caminho="C:/teste/pilotos.mdb" 'pasta aonde se encontra o banco
    set conexao=server.createobject("adodb.connection") 'objeto de conexao
    set abre=server.createobject("adodb.recordset") 'objeto de abertura
    conexao.open "driver={Microsoft Access Driver (*.mdb)};dbq=" & caminho 'por qual programa foi criadao o banco
    abre.open "select * from tabela", conexao ' instrucoes SQL 
    %>
    
    <html>
    <body>
    
    <% 'daqui pra baixo é feita a impressao dos dados na tela do cliente
    do while not abre.eof
    response.write abre.fields("nome")&"<br>"
    response.write abre.fields("equipe")&"<br>"
    response.write abre.fields("idade")&"<br>"
    response.write abre.fields("descrição")&"<br><br><br>"
    
    abre.movenext
    loop
    
    abre.close
    conexao.close
    %>

    qualquer dúvida manda pra cá.

    Formate seu post usando a tag [code ] [/ CODE]

  9. Nada a vez carinhass...... Você não perceberam nada de errado no codigo não??? dry.gif

    Olha o insert... ele está com o recordset.open.... e não se usa o recordset para fazer um insert, um update e um delete..... Só no select wink.gif

    Troque:

    rspilotos.open "insert into tabela(codigo, nome, equipe, idade, descrição) values ('06', 'Ralf Schumacher', 'Willians', '28', 'Piloto braço duro')", conexao
    Por
    conexao.execute "insert into tabela (codigo, nome, equipe, idade, descrição) values ('06', 'Ralf Schumacher', 'Willians', '28', 'Piloto braço duro')"

    Qualquer coisa fala ai que nós te ajudaremos!!!! wink.gif

    Olhe esse tutos aqui:

    Select

    Insert

    Delete

    Update

    []'s

    Victor

    Claro apos tantas tentativas havia me esquecido disso .... mas mesmo assim não esta dando certo .... Já configurei o IIServer pra banco de dados, que peguei aqui no forum e mesmo assim nd ... tipo o codigo está assim .... e o mesmo erro aparece " A operação deve usar uma consulta atualizável."

    <%

    dim conexao, rspilotos, varSQL

    varSQL = "insert into tabela(codigo, nome, equipe, idade, descrição) values ('06', 'Ralf Schumacher', 'Willians', '28', 'braço duro')"

    const caminho="c:/teste/pilotos.mdb"

    set conexao=server.createobject("adodb.connection")

    conexao.open "driver={microsoft access driver (*.mdb)};dbq=" &caminho

    set rspilotos = conexao.execute(varSQL)

    set rspilotos = nothing

    set conexao = nothing

    %>

  10. tente este ... mas será necessário que você manipule as informações de acordo com suas necessidades .... ok?

    ----------------- formulario simples--------------------------------------------------------

    <form name="form1" method="post" action="nome da pagina.asp">

    <table width="500" border="1">

    <tr>

    <td>nome:</td>

    <td><input name="nome" type="text" id="nome"></td>

    </tr>

    <tr>

    <td>tel:</td>

    <td><input name="tel" type="text" id="tel"></td>

    </tr>

    <tr>

    <td>email:</td>

    <td><input name="email" type="text" id="email"></td>

    </tr>

    <tr>

    <td>coment&aacute;rios</td>

    <td><textarea name="comentarios" id="comentarios"></textarea></td>

    </tr>

    <tr>

    <td><input type="submit" name="Submit" value="Submit"></td>

    <td>&nbsp;</td>

    </tr>

    </table>

    <p>&nbsp; </p>

    </form>

    -------------------------------------- página de envio.asp ---------------------------------

    <%

    corpo = request.form("nome")

    corpo = corpo & request.form("tel")

    corpo = corpo & request.form("email")

    corpo = corpo & request.form("descricao")

    set objMail=server.createobject("CDONTS.NewMail")

    objMail.From="Web"

    objMail.To="endereço de email do seu dominio"

    objMail.Cc="endereco para cópia"

    objMail.Subject="Assunto"

    objMail.Body=corpo 'corpo da MSN ... que tb pode ser uma variavel

    objMail.Importance=1

    objMail.Send

    %>

  11. Clique com o botão direito em cima da pasta onde esta os arquivos asp, depois em propridades, veja se esta selecionado a opção somente leitura, se estiver desmarque...

    veja se da certo...

    T+

    Esta pasta esta a opção somente leitura selecionada .... mas o problema é que qd desmarco a opção .... ao reabrir a mesma pasta ela volta a estar selecionada .... e assim o mesmo erro aparece no servidor ... "A operação deve usar uma consulta atualizável."

  12. Cara o erro não está no seu código , o problema é q você tem q dar permissão no banco de dados , clique em cima do icone do banco e vá em propriedades e de permissão ou senão configure o seu IIs com permissão para gravação de dados

    Eu também to achando que o erro não está no código ... mas sim na configuração do IIserver.... pois testei o mesmo código no PWS e lá eu consegui normalmente ....

    Vejam se podem me ajudar

  13. Estou tendo problemas como a função Insert da SQL, o servidor local mostra o seguinte erro, "A operação deve usar uma consulta atualizável." .... Estou achando que deva ser alguma configuração do IIServer ... pois usei o mesmo código no PWS e não tive problema nenhum desse tipo ....

    Como configurar o IIServer pra que aceite este tipo de instrução ......

    valeu

  14. Olá gostaria de pedir um help a respeito das funções Insert, Delete e Upadate da linguagem SQL. Ao testar as páginas no IIServer com estas instruções é apresentado o seguinte erro:

    Microsoft OLE DB Provider for ODBC Drivers (0x80004005)

    [Microsoft][Driver ODBC para Microsoft Access] A operação deve usar uma consulta atualizável.

    /teste/insert, line 12

    a linha 12 ao qual o erro faz referencia é a linha que contém o recordset

    ---------------------------------------------------------------------------------------------

    este é o código que stou utilizando ... e que me parece estar certo ! ... Já tentei de diversas formas, com recordset aberto ... fechado ... e nd

    <%

    dim conexao, rspilotos, varCodigo

    const caminho="c:/teste/pilotos.mdb"

    set conexao=server.createobject("adodb.connection")

    set rspilotos=server.createobject("adodb.recordset")

    conexao.open "driver={microsoft access driver (*.mdb)};dbq=" &caminho

    rspilotos.open "insert into tabela(codigo, nome, equipe, idade, descrição) values ('06', 'Ralf Schumacher', 'Willians', '28', 'Piloto braço duro')", conexao

    conexao.close

    %>

    Agradeço desde já por qualquer otientação que possam me passar....

×
×
  • Criar Novo...