Ir para conteúdo
Fórum CódigoFonte.net

liberdade

Membros
  • Total de itens

    18
  • Registro em

  • Última visita

  1. liberdade

    Campo tabela SQL em tabela HTML

    Bom dia. O que eu preciso é o seguinte. Tenho uma tabela no SQL e tenho que mostrar em algumas células de uma tabela HTML alguns campos dessa tabela do SQL. Pois essa tabela HTML é personalizada com células mescladas e algumas células com figura. Esse código é um exmplo do site do Marcoratti que fiz algumas adaptações para minha necessidade. <table style="width: 336px" border="1"> <tr> <td style="width: 204px"> <asp:SqlDataSource ID="SqlDataSource3" runat="server" ConnectionString="<%$ ConnectionStrings:dbboletoConnectionString %>" SelectCommand="SELECT [Nome_Ciente] FROM [Boleto] WHERE ([CNPJ] = @CNPJ)"> <SelectParameters> <asp:ControlParameter ControlID="txtCriterio" Name="CNPJ" PropertyName="Text" Type="Int64" /> </SelectParameters> </asp:SqlDataSource></td> </tr> </table> Mas sem êxito pois não dá erro nem acerto, a célula fica em branco. Mostrar dentro de um GridView eu consegui, digito o CNPJ na caixa de texto e clico em um botão e me é retornado apenas um registro e se clico em outro botão que é para mostrar toda a tabela tb funciona. mas o que preciso mesmo é mostrar apenas um campo dentro de uma célula da tabela HTML após ter digitado o CNPJ em uma caixa de texto. Obrigada Letícia códigos que hoje funcionam. <%@ Page Language="VB" AutoEventWireup="false" CodeFile="Bsuca.aspx.vb" Inherits="_Default" %> <html xmlns="http://www.w3.org/1999/xhtml" > <head runat="server"> <title>Untitled Page</title> </head> <body> <form id="form1" runat="server"> <div> <br /> <br /> <asp:TextBox ID="txtCriterio" runat="server" Width="174px" AutoPostBack="True">46556323000676</asp:TextBox> <asp:Button ID="btnSelecao" runat="server" Text="Mostrar Seleção" onclick="mostraSelecao" Width="120px" /> <asp:Button ID="btnTudo" runat="server" Text="Mostrar Tudo" onclick="mostraTudo" Width="123px" /><br /> <asp:SqlDataSource ID="SqlDataSource1" runat="server" ConnectionString="<%$ ConnectionStrings:dbboletoConnectionString %>" SelectCommand="SELECT * FROM [Boleto] WHERE ([CNPJ] = @CNPJ)"> <SelectParameters> <asp:ControlParameter ControlID="txtCriterio" Name="CNPJ" PropertyName="Text" Type="Int64" /> </SelectParameters> </asp:SqlDataSource> <br /> <asp:SqlDataSource ID="SqlDataSource2" runat="server" ConnectionString="<%$ ConnectionStrings:dbboletoConnectionString %>" SelectCommand="SELECT * FROM [Boleto]"> </asp:SqlDataSource> <br /> <asp:GridView ID="GridView1" runat="server" Height="79px" Width="411px"> </asp:GridView> <br /> <br /> </div> </form> </body> </html> agora .vb Imports System.configuration Partial Class _Default Inherits System.Web.UI.Page Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load Dim conexaoBD As String = "Data Source=local\sqlexpress;Initial Catalog=dbboleto;Persist Security Info=True;User ID=sa;Password=123456" SqlDataSource1.SelectCommand = "SELECT [CNPJ], [Cod_Cliente], [Nome_Ciente], [Vencimento], [Valor_Boleto] FROM [boleto] WHERE ([CNPJ] = @CNPJ)" SqlDataSource1.ConnectionString = conexaoBD SqlDataSource2.SelectCommand = "SELECT [CNPJ], [Cod_Cliente], [Nome_Ciente], [Vencimento], [Valor_Boleto] FROM [boleto]" SqlDataSource2.ConnectionString = conexaoBD End Sub Sub mostraSelecao(ByVal Source As Object, ByVal E As EventArgs) Handles btnSelecao.Click GridView1.DataSourceID = "SqlDataSource1" GridView1.DataBind() End Sub Sub mostraTudo(ByVal Source As Object, ByVal E As EventArgs) GridView1.DataSourceID = "SqlDataSource2" GridView1.DataBind() End Sub End Class Espero que alguém possa me ajudar porque isso está me tirando o sono.
  2. liberdade

    Editar usuário atual

    Bom dia, eu consegui fazer (só não sei se está da maneira correta) uma tela de login/senha/alteração/exclusão/listagem de usuários. Mas quando eu peço para listar os usuários pois somente após listar todos os usuários é que eu consigo excluir ou alterar um deles, mas o que eu desejo realmente é.. Quando o usuário logar irá aparece na tela após o login dois link´s, alterar e excluir conta e com isso quando ele clicar nesse link ele poderá alterar ou excluir somente a conta dele. grata Letícia
  3. Boa Tarde. Pessoal eu consegui fazer.. ficou assim para alguém que passe pelo mesmo caso que eu.. Imports System.Data.oledb Imports System.data Partial Class _Default Inherits System.Web.UI.Page Protected Sub btnProcurar_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnProcurar.Click Try 'obtendo a string de conexão do arquivo web.config Dim conexaoExcel As String = System.Configuration.ConfigurationManager.ConnectionStrings.Item("conexaoExcel").ToString() Dim dbConn As New OleDbConnection(conexaoExcel) Dim strSQL As String 'montando a instrução SQL para obter os dados da planilha selecionada na caixa de listagem ddlExcel dbConn.Open() strSQL = "SELECT CODIGO FROM [" & ddlExcel.SelectedItem.ToString() & "$] WHERE CODIGO = '0001'" 'Executando a instrução SQL e criando um DataSet para receber os dados Dim cmd As New OleDbCommand(strSQL, dbConn) Dim dsExcel As New DataSet Dim daExcel As New OleDbDataAdapter(cmd) 'preenchendo o DataSet e exibindo os dados no gridView daExcel.Fill(dsExcel) If dsExcel.Tables(0).Rows.Count = 0 Then Response.write("O Campo código não está marcado como 000!") End If gdvExcel.DataSource = dsExcel gdvExcel.DataBind() Catch ex As Exception Throw ex End Try End Sub End Class Consegui validar código... se o código.. 0001 não existir dentro do arquivo XLS na coluna código dá essa mensagem de erro que o código não foi encontrado.. Até ai está certinho. Mas além de validar esse código, tenho que validar datas.. Exemplo.. dentro do arquivo na coluna data_nasc tenho o seguinte valor.. 28101980 (isso está correto) mas o usuário pode ter digitado 281080 ou em algum outro momento digitar uma data assim.. 072007 sendo que deveria ser assim.. 03072007. Como validar isso? Como fazer um IF ou expressão regular para verificar isso? Grata Letícia
  4. liberdade

    Arquivo XLS em asp

    Pessoal, Bom dia.. Eu consegui chegar até aqui fazendo o código ASP para ler um arquivo XLS. ficou assim mas está dando erro.. será que podem me ajudar? <% Dim rs As ADODB.Recordset Dim rsTable As ADODB.Recordset Dim cn As ADODB.Connection Set cn = New ADODB.Connection With cn .Provider = "MSDASQL" .ConnectionString = "Driver={Microsoft Excel Driver (*.xls)};" & _ "DBQ=C:teste.xls; ReadOnly=False;" .Open End With Set rsTable = New ADODB.Recordset Set rs = New ADODB.Recordset rsTable.Open cn.OpenSchema(adSchemaTables) 'Recordset para saber quantos Sheets existem na planilha While Not rsTable.EOF tblName = rsTable.Fields("TABLE_NAME").Value ' Nome do Sheet dentro do XLS strQuery = "SELECT * FROM [" & tblName & "]" 'Abrir Sheet rs.Open strQuery, cn Do Until rs.EOF colA=rs(0) 'Coluna A colB=rs(1) 'Coluna B colC=rs(2) 'Coluna C '.... rs.MoveNext 'Cada leitura do recordset corresponde a mais uma linha da planilha Loop rs.Close rsTable.MoveNext 'Cada leitura do recordset corresponde a mais um Sheet existente na planilha Wend rsTable.Close cn.close set rsTabela = nothing set rs = nothing set cn = nothing %> Mas dá esse erro. CODE Tipo de erro: Erro de compilação do Microsoft VBScript (0x800A0401) Fim da instrução esperado /leitura/lerxls.asp, line 2, column 7 Dim rs As ADODB.Recordset Fiz na tentativa de acertar e encontrei esse código na net que parece se menor mas também dá erro.. <% Dim cn, rs, cmd Set cn = CreateObject("ADODB.Connection") cn.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _ "Data Source=abencoa.xls;" & _ "Extended Properties=""Excel 8.0;HDR=Yes;"";" Set cmd = CreateObject("ADODB.Command") cmd.ActiveConnection = cn cmd.CommandText = "SELECT * from 'Tabelle1$A2:C4'" cmd.CommandText = "SELECT * from 'Bereichsname'" Set rs = cmd.Execute %> dá esse erro.. Tipo de erro: Microsoft JET Database Engine (0x80004005) O mecanismo de banco de dados Microsoft Jet não pode abrir o arquivo ''. Ele já foi aberto em modo exclusivo por outro usuário ou você precisa de permissão para exibir seus dados. /leitura/lerxls1.asp, line 4 O que será? grata Letícia
  5. liberdade

    Editar campo

    Tentei fazer assim mas não deu certo.. creio que seja problema de lógica.. "acho".. <?php $servidor = "localhost"; $usuario = "teste"; $senha = "123456"; $banco = "rm"; $con = mysql_connect($servidor, $usuario, $senha); mysql_select_db($banco); $res = mysql_query("SELECT artigo FROM salario"); $num_linhas = mysql_num_rows($res); for($i=0; $i<$num_linhas; $i++) { $dados = mysql_fetch_row($res); $mes = $dados[0]; echo "$mes<br>"; } echo "<html><body>"; echo "<input type=text value=$mes>"; echo "<html><body>"; mysql_close($con); ?> Vem Artigo um (1) Artigo dois (2) Artigo três (3) Artigo quatro (4) Artigo cinco (5) que são os valores dos registro que são em 5 registros.. mudei os valores para saber quem é que irá aparecer.. e depois por último está aparecendo uma caixa de texto apenas com a palavra ARTIGO que eu nem faço idéia de onde veio...
  6. liberdade

    Editar campo

    Cheguei até aqui com essa sua ajuda pyro3x só que eu tenho 5 registros e em cada registro eu coloquei assim artigo 1 artigo 2 artigo 3 artigo 4 artigo 5 Isso dentro do campo artigos no banco de dados (MYSQL).. Quando eu fiz esse código <?php $servidor = "localhost"; $usuario = "teste"; $senha = "123456"; $banco = "rm"; $con = mysql_connect($servidor, $usuario, $senha); mysql_select_db($banco); $res = mysql_query("SELECT artigo FROM salario"); $num_linhas = mysql_num_rows($res); for($i=0; $i<$num_linhas; $i++) { $dados = mysql_fetch_row($res); $mes = $dados[0]; echo "$mes<br>"; } mysql_close($con); ?> Ele listou apenas o conteúdo do campo artigo dos 5 registros aparecendo isso.. Artigo 1 Artigo 2 Artigo 3 Artigo 4 Artigo 5 Mas como eu faço para pelo mesmo um ou todos esses valores que apareceram direto na página aparecerem em um campo TEXT ou texarea, pois o usuário terá que alterar esses valores e depois salvar. grata Letícia
  7. liberdade

    Editar campo

    Como ninguém consegiu me ajudar eu acho que eu não fui bem clara. O que eu gostaria de fazer, quando a pessoa entrar na página irá aparecer o conteúdo de um determinado campo do banco de dados e quem entrou nessa página irá poder alterar o conteúdo deste campo e salvar. Como se fosse uma área pública onde quem acessar essa página será capaz de alterar essas informações. Grata Letícia
  8. liberdade

    Editar campo

    Eu gostaria de saber como eu faço para mostrar o conteúdo de um campo de um banco de dados (MYSQL) em um textarea e quando eu clicar em um botão editar ter a possiblidade de alterar esse conteúdo e quando clicar em salvar essas alterações serem gravadas no banco novamente. Ou então nem precisa ter o botão editar, quando aparecer o conteúdo nessa caixa de texto a pessoa digita e depois salva. Grata Letícia
  9. liberdade

    CTRL=ALT+DEL e ALT+F4

    Bom dia, eu preciso fazer uma página que quando ela abrir, irá abrir em tela cheia e não terá como o usuário fechar, então eu pensei em uma página em full screen desabilitando ctrl+alt+del e alt+f4 e lógico, minimizar, e fechar da janela. Será uma página que irá aparecer quando um usuário entrar em alguma página que é proibida então essa tela irá abrir e o mesmo não conseguirá acessar mais nada na máquina até que ele nos avise.. Grata Letícia
  10. liberdade

    Conexao.execute (erro)

    Será que alguém pode ajudar uma mulher desesperada? <html> <LINK REL="stylesheet" HREF="\heva.css" TYPE="text/css"> <!--#include virtual="./connect.asp"--> <style> td{font-weight:bold;font-size:12pt} h4{font-weight:bold} strong{font-weight:bold;color:firebrick;font-size:12pt} </style> <% varhrabe = Request.Form ("horaabe") varusuario = Request.form ("usuario") varestacao = Request.form ("estacao") vardescricao = Request.form ("Descricao") set area_bd = Conexao.execute("SELECT estacaoid,areaid,ativo FROM computador WHERE estacao = '"&varestacao&"' AND ativo = 1") vararea = area_bd("areaid") 'response.Write(vararea) sql = "insert into principal(horaabe,usuarioid,estacaoid,areaid,descricao)" sql = sql & " Values (" sql = sql & "'"&varhrabe&"', " sql = sql & "'"&varusuario&"', " sql = sql & "'"&varestacao&"', " sql = sql & "'"&vararea&"', " sql = sql & "'"&vardescricao&"')" 'Response.Write(sql) set bd = Conexao.execute(sql) --essa é a linha do erro--- 'Response.End 'Response.Redirect("confirma.htm") set bdc = Conexao.execute("SELECT numero,dataabe,horaabe,descricao FROM chamados ORDER BY numero DESC") %> <body style="overflow:hidden;"> <br> <h2 align="center">Seu Chamado foi aberto com sucesso !!</h2> <br> <br> <h4 align="center">DADOS DO CHAMADO</h4> <table align="center" border="0" width="80%"> <tr> <td height="60">Número:&nbsp;<strong><%=bdc("numero")%></strong></td> <td>Data:&nbsp;<strong><%=bdc("dataabe")%></strong></td> <td>Hora:&nbsp;<strong><%=bdc("horaabe")%></strong></td> </tr> <tr> <td colspan="3" height="60">Descrição:&nbsp;<strong><%=bdc("descricao")%></strong></td> </tr> </table> <p align="right"><a href="/suporte/index.htm">Voltar</a></p> <% Conexao.close Set bdc = Nothing Set Conexao = Nothing Set bd = Nothing Set Conexao = Nothing Set area_bd = Nothing Set Conexao = Nothing %> </body> </html> e o erro é esse.. Microsoft OLE DB Provider for ODBC Drivers error '80040e07' [Microsoft][ODBC Microsoft Access Driver] Data type mismatch in criteria expression. /suporte/form.asp, line 26 ----18:25----- Eu alterei as ASPAS dessas linhas sql = sql & " Values (" sql = sql & "'"&varhrabe&"', " sql = sql & ""&varusuario&", " sql = sql & ""&varestacao&", " sql = sql & ""&vararea&", " sql = sql & ""&vardescricao&")" Deixando apenas na linha sql = sql & "'"&varhrabe&"', " as ASPAS simples, e agora o erro muda para Microsoft OLE DB Provider for ODBC Drivers error '80040e10' [Microsoft][ODBC Microsoft Access Driver] Too few parameters. Expected 2. porém se eu devolvo as aspas como estava antes, dá o mesmo erro que antes.. Microsoft OLE DB Provider for ODBC Drivers error '80040e07' [Microsoft][ODBC Microsoft Access Driver] Data type mismatch in criteria expression. /suporte/form.asp, line 26 -- O que será que pode ser que ninguém descombre? grata Ana
  11. liberdade

    Enviando e-mail via form

    Mais uma enquanto não resolvo o outro. Olá, com esse código aparece a confirmação de envio de e-mail porém não chega nada no destinatário do e-mail. Troquei por um outro exemplo mais simples e nada tb.. Aparece a tela dizendo que o formulário foi enviado com sucesso mas não chega nada no e-mail, o que acontece? grata Ana. <html> <head> <title>Confirmação de Envio</title> <style type="text/css"> p {font-family: Trebuchet MS; font-size:11pt; color: black} a {color:darkblue; text-decoration:underline} body {background:white} </style> <!--#include virtual=".\connect.asp"--> <% varusuarioid = Request.form ("usuario") vardescricao = Request.form ("descricao") vardestino = "[email protected]" varestacao = Request.ServerVariables ("remote_host") delimitador="." varestacao1=Split(varestacao,delimitador) varestacao=varestacao1(0) Set EnviarMail = Server.CreateObject("CDONTS.NewMail") set bdf = Conexao.execute("SELECT numero,dataabe,horaabe,descricao FROM chamados ORDER BY numero DESC") varnumero = bdf("numero") varabertura = bdf("dataabe") varhoraabe = bdf("horaabe") set usuario_bd = Conexao.execute("SELECT * from func_atual WHERE usuarioid = "&varusuarioid&"") varusuario = usuario_bd("usuario") EnviarMail.To = vardestino EnviarMail.From = "[email protected]" EnviarMail.Subject = "Sugestões para a Intranet - SECONCI" MsgBody = "<html>" _ & "<head>" _ & "</head>" _ & "<body bgcolor=""white"">" _ & "<font face=""Verdana"" size=""2""><b>" _ & "<p align=""justify"">Chamado : "& varnumero &"</p></b></font>" _ & "<p align=""justify""><b><font face=""Verdana"" size=""2"" color=""black"">Abertura : </font> <font face=""Verdana"" size=""2"" color=""darkblue"">"& varabertura & "</font></font> <font face=""Verdana"" size=""2"" color=""darkblue""> "& varhoraabe & "</font></b></p>" _ & "<p align=""justify""><b><font face=""Verdana"" size=""2"" color=""black"">Descricao : </font> <font face=""Verdana"" size=""2"" color=""darkblue"">"& vardescricao &"</font></b></p>" _ & "<hr color=""black"">" _ & "<p align=""justify""><b><font face=""Verdana"" color=""darkblue"">"& varusuario &"</font></b></p>" _ & "<p align=""justify""><b><font face=""Verdana"" size=""2"" color=""black"">Estação de onde foi enviada o chamado - </font> <font face=""Verdana"" size=""2"" color=""darkblue""> "& varestacao &"</font></b></p>" _ & "</body>" _ & "</html>" EnviarMail.Body = MsgBody EnviarMail.BodyFormat = 0 EnviarMail.MailFormat = 0 EnviarMail.Send Set EnviarMail = Nothing Set usuario_bd = Nothing %> </head> <body bgColor="#00cc00"> <br> <p align="center"><big>Obrigado por colaborar</big></p> <br> <p align="right"><big>Informática</big></p> <br> <br> <br> <center> <input type="button" name="bt_fechar" value="Fechar" onClick="javascript:window.close();" ID="Button1"> </center> </body> </html>
  12. liberdade

    Erro ao abrir

    Bom dia.. eu estou tentando abrir essa página ASP e retorna o seguinte erro. será que alguém pode me ajudar? grata Ana esse é o erro que aparece na página no IE SUPORTE Data de Abertura: 14/3/2007 Hora de Abertura: 11:24:24 Estação : ADODB.Field error '80020009' Either BOF or EOF is True, or the current record has been deleted. Requested operation requires a current record. /suporte/sup.asp, line 0 --Pelo que li esse erro é porque a consulta SQL não retornou nada, mas como pode ser possível sendo que eu olhei nas tabelas e consultas existem dados dentro das tabelas. -----16:56------ Consegui consertar a página onde ela pega os usuários do banco de dados em access e pega o ip da máquina do usuário que está acessando a página, só que quando eu clico em enviar aparece esse erro na página form.asp. Microsoft OLE DB Provider for ODBC Drivers error '80040e07' [Microsoft][ODBC Microsoft Access Driver] Data type mismatch in criteria expression. /suporte/form.asp, line 15 ----18:19---- agora parou nesta linha com esse erro. vararea = area_bd("areaid") ADODB.Recordset error '800a0cc1' Item cannot be found in the collection corresponding to the requested name or ordinal. /suporte/form.asp, line 17 o que acontece? Abaixo segue o código. <html> <head> <title>.:Suporte:.</title> <LINK REL=stylesheet HREF="\heva.css" TYPE="text/css"> <script language="javascript"> function formcheck() { if(document.form.descricao.value == "") { alert("Por favor, preencha o campo Descrição."); document.form.descricao.focus(); return false } else if(document.form.usuario.value == "1") { alert("Por favor, selecione seu nome."); document.form.usuario.focus(); return false } } </script> </head> <!--#include virtual=".\connect.asp"--> <% delimitador = "." varestacao = Request.ServerVariables("REMOTE_HOST") varestacao1 = Split(varestacao, delimitador) varestacao = varestacao1(0) set usuario_bd = Conexao.execute("SELECT usuario,usuarioid from func_atual Order by usuario") set estacao_bd = Conexao.execute("SELECT estacao,estacaoid from estacao_atual WHERE estacao = '"&varestacao&"' ") Session.LCID = 1046 %> <body style="overflow:hidden"> <h2 align="center"><b><u>SUPORTE</u></b></h2> <form name="form" method="post" action="form.asp"> <table border=0 align=center width=95% cellspacing=4> <tr align=right> <td width=25%><b>Data de Abertura: </b></td> <td align=left width=25%> <b style=color:"black"><%=FormatDateTime(Date)%></b></td> <td width=20%><b>Hora de Abertura:</b></td> <td align=left width=20%><input type=hidden name="horaabe" size=6 value="<%=FormatDateTime(now,3)%>"> <b style=color:"black"><%=FormatDateTime(now,3)%></b></td> </tr> <tr> <td align=right><b>Estação : </b></td> <td><input type=hidden name="estacao" size=12 value="<%=estacao_bd("estacaoid")%>"> <b style=COLOR:"black"><%=varestacao%></b></td> </tr> <tr> <td align=right><b>Usuário: </b></td> <td colspan=2> <select name="usuario" id="Usuario"><% 'Loop para preencher os nomes do while not usuario_bd.eof %> <option value="<%=usuario_bd ("usuarioid")%>"><%=usuario_bd ("usuario")%></option> <% usuario_bd.movenext loop set usuario_bd = nothing %> </select> </td> </tr> <tr align=right> <td valign="top"><b>Descrição: </b></td> <td align=left colspan="5"><textarea name="descricao" id="descricao" rows=6 cols=48></textarea></td> </tr> <tr> <td align=right colspan=2><input type="Submit" value="Enviar" onClick="return formcheck()"> </td> <td align=left> <input type="Reset" value="Limpar"></td> <td align=right><a href="index.htm"><b>Voltar</b></a></td> </tr> </table> </form> <% Conexao.close set Conexao = nothing set estacao_bd = nothing %> </body> </html>
  13. liberdade

    Formulário (mysql ou access)

    Bom dia pessoal, tenho a seguinte dúvida.. Como eu faço para que após o usuário ter preenchido um foprmulário em HTML e ter clicado no botão enviar essas informações serem gravadas em um banco de dados em access ou mysql.. se for em access está mais fácil pois meu programa que uso para manipular base de dados mysql que é o Frontsql expirou e portanto eu não tenho como criar nenhuma base em mysql mas se alguém puder me ajudar e indicar um programa free para base de dados mysql eu agradeço.. grata Letícia.. sendo que a urgência é saber como gravar as informações de um formulário em uma base de dados access ou mysql ou os dois.. hehe
  14. liberdade

    banco de dados access

    Olá pessoal, eu tenho a seguinte dúvida.. como eu faço para conectar um banco de dados access usando o PHP e como fazer para que quando o usuário preencher o formulário e clicar em gravar como eu posso fazer para que o que ele digitou seja gravado no banco do access? Grata Letícia
  15. Deu certo.. o esquema de ALT+0160 deu certinho. e sobre a integração eu quebrei um pouco mais a cabeça para tentar fazer só.. Deu certinho.. brigadão.. Letícia Agora eu queria saber como faço ou qual tecnologia usar para quando o usuário entrar na página a pagina mostre a imagem que a Web cam estiver mostrando e quando ele clicar no botão fotografar ser gerada uma imagem com a foto tirada e automaticamente armazenar no servidor..
×
×
  • Criar Novo...