Recientemente, hubo un trabajo que involucraba correos electrónicos, que requería cargar archivos en una base de datos, luego leer los archivos de la base de datos y descargarlos.
Encontré información y la apliqué al proyecto.
La estructura de la base de datos es la siguiente:
USO[EOffice]
IR
/**//****** Objeto: Tabla [dbo].[Group_Files] Fecha del script: 20/07/2006 23:57:34 ******/
ESTABLECER ANSI_NULLS EN
IR
ESTABLECER QUOTED_IDENTIFIER EN
IR
ESTABLECER ANSI_PADDING EN
IR
CREAR TABLA [dbo].[Group_Files](
[ID] [int] IDENTIDAD(1,1) NO NULO,
[Nombre de archivo] [varchar](50) COLLATE Chinese_PRC_CI_AS NULL CONSTRAINT [DF_Group_Files_FileName] DEFAULT (''),
[Cuerpo de archivo] [imagen] NULO,
[Tipo de archivo] [varchar](50) COLLATE Chinese_PRC_CI_AS NULL CONSTRAINT [DF_Group_Files_FileType] DEFAULT (''),
RESTRICCIÓN [PK_Group_Files] CLAVE PRIMARIA AGRUPADA
(
[ID]ASC
)CON (IGNORE_DUP_KEY = APAGADO) EN [PRIMARIO]
) EN [PRIMARIO] TEXTIMAGE_ON [PRIMARIO]
IR
DESACTIVAR ANSI_PADDING
Luego escribí un procedimiento almacenado con el siguiente código:
USO[EOffice]
IR
/**//****** Objeto: StoredProcedure [dbo].[SendTo_Group_Email] Fecha del script: 20/07/2006 23:59:21 ******/
ESTABLECER ANSI_NULLS EN
IR
ESTABLECER QUOTED_IDENTIFIER EN
IR
Crear PROCEDIMIENTO [dbo].[SendTo_Group_Email]
(
@Título varchar(200),
@Contenido varchar(MAX),
@Área varchar(máx),
@Remitente varchar(50),
@Depto varchar(50),
@SendToUser varchar(50),
@NombreDeArchivo varchar(200),
Imagen @FileBody,
@FileType varchar(4)
)
AS
INSERT Group_Email (Título,[Contenido],Área,Enviar al usuario,Depto,Remitente,Nombre de archivo,Cuerpo de archivo,Tipo de archivo) VALORES (@Título,@Contenido,@Área,@Enviar al usuario,@Depto,@Remitente,@Nombre de archivo,@Cuerpo de archivo, @Tipo de archivo)
El código del programa es el siguiente:
Enviar correo electrónico.aspx
1<%@ Page Language="C#" AutoEventWireup="true" CodeFile="SendEmail.aspx.cs" Inherits="GroupWork_SendEmail" %>
2
3http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd ">
4
5http://www.w3.org/1999/xhtml " >
6
7
8
9
10cuerpo,td,th {
11 tamaño de fuente: 9 puntos;
12}
13cuerpo {
14 imagen de fondo: url();
15 colores de fondo: #F2F7FB;
16 margen izquierdo: 10px;
17 margen superior: 5px;
18 margen derecho: 10px;
19 margen inferior: 5px;
20}
21-->
22
23
24función Seleccionar_usuario_local (url)
25 k tenue
26 k=showModalDialog(url,","dialogWidth:485px;status:no;dialogHeight:280px")
27 si ubound(split(k," $#@&!"))>=0 entonces
28 document.form1.HiddenField1.value = dividir(k," $#@&!")(0 )
29 document.form1.txtLocalUser.value = split(k," $#@&!")(1 )
30 final si
31función final
32
33función Select_Remote_User(url)
34 k tenue
35 k=showModalDialog(url,","dialogWidth:485px;status:no;dialogHeight:310px")
36 si ubound(split(k," $#@&!"))>=0 entonces
37 document.form1.HiddenField2.value = dividir(k," $#@&!")(0 )
38 document.form1.txtRemoteUser.value=split(k," $#@&!")(1 )
39 final si
40función final
41
42
43
44