Insertar Filas en una Tabla MySql con Java Netbeans

 

Tener agregado a libraries el conector mysql para java.

import javax.swing.JOptionPane;

public class frmInsertar extends javax.swing.JFrame {

    coneBD cn=new coneBD();

    public frmInsertar() {

        initComponents();

    }

private void btnInsertarActionPerformed(java.awt.event.ActionEvent evt) {                int op=0;

    String sql="insert into productos values('"+txtBar.getText()+"','"+txtNom.getText()+"','"+txtPre.getText()+"','"+txtStock.getText()+"','"+txtImg.getText()+"');";

    try{

        cn.Conectar();

        cn.st=cn.conec.createStatement();

        int p=cn.st.executeUpdate(sql);

    }catch(Exception e){

        JOptionPane.showMessageDialog(null, e.toString());

        op=1;

    }

    if (op==0) {

        JOptionPane.showMessageDialog(null, "Registro Agregado");

    }

 }

private void txtBarActionPerformed(java.awt.event.ActionEvent evt) {                      JOptionPane.showMessageDialog(null, "Enter:"+txtBar.getText());

}

Clase de Conexion coneBD.java

import java.sql.*;

import javax.swing.JOptionPane;

public class coneBD {

    public static PreparedStatement prest=null;

    public static CallableStatement cllst=null;

    public static Connection conec=null;

    public static Statement st=null;

    public static ResultSet rt=null;

    public static String usu;

    public static String contra;

    public static String host;

    public static String db;

    public void Conectar(){

        try{

            usu="root"; contra=""; host="localhost"; db="ventas";

            String url="jdbc:mysql://"+host+"/"+db;

            Class.forName("com.mysql.jdbc.Driver").newInstance();

            conec=DriverManager.getConnection(url,usu,contra);

        }catch(Exception e){

            JOptionPane.showMessageDialog(null, e.toString());

        }

    }

}

download source code

minuvasoft10@gmail.com

 

Listar Registros de una Tabla MySql con Java Netbeans

Tener instalado la libreria mysql-connector-java-5.1.7-bin.jar

import javax.swing.JOptionPane;

import javax.swing.table.DefaultTableModel;

public class frmListar extends javax.swing.JFrame {

    coneBD cn=new coneBD();

    DefaultTableModel modelo=new DefaultTableModel();

    public frmListar() {

        initComponents();

        String titu[]={"IDCliente","Nombres","Apellidos","Direccion","Telefono","E-mail"};

        modelo.setColumnIdentifiers(titu);

        tblClientes.setModel(modelo);

    }

    private void llenarT() {

        String SQL="select * from clientes;";

        String datos[]=new String[6];

        try{

            cn.Conectar();

            cn.st=cn.conec.createStatement();

            cn.rt=cn.st.executeQuery(SQL);

            while (cn.rt.next()){

                datos[0]=cn.rt.getString(1);

                datos[1]=cn.rt.getString(2);

                datos[2]=cn.rt.getString(3);

                datos[3]=cn.rt.getString(4);

                datos[4]=cn.rt.getString(5);

                datos[5]=cn.rt.getString(6);

                modelo.addRow(datos);

            }

        }catch(Exception e){

            JOptionPane.showMessageDialog(null, e.toString());

        }

    private void btnListarActionPerformed(java.awt.event.ActionEvent evt) {                                          

        llenarT();

    }

    } 

Clase de Coneccion a base de datos, coneBD.java

import java.sql.*;

import javax.swing.JOptionPane;

public class coneBD {

    public static PreparedStatement prest=null;

    public static CallableStatement cllst=null;

    public static Connection conec=null;

    public static Statement st=null;

    public static ResultSet rt=null;

    public static String usu;

    public static String contra;

    public static String host;

    public static String db;

    public void Conectar(){

        try{

            usu="root"; contra=""; host="localhost"; db="ventas";

            String url="jdbc:mysql://"+host+"/"+db;

            Class.forName("com.mysql.jdbc.Driver").newInstance();

            conec=DriverManager.getConnection(url,usu,contra);

        }catch(Exception e){

            JOptionPane.showMessageDialog(null, e.toString());

        }

    }

}

minuvasoft10@gmail.com

download source code

Hallar las Raices de Una Funcion de Grado N con Geogebra

 Entrar a geogebra.org

Click en Iniciar Calculadora

Digitar la funcion a la izquierda como muestra la imagen

Click en los puntos de intercepcion con eje X, se muestra la raiz.

Para la funcion e^x -2x-2 las raices son: -0.768 y 1.678

Buscar por Codigo de Barras en Excel con VB .Net 2022

Tabla Excel

Imports Microsoft.Office.Interop

Public Class frmGrid3

Dim Aplicacion As Excel.Application

Dim Libro As Excel.Workbook

Dim hoja As Excel.Worksheet

Private Sub frmGrid3_Load(sender As Object, e As EventArgs) Handles MyBase.Load

        cargarLibro()

End Sub

Private Sub cargarLibro()

    DataGridView1.ColumnCount = 3

    DataGridView1.Columns(0).Name = "Bar Code"

    DataGridView1.Columns(1).Name = "Producto"

    DataGridView1.Columns(2).Name = "Precio"

    DataGridView1.Columns(1).Width = 200

    Aplicacion = New Excel.Application

    Libro = Aplicacion.Workbooks.Open("C:\Users\miky mouse\OneDrive\ejemplo5.xlsx")

    hoja = Libro.Worksheets(2)

End Sub

Private Sub frmGrid3_Closed(sender As Object, e As EventArgs) Handles MyBase.Closed

        Libro.Close()

