Login
...or Sign up
Home
Search
Search Code Snippets
Search People
Search
Code Snippets
People
4 Code Snippets found matching SQL Server
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
SELECT * FROM Information_Schema.Tables WHERE Table_Name LIKE '% %'
Search Table SQL Server
Uploaded on
6/5/2007 6:19:16 AM
Programming Language:
SQL
By:
Carlos
See more code snippets of
Carlos
SQL Server
SELECT * FROM Information_schema.columns WHERE Table_Name Like '%%' AND Column_Name LIKE '%%'
Search Column in a SQL Server Table
Uploaded on
6/5/2007 6:22:23 AM
Programming Language:
SQL
By:
Carlos
See more code snippets of
Carlos
SQL Server
<% Class Clientes '--------------------------------------------------------------------------------------- ' This Class Encapsulates a Clientes object and its methods '--------------------------------------------------------------------------------------- Dim glngID, gstrNOMBRE, gstrAPELLIDOS, gmemDIRECCION, gstrLOCALIDAD, gstrCP, gstrPROVINCIA, gstrPAIS, gstrTELEFONO, glngANHO_NACIMIENTO Public Property Get ID ID=glngID End Property Public Property Let ID(valor) glngID=valor End Property Public Property Get NOMBRE NOMBRE=gstrNOMBRE End Property Public Property Let NOMBRE(valor) gstrNOMBRE=valor End Property Public Property Get APELLIDOS APELLIDOS=gstrAPELLIDOS End Property Public Property Let APELLIDOS(valor) gstrAPELLIDOS=valor End Property Public Property Get DIRECCION DIRECCION=gmemDIRECCION End Property Public Property Let DIRECCION(valor) gmemDIRECCION=valor End Property Public Property Get LOCALIDAD LOCALIDAD=gstrLOCALIDAD End Property Public Property Let LOCALIDAD(valor) gstrLOCALIDAD=valor End Property Public Property Get CP CP=gstrCP End Property Public Property Let CP(valor) gstrCP=valor End Property Public Property Get PROVINCIA PROVINCIA=gstrPROVINCIA End Property Public Property Let PROVINCIA(valor) gstrPROVINCIA=valor End Property Public Property Get PAIS PAIS=gstrPAIS End Property Public Property Let PAIS(valor) gstrPAIS=valor End Property Public Property Get TELEFONO TELEFONO=gstrTELEFONO End Property Public Property Let TELEFONO(valor) gstrTELEFONO=valor End Property Public Property Get ANHO_NACIMIENTO ANHO_NACIMIENTO=glngANHO_NACIMIENTO End Property Public Property Let ANHO_NACIMIENTO(valor) glngANHO_NACIMIENTO=valor End Property '*************************************************************************************** ' Load '*************************************************************************************** Public Sub Load(lngID) Dim strSQL, objRS, objData strSQL = "SELECT * FROM usuarios WHERE ID = "& lngID Set objData = New DALayer objData.ConnectionString = Trim("clientes") Set objRS = objData.RetrieveRS(strSQL) With objRS If Not .EOF Then .MoveFirst With Me .ID = objRS("ID") .NOMBRE = objRS("NOMBRE") .APELLIDOS = objRS("APELLIDOS") .DIRECCION = objRS("DIRECCION") .LOCALIDAD = objRS("LOCALIDAD") .CP = objRS("CP") .PROVINCIA = objRS("PROVINCIA") .PAIS = objRS("PAIS") .TELEFONO = objRS("TELEFONO") .ANHO_NACIMIENTO = objRS("ANHO_NACIMIENTO") End With End If End With If IsObject(objData) Then Set objData = Nothing If IsObject(objRS) Then Set objRS = Nothing End Sub '*************************************************************************************** ' Save '*************************************************************************************** Public Sub Save() Dim strSQL, objRS, objData Set objRS = Server.CreateObject("adodb.recordset") ConnectionString = Trim("clientes") objRS.Open "usuarios", ConnectionString, 2, 3 objRS.AddNew 'objRs("ID").value = Me.ID objRs("NOMBRE").value = Me.NOMBRE objRs("APELLIDOS").value = Me.APELLIDOS objRs("DIRECCION").value = Me.DIRECCION objRs("LOCALIDAD").value = Me.LOCALIDAD objRs("CP").value = Me.CP objRs("PROVINCIA").value = Me.PROVINCIA objRs("PAIS").value = Me.PAIS objRs("TELEFONO").value = Me.TELEFONO objRs("ANHO_NACIMIENTO").value = Me.ANHO_NACIMIENTO objRS.Update If IsObject(objData) Then Set objData = Nothing If IsObject(objRS) Then Set objRS = Nothing End Sub End Class %>
Generador de clases en ASP
Uploaded on
3/14/2008 4:41:40 AM
Programming Language:
ASP
By:
retebenito
See more code snippets of
retebenito
asp
clase asp
clases
generador clases
generador de código
1
Help
Help by email
What is Naslu?
|
About Naslu
|
Contact
|
Terms of Use
|
Downloads
|
Webprogramacion.com
|
Blog
|
Top
Links
Select language:
Español
|
English
© 2009 naslu.com