Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Viva, estou mesmo a terminar um projecto e estou com um entrave algo estranho, quando envio por link o nome da pagina com o nome da tabela ele da-me erro no select, este codigo funciona noutras paginas mas nesta parece nao estar a dar.
Já verifiquei a string e ele recebe o nome da tabela certo mas na altura de fazer o select da-me erro do FROM, ainda pensei que o termo tbl fosse proibido mas experimentei outros e continua, alguma ideia do que se passara?<%
Session.TimeOut = 30
If Session("username") = "" Then
Response.Redirect "welcome.asp"
End If
%>
<html>
<head>
<form name="view" action="ins.asp?cod=0&pos=0" method="POST">
<form name="insdoenca" method="POST" id="insdoenca" color="#FFFFFF">
<script language="JavaScript">function FP_goToURL(url) {//v1.0
window.location=url;
}</script>
</head>
<body bgcolor="#336699" text="#000000">
<div align="center">
<a href="javascript:history.go(-1)">
<img border="0" href="images/back.png" width="25" height="17" src="images/back.png"></a><table border="0" width="592" cellspacing="0" cellpadding="0" style="border-style: double; ">
<tr>
<td align="right" width="68"><font face="Verdana" size="1">Titulo:</font></td>
<td width="469">
<font face="Verdana" size="1">
<input type="text" name="titulo" id="titulo" size="72" style="border: 3px double #C0C0C0; font-family:Verdana; font-size:8pt"></font><font color="#FF0000" face="Verdana" size="1">*</font><font size="1" face="Verdana"> </font></td>
<td width="49">
</td>
</tr>
<tr>
<td align="right" width="68" height="21"><font face="Verdana" size="1">Imagem1:</font></td>
<td width="469" height="21">
<font size="1" face="Verdana">
<input type="text" name="imagem1" id="imagem1" size="72" style="border: 3px double #C0C0C0; font-family:Verdana; font-size:8pt"></font><font color="#FF0000" face="Verdana"><a target="_blank" href="help.htm"><font color="#FF0000">?</font></a></font><font color="#FF0000" face="Verdana" size="1"> </font></td>
<td width="49" height="21">
</td>
</tr>
<tr>
<td align="right" width="68" height="21"><font face="Verdana" size="1">Imagem2:</font></td>
<td width="469" height="21">
<font size="1" face="Verdana">
<input type="text" name="imagem2" id="imagem2" size="72" style="border: 3px double #C0C0C0; font-family:Verdana; font-size:8pt"></font><font color="#FF0000" face="Verdana"><a target="_blank" href="help.htm"><font color="#FF0000">?</font></a></font><font color="#FF0000" face="Verdana" size="1"> </font></td>
<td width="49" height="21">
</td>
</tr>
<tr>
<td align="right" width="68" height="21"><font face="Verdana" size="1">Imagem3:</font></td>
<td width="469" height="21">
<font size="1" face="Verdana">
<input type="text" name="imagem3" id="imagem3" size="72" style="border: 3px double #C0C0C0; font-family:Verdana; font-size:8pt"></font><font color="#FF0000" face="Verdana"><a target="_blank" href="help.htm"><font color="#FF0000">?</font></a></font><font color="#FF0000" face="Verdana" size="1"> </font></td>
<td width="49" height="21">
</td>
</tr>
<tr>
<td align="right" width="68" height="21"><font face="Verdana" size="1">Imagem4:</font></td>
<td width="469" height="21">
<font size="1" face="Verdana">
<input type="text" name="imagem4" id="imagem4" size="72" style="border: 3px double #C0C0C0; font-family:Verdana; font-size:8pt"></font><font color="#FF0000" face="Verdana"><a target="_blank" href="help.htm"><font color="#FF0000">?</font></a></font><font color="#FF0000" face="Verdana" size="1"> </font></td>
<td width="49" height="21">
</td>
</tr>
<tr>
<td align="right" width="68" height="21"><font face="Verdana" size="1">Imagem5:</font></td>
<td width="469" height="21">
<font size="1" face="Verdana">
<input type="text" name="imagem5" id="imagem5" size="72" style="border: 3px double #C0C0C0; font-family:Verdana; font-size:8pt"></font><font color="#FF0000" face="Verdana"><a target="_blank" href="help.htm"><font color="#FF0000">?</font></a></font><font color="#FF0000" face="Verdana" size="1"> </font></td>
<td width="49" height="21">
</td>
</tr>
<tr>
<td align="right" width="68" height="21"><font face="Verdana" size="1">Imagem6:</font></td>
<td width="469" height="21">
<font size="1" face="Verdana">
<input type="text" name="imagem" id="imagem" size="72" style="border: 3px double #C0C0C0; font-family:Verdana; font-size:8pt"></font><font color="#FF0000" face="Verdana"><a target="_blank" href="help.htm"><font color="#FF0000">?</font></a></font><font color="#FF0000" face="Verdana" size="1"> </font></td>
<td width="49" height="21">
</td>
</tr>
<tr>
<td align="right" height="21" width="68">
<font size="1" face="Verdana">
Youtube:</font></td>
<td width="469" height="21">
<font size="1" face="Verdana">
<input type="text" name="youtube" id="youtube" size="72" style="border: 3px double #C0C0C0; font-family:Verdana; font-size:8pt"></font><font color="#FF0000" face="Verdana"><a target="_blank" href="help.htm"><font color="#FF0000">?</font></a></font></td>
<td width="49" height="21">
</td>
</tr>
<tr>
<td align="right" height="21" width="68">
<font size="1" face="Verdana">
E-mail:</font></td>
<td width="469" height="21">
<font size="1" face="Verdana">
<input type="text" name="email" id="email" size="72" style="border: 3px double #C0C0C0; font-family:Verdana; font-size:8pt"><font color="#FF0000">*</font></font></td>
<td width="49" height="21">
</td>
</tr>
<%
if request.queryString("tbl")="doencas" then %>
<tr><td align="right" height="45" width="68">
<p><font face="Verdana" size="1">Sintomas: </font>
</td>
<td width="469" height="45">
<font size="1" face="Verdana">
<textarea rows="3" name="sintoma" cols="72" style="border:3px double #C0C0C0; font-family: Verdana; font-size: 8pt"></textarea></font><font color="#FF0000" face="Verdana" size="1">*</font>
</td>
<td width="49" height="45">
</td> <tr>
<td align="right" height="58" width="68">
<p><font face="Verdana" size="1">Descrição: </font>
</td>
<td width="469" height="58">
<font size="1" face="Verdana">
<textarea rows="4" name="descricao" cols="72" style="border:3px double #C0C0C0; font-family: Verdana; font-size: 8pt"></textarea></font><font color="#FF0000" face="Verdana" size="1">*</font></td>
<td width="49" height="58">
<p><input type="image" id="insdoenca" name="insdoenca" src="images/ok1.png" style="border: 0 double #C0C0C0; font-family:Verdana; " alt="OK" width="39" height="33"></td>
</tr>
</table>
</div>
</font>
</form>
</form>
</body>
</html><%
Dim tbl
cod=request.querystring("cod")
tbl= request.queryString("tbl")
set conn = CreateObject("ADODB.Connection")
conn.Provider = "Microsoft.Jet.Oledb.4.0"
conn.Open Server.MapPath("db/DBAquasplender.mdb")
set rs=server.createobject("adodb.recordset")
if request.form("insdoenca.x")>0 then
diyyy
end if
sub diyyy()
if request.form("email")="" or request.form("titulo")="" or request.form("descricao")="" then
%> <p align="center"><%response.write ("Preencha todos os campos")%></p>
<% else
instotal="select * from " & tbl & ";"
response.write (instotal)
rs.open instotal,conn,2,2
rs.addnew
rs.fields("username")=Session("username")
if request.queryString("tbl")="doencas" then
rs.fields("sintoma")=request.form("sintoma")
else
end if
rs.fields("descricao")=request.form("descricao")
rs.fields("titulo")=request.form("titulo")
rs.fields("hora")=time()
rs.fields("data")=date()
rs.fields("email")=request.form("email")if request.form("imagem")="" then
rs.fields("imagem")="images/semfoto.jpg"
else
rs.fields("imagem")=request.form("imagem")
end if
if request.form("imagem1")="" then
rs.fields("imagem1")="images/semfoto.jpg"
else
rs.fields("imagem1")=request.form("imagem1")
end if
if request.form("imagem2")="" then
rs.fields("imagem2")="images/semfoto.jpg"
else
rs.fields("imagem2")=request.form("imagem2")
end if
if request.form("imagem3")="" then
rs.fields("imagem3")="images/semfoto.jpg"
else
rs.fields("imagem3")=request.form("imagem3")
end if
if request.form("imagem4")="" then
rs.fields("imagem4")="images/semfoto.jpg"
else
rs.fields("imagem4")=request.form("imagem4")
end if
if request.form("imagem5")="" then
rs.fields("imagem5")="images/semfoto.jpg"
else
rs.fields("imagem5")=request.form("imagem5")
end if
if request.form("youtube")="" then
rs.fields("youtube")="images/semvideo.jpg"
else
rs.fields("youtube")=request.form("youtube")
end if
rs.update
rs.close%>
<p align="center"><%response.write ("Informação adicionada, Obrigado.")%></p>
<%
end if
end sub
conn.close
%>
Obrigado
Aqui esta o erro que da, como podem ver pelo response.write do select ele nao esta a ir buscar a variavel tbl mas ela esta la visto funcionar para outras coisas.
>
select * from ;
Microsoft JET Database Engine error '80040e14'
Syntax error in FROM clause.
/newfolder/ins.asp, line 175
Aqui esta o erro que da, como podem ver pelo response.write do select ele nao esta a ir buscar a variavel tbl mas ela esta la visto funcionar para outras coisas.
>
select * from ;
Microsoft JET Database Engine error '80040e14'
Syntax error in FROM clause.
/newfolder/ins.asp, line 175
tbl está vazio
o problema e que nao esta :S
este codigo funciona noutra pagina mas aqui nao esta a dar embora me pareca estar tudo bem..
mude isto:
Dim tbl
cod=request.querystring("cod")
tbl= request.queryString("tbl")
response.write tbl
response.end()
e posta oq aparece por fvor
quando entro na pagina aparece o nome do tbl mas quando faço inserir simplesmente nao faz nada
quando entro na pagina aparece o nome do tbl(o nome da tabela que vai no link) mas quando faço inserir simplesmente nao faz nada
Ops, postei uma coisa, mais so depois vi que errei, foi malz
>
Ops, postei uma coisa, mais so depois vi que errei, foi malz
Viva patrique, postaste?? nao esta ca nada....
Acho que neste caso você terá que fazer em if ou case esta sql. tipo....
tbl = request.queryString("tbl")
If tbl = "doencas" Then
instotal = "select * from doencas"
ElseIf tbl = "mulheres" Then
instotal = "select * from mulheres"
ElseIf tbl = "homens" Then
instotal = "select * from homens"
Else
instotal = "select * from doencas"
End if
[]'s
boa patrique, funcionou :)
Alguma ideia porque é que o meu codigo funcionava numa pagina e nesta nao?
Já agora eu estou a ter dificuldades em dar o tbl ao link, alguma sugestao??
ver.asp?tbl=<%"tbl"%>&id=<%= rs("id") %>
Olhe como vce fez o id e ocmo vce fez o tbl...
Correto:
ver.asp?tbl=<%=tbl%>&id=<%= rs("id") %>
mais uma vez obrigado a todos.
estes pormenores passam-me sempre ao lado...
Cara, pra gente te ajudar, posta o erro que dá e a linha do erro.