        Aplicacion.Quit()

End Sub

Private Sub TextBox1_KeyDown(sender As Object, e As KeyEventArgs) Handles TextBox1.KeyDown

        Dim bc As String

        Dim dato(3) As String

        If e.KeyCode = 13 Then

            bc = TextBox1.Text

            For i = 2 To 23

                If bc = hoja.Cells(i, 1).Value Then

                    dato(0) = hoja.Cells(i, 1).value

                    dato(1) = hoja.Cells(i, 2).value

                    dato(2) = hoja.Cells(i, 3).value

                    DataGridView1.Rows.Add(dato)

                End If

            Next

            MsgBox("enter " + bc)

        End If

    End Sub

End Class

minuvaSoft10@gmail.com

download source code

Leer y Agregar en Excel con Visual Basic .Net 2022

Imports Microsoft.Office.Interop.Excel

Private Sub LeerExcel()

    Dim Aplicacion As Excel.Application

    Dim Libro As Excel.Workbook

    Dim hoja As Excel.Worksheet

    Dim cad As String

    Aplicacion = New Excel.Application

    Libro = Aplicacion.Workbooks.Open("C:\Users\miky mouse\OneDrive\ejemplo3.xlsx")

    hoja = Libro.Worksheets(1)

    cad = hoja.Cells(3, 5).Value   ' Lee de hoja 1 fila 3 y columna5

    MsgBox("dato=" + cad)

    hoja.Cells(8, 1).value = "9876.65"   'Agrega en hoja 1 el dato, en fila 8 y columna 1

    Libro.Close()

    Aplicacion.Quit()

End Sub

DataGridView Agregar Obtener Eliminar Filas con Visual Basic 2022

Public Class frmGrid

    Private Sub frmGrid_Load(sender As Object, e As EventArgs) Handles MyBase.Load

        carga()

    End Sub

    Private Sub carga()

        DataGridView1.ColumnCount = 4

        DataGridView1.Columns(0).Name = "Marca"

        DataGridView1.Columns(1).Name = "Modelo"

        DataGridView1.Columns(2).Name = "Year"

        DataGridView1.Columns(3).Name = "MSRP"

        Dim dato(4) As String

        dato(0) = "Toyota"

        dato(1) = "Prius"

        dato(2) = "2020"

        dato(3) = "18000"

        DataGridView1.Rows.Add(dato)

        dato(0) = "Toyota"

        dato(1) = "RAV 4"

        dato(2) = "2019"

        dato(3) = "19000"

        DataGridView1.Rows.Add(dato)

        dato(0) = "Toyota"

        dato(1) = "HighLander"

        dato(2) = "2018"

        dato(3) = "19555"

        DataGridView1.Rows.Add(dato)

        dato(0) = "Dodge"

        dato(1) = "Charger"

        dato(2) = "2017"

        dato(3) = "18555"

        DataGridView1.Rows.Add(dato)

    End Sub

    Private Sub btnObtener_Click(sender As Object, e As EventArgs) Handles btnObtener.Click

        txtPrecio.Text = DataGridView1.Item(3, 2).Value

    End Sub

    Private Sub btnFila_Click(sender As Object, e As EventArgs) Handles btnFila.Click

        Dim cad As String

        cad = DataGridView1.SelectedRows(0).Cells(0).Value + DataGridView1.SelectedRows(0).Cells(1).Value

        cad += DataGridView1.SelectedRows(0).Cells(2).Value + DataGridView1.SelectedRows(0).Cells(3).Value

        txtPrecio.Text = cad

    End Sub

Private Sub btnEliminar_Click(sender As Object, e As EventArgs) Handles btnEliminar.Click

        DataGridView1.Rows.RemoveAt(2)

    End Sub

End Class

Graficar Funcion Cuadratica Ingresando Coheficientes con Matplotlib y Python

import tkinter as tk

from tkinter import ttk

from matplotlib.backends.backend_tkagg import FigureCanvasTkAgg

from matplotlib.figure import Figure

import numpy as np

def graf():

    fig = Figure(figsize=(5, 4), dpi=100)

    t = np.arange(-3, 3, .01)

   

    a = eval(entry1.get())

    b = eval(entry2.get())

    c = eval(entry3.get())

   

    fig.add_gridspec(True)

    fig.add_subplot(111).plot(t, a*t**2+b*t+c,'o:g')

   

    canvas = FigureCanvasTkAgg(fig, master=root)

    canvas.draw()

    canvas.get_tk_widget().pack(side=tk.TOP, fill=tk.BOTH, expand=1)

if __name__ == '__main__':

    # Ventana principal

    root = tk.Tk()

    root.title("Graficar Funcion")

    root.geometry("700x700")    

   

    # Coheficiente 1

    dato1=tk.StringVar()

    entry1=ttk.Entry(root, textvariable=dato1, width=5)

    entry1.place(x=5, y=5)

    lblCo1 = tk.Label(root,text="X^2 +")

    lblCo1.place(x=45,y=5)

    # Coheficiente 2

    dato2=tk.StringVar()

    entry2=ttk.Entry(root, textvariable=dato2, width=5)

    entry2.place(x=100, y=5)

    lblCo2 = tk.Label(root,text="X +")

    lblCo2.place(x=150,y=5)

    # Coheficiente 3

    dato3=tk.StringVar()

    entry3=ttk.Entry(root, textvariable=dato3, width=5)

    entry3.place(x=200, y=5)

   

    # Boton

    button = tk.Button(root, text="Graficar", command=graf)

   

    button.pack()

    # Iniciar el bucle principal de la aplicación

    root.mainloop()

download source code