Planta baixa e projeto 3D de Casa
Utilizando ferramenta open source de desenvolvimento de planta baixa e projeção de casa.
Como montei:
Como ficou:
Utilizando ferramenta open source de desenvolvimento de planta baixa e projeção de casa.
Como montei:
Como ficou:
Segue o exemplo de código de javascript para planilhar uma lista Sharepoint
<form method="post">
<table>
<tr>
<td>Empresas</td>
<td><select id="lstBaseCliente" name="BaseCliente" onclick="Load();">></select></td>
</tr>
<tr>
<td>Equipe</td>
<td> <select id="lstEquipe" name="Equipe"></select></td>
</tr>
<tr>
<td>Colaborador</td>
<td><select id="lstColaborador" name="Colaborador"></select></td>
</tr>
<tr>
<td><br/></td>
</tr>
<tr>
<td><br/></td>
<td><rigth><input type="button" value="Visualizar" onclick="Main();"></rigth></td>
</tr>
</table>
<table>
<tr>
<td>Grafico</td>
</tr>
<tr>
<td><canvas id="Grafico" width="600" height="600"></canvas></td>
</tr>
<tr>
<td>Tipo de Resultado</td>
</tr>
<tr>
<td>Visualização</td>
<td><select id="lstVer" name="Ver" onchange="Main();"> <option>Colaboradores</option> <option>Empresas</option></select></td>
</tr>
<tr>
<td>Calculado:</td>
<td><select id="lstResultado" name="Resultado" onchange="Main();"><option>Quantidade</option> <option>Tempo Gasto</option></select></td>
</tr>
<tr>
<td><br/></td>
</tr>
</table>
<table>
<tr>
<td>Grid Dados</td>
</tr>
<tr>
<td>
<table cellpadding="0" cellspacing="0" border="0" class="display" id="GRID">
</table>
</td>
<tr>
</table>
</form>
<script type="text/javascript" src="//ajax.googleapis.com/ajax/libs/jquery/1.11.1/jquery.min.js"> </script>
<script type="text/javascript" src="//ajax.googleapis.com/ajax/libs/jqueryui/1.11.0/jquery-ui.min.js"></script>
<script type="text/javascript" src="https://jquery-datatables-editable.googlecode.com/svn/trunk/media/js/jquery.dataTables.min.js"></script>
<script type="text/javascript" >
var collListItem; //ListItems
var chartX = []; //X-Axis Labels
var chartY = []; //Y-Axis Values
var Dataset = []; //Dados do Item
var chartJs = "/Qualidade/Documentos Compartilhados/Chart.js";
var gridJs = "https://jquery-datatables-editable.googlecode.com/svn/trunk/media/js/jquery.dataTables.min.js";
var listName = "Novo TimeCostService"; //Data List Name
var fieldEquipe = "Equipe"; //X-Axis Label Names from List
var fieldColaborador = "Author"; //Author
var fieldBaseCliente = "BASECLIENTE"; //Base Cliente
var fieldTempoGasto = "TempoGasto"; //TempoGasto
var idColaborador = "lstColaborador"; //Colaborador
var idEquipe = "lstEquipe";
var idBaseCliente = "lstBaseCliente";
var idResultado = "lstResultado";
var idVer = "lstVer";
var idChart = "Grafico"; //Chart Canvas Div
var idGRID = "GRID"; //Grid Canvas Div
var pInd = -1; //Posicao do Indice
var clientContext;
var oList;
var camlQuery;
//Variaveis associadas ao desenho do chart
var Registro = [];
var Valor = [];
var BaseCliente = [];
//Carrega Load de Form
Load();
//alert("fim");
//Faz carga dos Arquivos
function Load()
{
//alert("CarregaSP()");
SP.SOD.executeOrDelayUntilScriptLoaded( function ()
{
CarregaSP(SP);
clientContext.executeQueryAsync(function ()
{
cctxload(collListItem);
CarregaChart(); //Carrega Chart
}, null);
},'SP.js');
//loadchart();
//CarregaChart();
//alert("Fim Load()");
}
function MontaListagem()
{
Valor.length = 0;
Registro.length = 0;
//processa dados
for(var contador=0;contador<Dataset.length;contador++)
{
var valor = Dataset[contador][2];
//var BaseCliente = Dataset[contador][3]["$4B_1"];
//Mostra os colaboradores ou Empresas
var item;
var flgitem;
//Mostra os colaboradores
if(document.getElementById(idVer).selectedIndex==0)
{
item = Dataset[contador][1]["$4B_1"];
flgitem = PertenceLista(item,idColaborador);
}
else
{
item = Dataset[contador][3]["$4B_1"];
flgitem = PertenceLista(item,idBaseCliente);
}
if(flgitem==true) //Pertence a listagem de elementos Date lista
{
//verifica se tem o elemento em lstEquipe
var Posicao = VerificaVetor(Registro,item)
if (Posicao==-1)
{
//Insere o Registro
Registro.push(item);
if(document.getElementById(idResultado).selectedIndex == 0)
{
Valor.push(1);
}
else
{
Valor.push(valor);
}
} else
{
if(document.getElementById(idResultado).selectedIndex == 0) {
//Apenas incrementa valor
Valor[Posicao]++;
} else {
//Apenas incrementa valor
Valor[Posicao]=Valor[Posicao]+valor;
}
}
}
}
}
function CarregaChart()
{
//Monta listagem de dados
MontaListagem();
//Load Chart JS
loadJS(chartJs, function () {
//Generate Data
var data = {
//Mostra os colaboradores
labels: this.Registro,
datasets: [{data: this.Valor}]
};
//Display Chart
var ctx = document.getElementById(idChart).getContext("2d");
var myNewChart = new Chart(ctx).Bar(data);
});
//loadGrid(); //Carrega Grid
}
function MontaGRID(){
Valor.length = 0;
Registro.length = 0;
$('#GRID').empty();
$('#GRID').append('<thead><tr><th>Colaborador</th><th>Empresa</th><th>Tempo Gasto</th></tr></thead>');
//processa dados
for(var contador=0;contador<Dataset.length;contador++) {
var colaborador = Dataset[contador][1]["$4B_1"];
var Empresa = Dataset[contador][3]["$4B_1"];
var TempoGasto = Dataset[contador][2];
$('#GRID').append('<tr><td>'+colaborador+'</td>'+'<td>'+Empresa+'</td>'+'<td>'+TempoGasto+'</td></tr>');
}
}
function loadGrid(){
if($('#GRID').dataTable()==0) {
$('#GRID').dataTable().fnDestroy();
}
//Monta listagem de dados
MontaGRID();
//Gera GRID
$(document).ready(function() {
$('#GRID').dataTable({
'aaSorting': [[ 1, "desc" ]],
'bDestroy': true
});
} );
}
function loadJS(src, callback) {
var s = document.createElement('script');
s.src = src;
s.async = true;
s.onreadystatechange = s.onload = function () {
var state = s.readyState;
if (!callback.done && (!state || /loaded|complete/.test(state))) {
callback.done = true;
callback();
}
};
document.getElementsByTagName('head')[0].appendChild(s);
}
//Carrega Elementos da Equipe
function CarregaEquipe(Dataset){
document.getElementById(idEquipe).length =0; //reseta elementos Date lista
InsertItem(idEquipe, "Todos");
for(var contador=0;contador<Dataset.length;contador++) {
var item = Dataset[contador][0];
//verifica se tem o elemento em lstEquipe
if (testa_item(idEquipe,item)==false)
{
InsertItem(idEquipe, item);
}
}
}
//Carrega Elementos da Empresa
function CarregaEmpresa(Dataset){
document.getElementById(idBaseCliente).length =0; //reseta elementos Date lista
InsertItem(idBaseCliente, "Todos");
for(var contador=0;contador<Dataset.length;contador++) {
var item = Dataset[contador][3]["$4B_1"];
//verifica se tem o elemento em lstEquipe
if (testa_item(idBaseCliente,item)==false) {
InsertItem(idBaseCliente, item);
}
}
}
//Carrega Elementos da Equipe
function CarregaColaborador(Dataset,Equipe){
document.getElementById(idColaborador).length =0; //reseta elementos Date lista
limpa_item(idColaborador);
InsertItem(idColaborador, "Todos");
for(var contador=0;contador<Dataset.length;contador++) {
var item = Dataset[contador][1]["$4B_1"];
var regEquipe = Dataset[contador][0];
var flgcheck= false;
//verifica se tem o elemento em lstEquipe
if (Equipe=="Todos") {
flgcheck=true;
} else
{
if(Equipe==regEquipe) {
flgcheck=true;
}
}
if(flgcheck==true) {
//Verifica se nao esta na lista
if (testa_item(idColaborador,item)==false) {
InsertItem(idColaborador, item);
}
}
}
}
//CarregaSP
function CarregaSP(SP) {
//Carrega Informações da Conexao
clientContext = new SP.ClientContext.get_current();
//Carrega informações da Lista
oList = clientContext.get_web().get_lists().getByTitle(listName);
camlQuery = new SP.CamlQuery();
//alert("CarregaSP Passo1");
camlQuery.set_viewXml('<View>'+
'<GroupBy collapse="true">'+
'<FieldRef Name="Equipe" />'+
'</GroupBy>'+
'<OrderBy>'+
' <FieldRef Name="Equipe" />'+
'</OrderBy>'+
'</View>');
//alert("CarregaSP Passo2");
this.collListItem = oList.getItems(camlQuery);
//alert("CarregaSP Passo3");
clientContext.load(collListItem);
//alert("CarregaSP Passo2");
}
//Executa Query de forma assincrona
function cctxload(collListItem) {
var listItemEnumerator = collListItem.getEnumerator();
Dataset.length = 0; //Inicia listagem
//Create Points from ListData
while (listItemEnumerator.moveNext()) {
var oListItem = listItemEnumerator.get_current();
var record = new Array (oListItem.get_item(fieldEquipe),
oListItem.get_item(fieldColaborador),
oListItem.get_item(fieldTempoGasto),
oListItem.get_item(fieldBaseCliente));
Dataset.push(record);
}
//Carrega Empresas
CarregaEmpresa(Dataset);
//Carrega a lista de equipe
CarregaEquipe(Dataset); //Carrega Lista de Equipes
//Carrega a lista de equipe
CarregaColaborador(Dataset,"Todos"); //Carrega Lista de Equipes
}
//Carrega Informacao do Sharepoint
function Main(){
CarregaChart();
}
//Se Confirma operação executa ação
function Show_Confirm(msg){
if (confirm(msg)) {
return true;
} else {
return false;
}
}
//Mostra mensagem de alerta
function Show_Warning(msg){
alert("Atenção! "+msg);
}
//Mostra mensagem de alerta
function Show_Erro(msg){
alert("Erro! "+msg);
}
/*Função de mascara a data*/
function mascara_data(data, edit){
var mydata = '';
mydata = mydata + data;
if (mydata.length == 2) {
mydata = mydata + '/';
edit.value = mydata;
}
if (mydata.length == 5){
mydata = mydata + '/';
edit.value = mydata;
}
if (mydata.length == 10) {
verifica_data(edit);
}
}
/*Realiza a verificação da data*/
function verifica_data(edit) {
dia = (edit.value.substring(0,2));
mes = (edit.value.substring(3,5));
ano = (edit.value.substring(6,10));
bar_x = (edit.value.substring(2,3));
bar_y = (edit.value.substring(5,6));
bar_z = ( bar_x + bar_y ) ;
situacao = true;
if( edit.value != ""){
// verifica o dia valido para cada mes
if ((dia < 01)||(dia < 01 || dia > 30) && ( mes == 04 || mes == 06 || mes == 09 || mes == 11 ) || dia > 31) {
situacao = false;
}
// verifica se o mes e valido
if (mes < 01 || mes > 12 ) {
situacao = false;
}
// verifica se e ano bissexto
if (mes == 2 && ( dia < 01 || dia > 29 || ( dia > 28 && (parseInt(ano / 4) != ano / 4)))) {
situacao = false;
}
// verifica se as barras foram preenchida
if (bar_z != "//") {
situacao = false;
}
if (edit.value == "") {
situacao = false;
}
if (situacao == false) {
Show_Erro("Data Inválida! Formato da data: dd/mm/yyyy");
edit.focus();
}
}
return situacao;
}
/*Mascara hora*/
function mascara_hora(hora, edit){
var myhora = '';
myhora = myhora + hora;
if (myhora.length == 2){
myhora = myhora + ':';
edit.value = myhora;
}
if(myhora.length == 5){
verifica_hora(edit);
}
}
/*função de range numerico*/
function checa_range(edit,inicio,fim){
situacao = true;
if(Number(edit.value) == NaN) {
situacao = false;
alert('Valor não é um número');
edit.focus();
} else {
var Nro = Number(edit.value)
if((Nro < inicio) || (Nro > fim)){
situacao = false;
alert('Valor fora da faixa!');
edit.focus();
}
}
return situacao;
}
//onclick event controler
function onclickEvento(Controler, Label){
if (Controler==idColaborador) {
//alert("ok Colaborador");
Main();
}
if (Controler==idEquipe) {
//alert("ok Equipe");
//limpa_item(idColaborador);
CarregaColaborador(Dataset,Label)
}
}
//onchange event controler
function onchangeEvento(Controler){
var Label = document.getElementById(Controler)[document.getElementById(Controler).selectedIndex].text;
if (Controler==idColaborador) {
//alert("ok Colaborador");
}
if (Controler==idEquipe) {
//limpa_item(idColaborador);
CarregaColaborador(Dataset,Label)
}
}
/*Insere Elemento em uma lista de itens*/
function InsertItem(List, Item){
var x = document.getElementById(List);
var option = document.createElement("option");
//option.onclick=function(){onclickEvento(List,Item);};
x.onchange=function(){onchangeEvento(List,Item);};
option.text = Item;
x.add(option);
}
//Limpa um item selecionado do combobox
function limpa_item(List){
var combo = document.getElementById(List);
combo.options.length = 0;
}
//Testa item verificando se o mesmo ja existe
function testa_item(combo,item){
var boExiste = false;
var x = document.getElementById(combo);
for(ab=0;ab<x.options.length;ab++){
if(x.options[ab].text==item)
{
boExiste = true;
break;
}
}
return boExiste;
}
function VerificaVetor(Vetor,item){
var flgExiste = false;
for(contador=0; contador<Vetor.length;contador++) {
if(Vetor[contador]==item) {
flgExiste=true;
//Caso encontre sai imediatamente
break;
}
}
if(flgExiste==true) {
return contador;
} else {
return -1;
}
}
//Pesquisa a ocorrencia de um registro dentro da lista DOM
function PertenceLista(Registro,idItem){
var flgExist= false;
Lista = document.getElementById(idItem);
for(var contador=0;contador<Lista.length;contador++){
if(Lista.options[contador].value == Registro) {
flgExist = true;
break;
}
}
return flgExist;
}
</script>
Desenvolvimento de aplicações em C e C++ para Windows (MFC) e Linux.
Com 5 anos de experiencia em C, em especial em GCC.
São projetos que já desenvolvi:
Exemplos de código
Desenvolvimento de Socket Server em Linux
O objetivo destes scripts são de permitir interagir de forma facil e prática a partir do reconhecimento de movimento do programa do linux motion.
Os scripts são dois:
analisa_img.sh
Executa um script, permitindo a programação de outros comandos associados ao reconhecimento de imagem e/ou analise e filtragem da imagem capturada.
analisa_avi.sh
Executa um script, permitindo a progração de outros comandos associados a conversão para formato MP4, permitindo assim a visualização através do browser.
Este script pode ser modificado a medida de sua necessidade, peço apenas que no uso, envie um email para marcelomaurinmartins@gmail.com, informando a finalidade. Justamente para que eu veja os frutos de 3 dias de trabalho, realmente auxiliaram alguem em algum lugar do mundo
Complemento:
Para o perfeito funcionamento deste script é necessário instalar préviamente os seguintes pacotes:
ffmpeg – realiza a conversão do arquivo avi para mp4
sudo apt-get install ffmpeg
2. Copie a pasta analisa_img para o caminho indicado no passo 1
Entre na pasta; cd /projetos/sosconsulta/linux/analisa_img/
3. Rode o Makefile; make all
Este procedimento, irá instalar os scripts na pasta /usr/local/bin
4. Configure o arquivo motion.conf, editando em /etc/motion, vim motion.conf
Altere o arquivo, incluindo:
on_movie_end /usr/local/bin/analisa_avi.sh %f
caso tenha threads.conf, faça nas mesmas, se houver necessidade.
Git:
https://github.com/MarceloMaurin/motion_avi_mp4/blob/master/analisa_img/analisa_avi.sh
The purpose of these scripts is to allow easy and practical interaction from the motion recognition of the linux motion program.
analisa_img.sh
Performs a script, allowing programming of other commands associated with image recognition and / or analysis and filtering of the captured image.
analisa_avi.sh
It executes a script, allowing the programming of other commands associated with the conversion to MP4 format, thus allowing the visualization through the browser.
This script can be modified to suit your needs, just ask that in use, send an email to marcelomaurinmartins@gmail.com, stating the purpose. Just so I can see the fruits of 3 days of work, really helped someone somewhere in the world
Complement:
For the perfect operation of this script it is necessary to install the following packages:
ffmpeg – performs conversion from avi file to mp4
sudo apt-get install ffmpeg
1. You should create the folders / projects / sosconsulta / linux / I recommend changing the folder path, however it will be necessary to change the entire reference in the scripts.
2. Copy the analisa_img folder to the path indicated in step 1
Enter the folder; cd / projects / sosconsulta / linux / analisa_img /
3. Run the Makefile; make all
This will install the scripts in the / usr / local / bin folder
4. Configure the motion.conf file by editing in / etc / motion, vim motion.conf
Change the file, including:
on_movie_end /usr/local/bin/analisa_avi.sh% f
if it has threads.conf, do it on them, if need be.
Git:
https://github.com/MarceloMaurin/motion_avi_mp4/blob/master/analisa_img/analisa_avi.shThis entry was posted in Sem categoria. Bookmark the permalink.
Este exemplo didático permite visualizar as requisições de SMS, e enviar novos.
Banco de Dados: mysql 5
Servidor Banco: Linux Raspberry PI
Aplicação: X86
Linguagem: Delphi XE10
Tabela: jobs.sql
Fonte: src_clienteSMS2.zip
Binário: clientSMSAlpha1.zip
Nela o usuário pode selecionar a pesquisa de SMS, através do menu superior. Para tanto, basta clicar em SMS > Enviados.
Surgirá uma tela com Título JOBS.
Nela é possível verificar na área superior um campo telefone, este permite filtrar os telefones enviados por mensagem.
Para realizar a pesquisa, digite o telefone que pretende filtrar no campo telefone.
Click no botão Pesquisar, a aplicação pesquisará todos os SMSs que não foram enviados ainda com este telefone.
O Resultado da pesquisa aparecerá no grid inferior.
Para maiores informações mande um email: marcelomaurinmartins@gmail.com
Outros projetos relacionados:
Exemplo de Delphi XE10 consumindo REST ankara escort çankaya escort ankara escort çankaya escort escort ankara çankaya escort escort bayan çankaya istanbul rus escort eryaman escort escort bayan ankara ankara escort kızılay escort istanbul escort ankara escort ankara rus escort escort çankaya ankara escort bayan istanbul rus Escort atasehir Escort beylikduzu Escort Ankara Escort malatya Escort kuşadası Escort gaziantep Escort izmir Escort
Olá,
Iremos realizar agora a configuração do minidlna em um servidor Linux.
Bom para tanto, precisaremos das seguintes pré req:
Procedimentos de Instalação:
Media_dir – Cria um repositório de medias (vídeos, fotos, áudios), sendo v para vídeos, A para audio, P para fotos, e PV fotos e vídeos simultâneos.
Sintaxe:
media_dir=(A,P,V,PV),<path>
friendly_name – Cria um nome do servidor, que será apresentado em sua tv.
Sintaxe:
friendly_name=<nome do Servidor>
9. Crie as pastas no servidor que configurou em seu media_dir.
Para criar as pastas use o comando mkdir <path>
10. Atribua permissões para a pasta, como você esta como root, possivelmente seu servidor não irá enxergar.
Para tanto, execute na pasta anterior o seguinte comando:
chmod 755 -R <path>
Onde path é o caminho da sua pasta, exemplo /media/disk/Movies
11. Reinicie o serviço com service minidlna restart ou reboot o servidor
Seu serviço estará criado e não necessitará de nenhuma configuração adicional.
Segue um exemplo bem simples em R,
Criado para avaliar as notas , calculando média.
##Criado por Marcelo Maurin Martins
##Aplicação de Média
##19/02/2018
##Treinamento de Linguagem R#Criar um algoritmo em R que faça:
#1 – Cadastro de alunos (nome, e-mail, etc…, notas de provas)
#2 – Mostra os dados dos alunos cadastrados informando também os aprovados e reprovados.Nomes=c(“Marcelo”,”Fernanda”,”Camille”,”Roberta”,”Marcella”)
Nomes=as.character(Nomes)
Email=c(“marcelomaurinmartins@gmail.com”,”teste1@”,”teste2@”,”teste3@”,”teste4@”)
Email=as.character(Email)
Nota1=c(9,1.4,9,3,9)
Nota1=as.numeric(Nota1)
Nota2=c(9,2.4,9,2,8)
Nota2=as.numeric(Nota2)
Nota3=c(9,1.4,9,3,7)
Nota3=as.numeric(Nota3)
Nota4=c(9,3.4,9,4,6)
Nota4=as.numeric(Nota4)
Media=c(0,0,0,0,0)
Media=as.numeric(Media)#Monta o data frame
Notas=data.frame(Nomes,Email,Nota1,Nota2,Nota3,Nota4,Media)#Calcula a media
for(i in 1:length(Nomes))
{
print(Notas[i,1])
Notas[i,7]=(Notas[i,3]+Notas[i,4]+Notas[i,5]+Notas[i,6])/4
if(Notas[i,7]>=7)
{
print(“Aprovado”)
}
else
{
print(“Reprovado”)
}
}
Notas
Nomes Email
1 Marcelo marcelomaurinmartins@gmail.com
2 Fernanda teste1@
3 Camille teste2@
4 Roberta teste3@
5 Marcella teste4@
Nota1 Nota2 Nota3 Nota4 Media
1 9.0 9.0 9.0 9.0 9.00
2 1.4 2.4 1.4 3.4 2.15
3 9.0 9.0 9.0 9.0 9.00
4 3.0 2.0 3.0 4.0 3.00
5 9.0 8.0 7.0 6.0 7.50
[1] Marcelo
[1] “Aprovado”
[1] Fernanda
[1] “Reprovado”
[1] Camille
[1] “Aprovado”
[1] Roberta
[1] “Reprovado”
[1] Marcella
[1] “Aprovado”
Segue procedimento para instalação de Djando no Linux
Primeiramente verifique se possui o add-apt-repository , caso não possuir instale o seguinte pacote:
sudo add-apt-repository ppa:fkrull/deadsnakes
Adicione o python3.5, através do comando:
apt-get install python3.5
Em seguida, instale o virtualenv
apt-get install python-virtualenv
O próximo passo é criar uma pasta de trabalho, através do comando
mkdir <pasta>
Configure o virtualenv através do comando
virtualenv <pasta> -p python3.5
source venv/bin/activate
Instale agora o django, através do comando :
pip install django
Configure o django-admin, para a pasta que criou, através do comando:
django-admin startproject djangoecommerce .
Agora para rodar o servidor, basta digitar
./manage.py runserver 0.0.0.0:8000
O Procedimento a seguir foi extraído do seguinte artigo com variances:
http://db.rstudio.com/databases/my-sql/
Em Tools > Install Packages instale os seguintes pacotes:
Instale o ODBC e a lib do Mysql
Restart RStudio
Segue exemplo de conexão com Mysql ankara escort çankaya escort ankara escort çankaya escort escort ankara çankaya escort escort bayan çankaya istanbul rus escort eryaman escort escort bayan ankara ankara escort kızılay escort istanbul escort ankara escort ankara rus escort escort çankaya ankara escort bayan istanbul rus Escort atasehir Escort beylikduzu Escort Ankara Escort malatya Escort kuşadası Escort gaziantep Escort izmir Escort
#install.packages(“dbConnect”,type=”source”)
library(RMySQL)
library(dbConnect)con = dbConnect(MySQL(), user='<user>’, password='<password>’, dbname=’SMSdb’, host=’192.168.1.211′)
dbListTables(con)
#Create table in R from Mysql table
myQuery = “select * from jobs”str(df)
telefone= “16981434112”
my_d_query=paste(“select * from jobs where telefone = ‘”,telefone,”‘ “)
out_df= dbGetQuery(con,my_d_query)dbWriteTable(con,”out_df”,out_df, overwrite=TRUE, append=FALSE)
dbDisconnect(con)
Segue um exemplo prático de obtenção de dados do Banco Mysql usando R
#install.packages(“dbConnect”,type=”source”)
library(RMySQL)
library(dbConnect)con = dbConnect(MySQL(), user=’user’, password=’passwrd’, dbname=’SMSdb’, host=’192.168.1.211′)
dbListTables(con)
#Create table in R from Mysql table
myQuery = “select * from jobs”str(df)
telefone= “16981434112”
#my_d_query=paste(“select * from jobs where telefone = ‘”,telefone,”‘ “)
my_d_query=paste(“select * from jobs “)
out_df= dbGetQuery(con,my_d_query)dbWriteTable(con,”out_df”,out_df, overwrite=TRUE, append=FALSE)
dbDisconnect(con)