<%
dim id
dim 1
dim 2
dim 3
dim 4
dim 5
id = replace(request.form("id"), "'" , "''")
1 = replace(request.form("1"), "'", "''")
2 = replace(request.form("2"), "'", "''")
3 = replace(request.form("3"), "'", "''")
4 = replace(request.form("4"), "'", "''")
5 = replace(request.form("5"), "'" , "''")
Set DB = Server.CreateObject("ADODB.Connection")
cnpath="DBQ=" & server.mappath("../dados/email.mdb")
DB.Open "DRIVER={Microsoft Access Driver (*.mdb)}; " & cnpath
inserir = "INSERT INTO 1 (1,2,3,4,5,id) " & _
"VALUES ('" & 1 & "','" & 2 & "','" & 3 & "','" & 4 & "','"& id & "','" & 5 & "')"
DB.Execute(inserir)
response.redirect "cons.asp"
<html>
<head>
<title></title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
<style type="text/css">
<!--
a:link { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 10px; text-decoration: none}
a:hover { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 10px; color: #999999; text-decoration: none }
a:visited { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 10px; text-decoration: none }
a:active { font-family: Verdana, Arial, Helvetica, sans-serif; font-size: 10px; color: #000000; text-decoration: none }
-->
</style>
</head>
<body bgcolor="#FFFFFF" text="#000000" link="#000000" vlink="#000000" alink="#000000">
<p align="center"><img border="0" src="logo2.gif" width="308" height="86"></p>
<P align=center><SPAN
style="FONT-SIZE: 14pt; FONT-FAMILY: 'Times New Roman'; mso-bidi-font-size: 10.0pt; mso-fareast-font-family: 'Times New Roman'; mso-ansi-language: PT-BR; mso-fareast-language: PT-BR; mso-bidi-language: AR-SA">RELATÓRIO
TÉCNICO DE
ATENDIMENTO</SPAN></P>
<form name="form1" method="post" action="h_assis.asp">
<div align="center" style="width: 758; height: 702">
<TABLE width="99%" border=1>
<TR>
<TD width="111%"><b>ASSIS DE ALMEIDA ADVOGADOS</b></TD>
</TR></TABLE>
<TABLE width="99%" border=1 height="15">
<TR>
<TD width="7%" height="9"><B><FONT face=Tahoma
size=2>Endereço:</FONT></B></TD>
<TD width="93%" height="9">Av: Rio branco - Centro - Rio de
Janeiro - RJ</TD></TR>
</TABLE>
<TABLE width="99%" border=1 height="26">
<TR>
<TD width="7%" height="20"><B><FONT face=Tahoma
size=2>Contato:</FONT></B></TD>
<TD width="93%" height="20">Sr. Rosangela</TD>
</TR></TABLE>
<p><b>Contrato de Suporte Técnico</b></p>
<table border="0" width="75%" cellspacing="0" cellpadding="0" height="528">
<tr>
<td width="100%" style="border-bottom-style: solid" height="23"><b>Fechamento
de Mês: <select size="1" name="1">
<option selected>Mês</option>
<option>Janeiro de 2004</option>
<option>Fevereiro de 2004</option>
<option>Março de 2004</option>
<option>Abril de 2004</option>
<option>Maio de 2004</option>
<option>Junho de 2004</option>
<option>Julho de 2004</option>
<option>Agosto de 2004</option>
<option>Setembro de 2004</option>
<option>Outubro de 2004</option>
<option>Novembro de 2004</option>
<option>Dezembro de 2003</option>
</select>
Horas Contratadas: 20 Hs.</b></td>
</tr>
<tr>
<td width="100%" height="22">
<p><b>1- Atendimentos Realizados: </b><b><select size="1" name="2" style="font-size: 10 pt; font-family: ta">
<option selected>Quantidade</option>
<option>8</option>
<option>9</option>
<option>10</option>
<option>11</option>
<option>12</option>
<option>13</option>
<option>14</option>
<option>15</option>
<option>16</option>
<option>17</option>
<option>18</option>
<option>19</option>
<option>20</option>
<option>21</option>
<option>22</option>
<option>23</option>
</select></b>Atendimentos </p>
</td>
</tr>
<tr>
<td width="100%" height="21"></td>
</tr>
<tr>
<td width="100%" height="21"><b>2- Horas Trabalhadas: <select size="1" name="3" style="font-size: 10 pt; font-family: ta">
<option selected>Hora</option>
<option>8</option>
<option>9</option>
<option>10</option>
<option>11</option>
<option>12</option>
<option>13</option>
<option>14</option>
<option>15</option>
<option>16</option>
<option>17</option>
<option>18</option>
<option>19</option>
<option>20</option>
<option>21</option>
<option>22</option>
<option>23</option>
</select></b>hs de atendimento</td>
</tr>
<tr>
<td width="100%" height="21"></td>
</tr>
<tr>
<td width="100%" height="21"><font face="Tahoma" size="2"><b>3- Horas Adicionais
(extras): </b></font><b><select size="1" name="4" style="font-size: 10 pt; font-family: ta">
<option selected>Não houve horas Adicionais</option>
<option>8 horas adicionais</option>
<option>9</option>
<option>10</option>
<option>11</option>
<option>12</option>
<option>13</option>
<option>14</option>
<option>15</option>
<option>16</option>
<option>17</option>
<option>18</option>
<option>19</option>
<option>20</option>
<option>21</option>
<option>22</option>
<option>23</option>
</select></b></td>
</tr>
<tr>
<td width="100%" height="21"></td>
</tr>
<tr>
<td width="100%" height="21" style="border-bottom-style: solid"><b>4-
Resumo das Principais Atividades: </b></td>
</tr>
<tr>
<td width="100%" height="21"><textarea rows="5" name="5" cols="90">NENHUMA </textarea></td>
</tr>
<tr>
<td width="100%" height="21">
<p> </td>
</tr>
<tr>
<td width="100%" height="21">
<table border="0" width="100%">
<tr>
<td width="50%" align="center"><font face="Tahoma" size="2">______________________________________________</font></td>
</tr>
<tr>
<td width="50%" align="center"><font face="Tahoma" size="2"><b>Data
Help Consultoria e Tecnologia</b></font></td>
</tr>
<tr>
<td width="50%" align="center">Raimundo Lopes Cavalcante Jr</td>
</tr>
<tr>
<td width="50%" align="center"><font face="Tahoma" size="2">Gerência
Técnica</font></td>
</tr>
</table>
</td>
</tr>
<tr>
<td width="100%" height="21" align="center"><font size="2" face="Tahoma"><b>Data
Help Consultoria e Tecnologia LTDA.Rua Dias da Cruz, 445/407 - Tel/Fax
: (21) 2599-9293 / 2289-5501</b></font></td>
</tr>
<tr>
<td width="100%" height="21" align="center"><font face="Tahoma"><b><a href="http://www.datahelp.....com.br/"><font size="2"><span style="mso-bidi-font-size: 12.0pt; mso-fareast-font-family: Times New Roman; mso-bidi-font-family: Times New Roman; mso-ansi-language: PT-BR; mso-fareast-language: PT-BR; mso-bidi-language: AR-SA">http:/www.datahelp.com.br</span></font></a><span style="mso-bidi-font-size: 12.0pt; mso-fareast-font-family: Times New Roman; mso-bidi-font-family: Times New Roman; mso-ansi-language: PT-BR; mso-fareast-language: PT-BR; mso-bidi-language: AR-SA"><font size="2">
/ e-mail: </font><a href="mailto:mokus@datahelp.com.br"><font size="2">suporte@datahelp.com.br</font></a></span></b></font></td>
</tr>
<tr>
<td width="100%" height="21" align="center"></td>
</tr>
<tr>
<td width="100%" height="21" align="center"></td>
</tr>
<tr>
<td width="100%" height="21">
<p align="center"><font size="2" face="Arial, Helvetica, sans-serif">
<input type="submit" name="Submit" value="incluir">
</font><INPUT type=reset value=Limpar name=reset> </td>
</tr>
<tr>
<td width="100%" height="21"></td>
</tr>
</table>
</div>
</form>
<%
Set conexao = Server.CreateObject("ADODB.Connection")
Conexao.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ="& Server.MapPath("../dados/email.mdb")
SQL="Select * From 1 order by ID"
Set RS = conexao.execute(sql)%>
<%do while not rs.EOF %>
<p>
<%rs.MoveNext%>
<%Loop%>
</p>
<p align="center"><font face="Arial, Helvetica, sans-serif">
</a></font></p>
</body>
</html>
Erro No Incluir
Started By mokus, 23/06/2004, 19:58
1 reply to this topic
#1
Posted 23/06/2004, 19:58
#2
Posted 24/06/2004, 08:33
Qual o erro que deu, e em qual linha ???
Ninguém aqui no fórum é adivinho ou trabalha com bola de cristal...
Ninguém aqui no fórum é adivinho ou trabalha com bola de cristal...
Dinho
Ajude a proibir os "jabás" nas rádios brasileiras.
Mas, afinal, o que é o "jabá"?!? acesse Rock Brasil
Acesse Fórum SOS Designers
Coluna de JavaScript/CSS do Upmasters
Ajude a proibir os "jabás" nas rádios brasileiras.
Mas, afinal, o que é o "jabá"?!? acesse Rock Brasil
Acesse Fórum SOS Designers
Coluna de JavaScript/CSS do Upmasters
1 user(s) are reading this topic
0 membro(s), 1 visitante(s) e 0 membros anônimo(s)