Ir para conteúdo
Fórum Script Brasil

o_alpha33

Membros
  • Total de itens

    4
  • Registro em

  • Última visita

Posts postados por o_alpha33

  1. Amigo valeu pela ajuda, mas continua um erro que é

    Informações técnicas (para a equipe de suporte)

    Tipo de erro:

    Erro de compilação do Microsoft VBScript (0x800A0409)

    Constante de seqüência não finalizada

    /admin/add.asp, line 33, column 66

    my_Conn.Open ConnString="DRIVER={Microsoft Access Driver (*.mdb)};

    -----------------------------------------------------------------^

  2. Ola pessoal, é o seguinte, copiei um codigo de FORUM aqui do site e não consigo fazer funcionar de jeito nenhum, não acha o BD... o script é assim :

    <!--#INCLUDE file="../config.inc" -->

    <%

    ' Some Global Functions

    Function ChkString(string)

    if String = "" then string = " "

    string = replace(string, "'", "''")

    ChkString = string

    End Function

    %>

    <html>

    <head>

    <title>Add</title>

    <style>

    a:link {color="#000080";text-decoration:underline}

    a:visited{color:"#000080";text-decoration:underline}

    a:hover {color:red;text-decoration:underline}

    </style>

    </head>

    <body bgcolor="#FFFFFF" text="#000080" link="#000080" topmargin="5">

    </body>

    </html>

    <%

    ' Procedure to add A Category to the database

    Sub add_Cat

    ' Has the form been filled in?

    If request.QueryString("do_it") = "true" then

    set my_conn= Server.CreateObject("ADODB.Connection")

    my_Conn.Open ConnString="DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=C:\Inetpub\wwwroot"

    StrSQl = "INSERT INTO category (cat_name) values ('" & ChkString(Request.Form("cat")) & "')"

    my_conn.Execute StrSql

    my_conn.close

    set my_conn = nothing

    Response.Write "<p align=""center""><strong><font face=""veranda, Arial, Helvetica"" size=4>Category Added</font></strong></p>"

    Else

    o BD esta na pasta C:\Inetpub\wwwroot

    o que fazer

    socorro e obrigado

    fabio

×
×
  • Criar Novo...