• 0
Sign in to follow this  
o_alpha33

Sou Iniciante

Question

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

Share this post


Link to post
Share on other sites

4 answers to this question

Recommended Posts

  • 0

vi o script com pressa, não vi erro algum além de:

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

nessa linha você deve por o nome do seu vanco de dados ex:

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

Se continuar não funcionando, post aí o eero pra nós!!! wink.gif

Share this post


Link to post
Share on other sites
  • 0

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)};

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

Share this post


Link to post
Share on other sites

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

Guest
Answer this question...

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

Sign in to follow this