Excuse me sir, Are you saved? (선생님, 구원받으셨습니까?)

If you died tonight, Are you going to heaven? (당신이 만약 오늘 밤 죽는다면, 천국에 갈 수 있습니까?)

For God so loved the world that he gave his one and only Son, that whoever believes in him shall not perish but have eternal life. (하나님이 세상을 이처럼 사랑하사 독생자를 주셨으니 이는 그를 믿는 자마다 멸망하지 않고 영생을 얻게 하려 하심이라)

-John 3:16 (요한복음 3장 16절)

분류 전체보기 (178)
Embeded (3)
.NET (13)
DB (6)
Javascript (0)
Visual Studio (0)
Project (7)
Experience (0)
General (13)
Car (0)
Story (12)
YBC (4)
Book (6)
Movie (1)
구 MiniHomepy (109)
Visitors up to today!
Today hit, Yesterday hit
daisy rss
'분류 전체보기'에 해당되는 글 178건
2009. 5. 26. 14:40

아래 폴더의 내용을 모두 지우고 다시 해보세요.^^

C:\Documents and Settings\Administrator 나 자기계정\VSWebCache
2009. 5. 26. 14:39

### 1.리스트 뷰에서 (detail형식) 에서 아이템 삽입방법 .서브아이템


Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click



listview.Clear()

listview.Columns.Add("품명", 155, HorizontalAlignment.Center)
listview.Columns.Add("제조사", 140, HorizontalAlignment.Center)
listview.Columns.Add("규격", 110, HorizontalAlignment.Center)
listview.Columns.Add("code", 0, HorizontalAlignment.Center)


Dim sqlQuery As String
Dim wheresql As String


If txt_search.Text.Trim <> "" Then
wheresql = " AND dbo_TB_A005.name like '%" + txt_search.Text + "%'"
End If


sqlQuery = "SELECT "
sqlQuery += "dbo_TB_A005.CODE "
sqlQuery += ", dbo_TB_A005.name "
sqlQuery += ", dbo_TB_A005.MODEL "
sqlQuery += ", dbo_TB_A005.STD1 "
sqlQuery += ", dbo_TB_A005.STD2 "
sqlQuery += ", dbo_TB_A005.A004_CODE "
'sqlQuery += ", dbo_TB_A004.COMPANY A004NAME "
sqlQuery += ", dbo_TB_A004.COMPANY "
sqlQuery += "from "
sqlQuery += "TB_A005 dbo_TB_A005 "
sqlQuery += ", TB_A004 dbo_TB_A004 "
sqlQuery += " where dbo_TB_A005.A004_CODE = dbo_TB_A004.CODE"
sqlQuery += wheresql



Dim rs As SqlDataReader
Dim cmd As SqlCommand
Dim temp As String

cmd = New SqlCommand(sqlQuery, Dbconn)
rs = cmd.ExecuteReader()

While (rs.Read())

Dim lvItem As New ListViewItem
Dim lvSubItem As New ListViewItem.ListViewSubItem

lvItem.Text = rs("name")

lvSubItem.Text = rs("COMPANY")
lvItem.SubItems.Add(rs("COMPANY"))

If IsDBNull(rs("STD1")) Then
lvSubItem.Text = " "
lvItem.SubItems.Add(" ")
Else
lvSubItem.Text = rs("STD1")
lvItem.SubItems.Add(rs("STD1"))

End If

lvSubItem.Text = rs("CODE")
lvItem.SubItems.Add(rs("CODE"))


listview.Items.Add(lvItem)

End While


rs.Close()
cmd = Nothing
rs = Nothing

End Sub

### 2. 선택한 그 줄의 아이템 내용 가져오기.


Private Sub listview_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles listview.SelectedIndexChanged

Dim item As ListViewItem

For Each item In Me.listview.SelectedItems

