Jump to content

  2. → Viewing Profile: Tópicos: megapixel

megapixel

Member Since 18/08/2004
Offline Last Active 03/09/2009, 13:50
-----

Topics I've Started

Caracteres Limitados No Access

26/10/2004, 21:45

é o seguinte pessoal...

eu tenho uma tabela criada no access.. e com os campos tudo direitinho... soh que todos eles estão limitados a 50 caracteres.. e tem um campo que eu necessito de no minimo 600 caracteres para exibir.

Como eu faço pra alterar isso no access mesmo??
*Estou usando com o coldfusion.

Criar Conexão Com Banco De Dados

06/10/2004, 19:22

Ae pessoal..

o tipo de conexão com o banco de dados com o coldfusion eh através do ODBC certo? mas queria saber também se tem como fazer a conexão como o asp... soh com um arquivo asp para fazer a conexão.

Espero respostas.. Obrigado (y)

Formmail

23/08/2004, 21:29

ae pessoal...
estou tentando passar email através de um formulário mas tah dando um erro... e eu gostaria de pedir a ajuda de vocês...

o codigo pra executar o formulário é este:

<%
'Declarando variveis
Dim sNameTo, sNameFrom, sEmailFrom, sText, sEmailTo, sAssunto, sSetor

'Pegando os dados digitados nos campos e colocando em variaveis
sNameFrom = Request.Form("nome")
sEmailFrom = Request.Form("email")
sEmailTo = "meu@email.com.br"
sNameTo = "Site Colégio Paraíso"
sText = Request.Form("mensagem")
sAssunto = Request.Form("assunto")
sSetor = Request.Form("setor")

'Cria o objeto
  set mailer = server.createobject("SMTPsvg.Mailer")
  Mailer.FromName = sNameFrom
  Mailer.FromAddress = sEmailFrom
'Host para envio de emails
'CONFIGURE ESTA LINHA !
  Mailer.RemoteHost = "smtp.servidor.com.br"
  Mailer.AddRecipient sEmailTo, sNameTo
  Mailer.Subject = sAssunto  & " - E-mail"

'Monta a texto para o envio
  strMsgHeader = sNameFrom & "(" & sEmailFrom & ") " & " quem enviou! " & vbCrLf & vbCrLf
  strMsgFooter = sText
  Mailer.BodyText = strMsgHeader & strMsgFooter
' Se for enviado redirecionar para obrigado.asp
  if Mailer.SendMail then
     Response.Redirect "obrigado.asp"
  else
' Se não for enviado mostra o erro que ocoreu
     Response.Write ("Ocorreu um erro.<BR>")
     Response.Write ("O Erro é " & Mailer.Response)
  end if
%>

ERRO:
Ocorreu um erro.
O Erro é At least one Recipient, CC or BCC must be entered


lembrando que eu preenchi as linhas:
sEmailTo = "meu@email.com.br"

e

Mailer.RemoteHost = "smtp.servidor.com.br"

precisaria adicionar mais algo?
bem.. espero pela resposta de vocês... e desde já agradeço!

Apagar Noticias

18/08/2004, 16:35

pessoal vou logo avisando... sou muito leigo em asp... hehehehe..

eu peguei um sisteminha simples de noticias em asp... soh que na admin das noticias tem um link em cada noticia para apaga-la... aí é seguido para esta pagina: apagarnoticia.asp

Código:
[code=auto:0]
<%@ Language=VBScript %>
<%response.buffer=true%>
<HTML>
<BODY>
<%
cnpath="DBQ=" & Server.MapPath("noticias.mdb")
DataSource = "Driver={Microsoft Access Driver (*.mdb)}; " & cnpath

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

Conn.Open DataSource
con.Execute("delete * from Noticias where id="&Request.querystring("id")&"")
Response.Redirect"not_admin.asp"
%>
</BODY>
</HTML>


esta página nao abre... aparece uma mensagem: HTTP 500 - erro interno do servidor
Internet Explorer

queria saber de vocês o que está errado no código da página... e se tem um outro modo de excluir a noticia...

Agradeço desde já..

  1. Fórum WMO
  2. → Viewing Profile: Tópicos: megapixel
  3. Privacy Policy
  4. Regras ·
IPB Skin By Virteq