Home      Search

Dim imagen, miniatura As Image Dim datosBlob() As Byte datosBlob = CType(dataset_imagen.Tables(0).Rows(e.Item.ItemIndex)("campo_blob_que_contiene_la_imagen"), Byte()) Dim imagenmemoria As MemoryStream imagenmemoria = New MemoryStream(datosBlob) imagen = Image.FromStream(imagenmemoria) Dim nuevoAlto As Integer Dim nuevoAncho As Integer If imagen.Height > imagen.Width Then nuevoAlto = 80 nuevoAncho = (imagen.Width * 80) / imagen.Height Else nuevoAncho = 80 nuevoAlto = (imagen.Height * 80) / imagen.Width End If miniatura = New Bitmap(nuevoAncho, nuevoAlto, imagen.PixelFormat) Dim grafico As Graphics = Graphics.FromImage(miniatura) grafico.CompositingQuality = Drawing2D.CompositingQuality.HighQuality grafico.InterpolationMode = Drawing2D.InterpolationMode.HighQualityBicubic Dim rectangulo As Rectangle rectangulo = New Rectangle(0, 0, nuevoAncho, nuevoAlto) grafico.DrawImage(imagen, rectangulo) miniatura.Save(path_en_disco, Imaging.ImageFormat.Jpeg)	Almacenar una imagen en disco procedente de una base de datos Uploaded on  4/28/2007 12:00:00 AM Programming Language: Visual Basic .NET By: vela See more code snippets of vela .net  visual basic
Dim cn As MySqlConnection cn = New MySqlConnection("Data Source=servidor;Database=base_de_datos;User ID=usuario; Password=clave; Allow Zero Datetime=True; CHARSET=latin1") cn.Open() Dim cm As MySqlCommand cm = New MySqlCommand("DELETE FROM personas WHERE idpersona=?idpersona") cm.Parameters.Add("?idpersona", MySqlDbType.Int32) cm.Parameters("?idpersona").Value = txtIdPersona.Text cm.Connection = cn cm.ExecuteNonQuery() cn.Close()	Eliminar una fila de una base de datos MySql Uploaded on  4/29/2007 12:00:00 AM Programming Language: visual basic .net By: vela See more code snippets of vela .net  ado.net  visual basic
using MySql.Data.MySqlClient; MySqlConnection conexion = new MySqlConnection(); conexion.ConnectionString = "Server=Servidor;Database=Nombre_de_la_base_de_datos; Uid=Nombre_de_usuario;Pwd=contraseña;"; conexion.Open();	Cadena de conexión para trabajar en .NET con MySql Uploaded on  4/29/2007 12:00:00 AM Programming Language: c# By: vela See more code snippets of vela .net  c#  mysql
Dim cn as MySqlConnection Dim cm As MySqlCommand Dim x As Integer cn = New MySqlConnection("Data Source=servidor;Database=base_de_datos;User ID=usuario; Password=clave; Allow Zero Datetime=True; CHARSET=latin1"); cn.open() cm = New MySqlCommand("SELECT * FROM tabla WHERE ...") cm.Connection = cn x = cm.ExecuteScalar() MessageBox.Show(x.ToString())	Realizar una consulta SQL mediante un comando utilizando el método ExecuteScalar() Uploaded on  4/29/2007 12:00:00 AM Programming Language: visual basic .net By: vela See more code snippets of vela .net  visual basic .net
<?php function Conectarse() //funcion que realiza la conexion con la base de datos. { if (!($link=mysql_connect("localhost","user","password"))) { echo "Error conectando a la base de datos."; exit(); } if (!mysql_select_db("bd_name",$link)) { echo "Error seleccionando la base de datos."; exit(); } return $link; } $link=Conectarse(); mysql_close($link); //cierra la conexion ?>	Conexion a una base de datos MySql en PHP Uploaded on  5/11/2007 12:00:00 AM Programming Language: PHP By: rosele See more code snippets of rosele base de datos  conexion  mysql  php
1 2