PUB_A005_NAME = listview.SelectedItems.Item(0).Text
PUB_A005_CODE = listview.SelectedItems.Item(0).SubItems(3).Text
'MsgBox("PUB_A005_NAME:" & PUB_A005_NAME & " PUB_A005_code:" & PUB_A005_CODE)
Next



End Sub
2009. 5. 26. 14:39

select *
from dbo.TB_detail_result
where LEFT(CONVERT(varchar, entry_date, 126), 10)
= LEFT(CONVERT(varchar, GETDATE(), 126), 10)
2009. 5. 26. 14:39

속성중에 RepeatLayout="Flow" 추가!!!

'구 MiniHomepy > Experience' 카테고리의 다른 글

날짜검색 쿼리(날짜는 substring안되므로)  (0) 2009.05.26
asp.net에서 딴 페이지로 post submit  (0) 2009.05.26
메일보내기  (0) 2009.05.26
2009. 5. 26. 14:38

Server.Transfer("MonthExamMark.aspx");
2009. 5. 26. 14:37

#region 메일보내기[EasyMail]
public static void SencCDOMail(string strFrom, string strTo, string strSubject, string strBody)
{

// string strLicense = "abcd (Unlimited Developer)/A0C86200120615006940";
//
// EASYMAILSMTPLib.EasyMailSMTPObj objSMTP;
// objSMTP = new EASYMAILSMTPLib.EasyMailSMTPObj();
//
// objSMTP.LicenseKey = strLicense;
// objSMTP.MailServer = ConfigurationSettings.AppSettings["SmtpServer"];
// objSMTP.CharSet ="euc-kr";
// objSMTP.BodyFormat = 1;
// objSMTP.From = "EasyMail";
// objSMTP.FromAddr = strFrom;
// objSMTP.AddRecipient ("", strTo, 1);
// objSMTP.Subject = strSubject;
// objSMTP.BodyText = strBody;
//
// int x = objSMTP.Send();


CDO.MessageClass msg = new CDO.MessageClass();
CDO.ConfigurationClass conf = new CDO.ConfigurationClass();
ADODB.Fields Flds = conf.Fields;
Flds[CDO.CdoConfiguration.cdoSendUsingMethod].Value = ConfigurationSettings.AppSettings["SendUsingMethod"];
Flds[CDO.CdoConfiguration.cdoSMTPServer].Value = ConfigurationSettings.AppSettings["SmtpServer"];
Flds[CDO.CdoConfiguration.cdoSendUserName].Value = ConfigurationSettings.AppSettings["sendUserName"];
Flds[CDO.CdoConfiguration.cdoSendPassword].Value = ConfigurationSettings.AppSettings["sendPassword"];

Flds[CDO.CdoConfiguration.cdoSMTPAuthenticate].Value=1;//보내는메일인증


Flds.Update();

msg.Sender = ConfigurationSettings.AppSettings["Sender"];

msg.Configuration = (CDO.Configuration)conf;
msg.From = strFrom; //보내는 사람
msg.To = strTo; //받는 사람
msg.Subject = strSubject; //제목
msg.HTMLBody = strBody;



//파일 첨부(제가 만든 클래스의 속성입니다.collection)
// foreach(object an in email.AttachFiles)
// {
// //an = 파일전체 경로
// msg.AddAttachment(an.ToString(),"","");
// }

msg.Send();

Flds = null;
conf = null;
msg = null;
}
#endregion
2009. 5. 26. 14:35

string script ;

Type cstype = this.GetType();
Page.ClientScript.RegisterStartupScript(cstype, "NO", script);

'구 MiniHomepy > Experience' 카테고리의 다른 글

asp.net에서 딴 페이지로 post submit  (0) 2009.05.26
메일보내기  (0) 2009.05.26
iframe 안의 파일에서 iframe 밖의 파일 제어  (0) 2009.05.26
2009. 5. 26. 14:32

스크립트로 갱신 하시는 거라면

reload시
parent.location.reload(true)

페이지 이동시
parent.location.href='/Main.aspx'

요렇게 해주시면 될꺼 같습니다.