ย้ายไปเขียนที่ fayjaa.blogspot.com

brush for photoshop , fayjaa, ทำเว็บ, asp.net

วรรณกรรมสมัยเด็กที่เพิ่งประทับใจ..หนอนนวล ~ เส้นทางแห่งความหมาย เมษายน 5, 2009

ในเช้าของวันทำงาน วันธรรมดาๆ วันหนึ่ง

 

เกิดนึกถึงนิทานสมัยเด็ก เรื่องหนึ่ง

 

เรื่องเกี่ยวกับหนอนที่พยามไต่ขึ้นไปบนภูเขาหนอน

 

เป็นหนังสือที่อ่านสมัยประถม นานมาก

 

มานึกตอนนี้ว่า หนังสือเด็กทำไมมันลึกซึ้งจัง

 

ก็นึกได้เพียงแค่นี้ หลังจากนั้นพอถึงที่ทำงานจึงรีบค้นหาเรื่องราวของหนังสือเล่มนั้น

 

และแล้ว..ก็เจอจนได้ และก็ได้รู้ว่ามีหลายคนที่เคยอ่านตอนเด็กๆ แล้วประทับใจเหมือนๆกัน

 

 non9

 

หนอนนวล เป็นหนอนที่ ไม่รู้ว่าตนเองเกิดมาเพื่ออะไร

 

จึงได้ค้นหาความหมายของชีวิต เลือกที่จะไต่ขึ้นไปบนภูเขาหนอน เหยียบย่ำกันเพื่อไปให้ถึงบนภูเขาสูงสุด

 

หรือเลือกที่จะเป็นดักแด้ เพื่อจะกลายเป็นผีเสื้อแสนสวย ที่มีอิสระเสรี

 

non6

 

ตอนเป็นเด็กก็ไม่ค่อยเข้าใจนิทานเล่มนี้ซักเท่าไหร่

 

แต่ตอนนี้ เข้าใจมันดีแล้ว .. หนอนนวลเปรียบเหมือนกับชีวิตคนเรานั่นเอง

 

ที่ใช้ชีวิตเหมือนคนอื่นๆ ทำงาน ทำงานเพื่อจะได้มีตำแหน่งที่ดีๆ

 

non11

 

เหมือนกันกับที่หนอนไต่ขึ้นไปบนภูเขาหนอน

 

ต้องเหยียบย่ำเพื่อนหนอนด้วยกัน เพื่อให้ตนเองได้ขึ้นไปอยู่ข้างบนสุด บางตัวตกลงมา แล้วก็พยายามขึ้นไปใหม่ เป็นแบบนี้เรื่อยไป..

 

 แต่บางคนเลือกใช้ชีวิตในแบบที่ตัวเองเลือก ซึ่งอาจไม่เหมือนใคร

 

เช่นหนอนนวลที่เลือกเสื่ยงเป็นดักแด้ เพื่อจะได้กลายเป็นผีเสื้อที่มีอิสระ..

 

แล้วเราเองล่ะ จะเลือกเป็นแบบใหน

 

เส้นทางแห่งความหมาย

เส้นทางแห่งความหมาย

 

หนังสือเล่มนี้ ชื่อว่า เส้นทางแห่งความหมาย

ทรินา เพาลัส : เขียน – ปิยะลักษณ์ ภมรสิงห์ : แปลและเรียบเรียง – เบญจมาศ เพ็ชรพราย : วาดภาพประกอบ

 

รู้สึกว่าเขียนตอนเราเกิดพอดี แค่นี้ก็รู้ว่าเก่าแค่ใหน คัดลอกคำพูดของผู้เขียนมาด้วย –>

 

“ด้วยข้าพเจ้ามีความเชื่อว่า มนุษย์ทุกคนมีคุณค่า ความดีงามอยู่ในตัวเอง และปรารถนาสร้างความดีงาม ให้ปรากฏแก่มวลมนุษย์และสังคม การบรรลุถึง ความดีงามได้นั้น มนุษย์จะต้อง ทำความรู้จัก หรือทำความเข้าใจตัวเองเสียก่อน หมายถึงการพิจารณา สิ่งถูกสิ่งผิดขึ้นภายในตัวเอง การรู้จักพัฒนาศักยภาพของตัวเอง และกล้าหาญ ที่จะยอมรับความเป็นจริง ที่เกิดขึ้นกับตัวเอง ข้าพเจ้าปรารถนา ที่จะสื่อสาร ความเชื่อเช่นนี้ โดยผ่านหนังสือ “เส้นทางแห่งความหมาย” การสื่อสารนั้นข้าพเจ้าเลือกความเรียบง่าย ด้วยความตั้งใจ ให้เหมือนกับว่า ข้าพเจ้าและผู้อ่าน กำลังนั่งคุยกันฉันท์เพื่อนมากกว่า หากการสื่อสารครั้งนี้ได้ช่วยให้ผู้อ่าน ได้หยุด และหันกลับมาทบทวนตัวเอง ข้าพเจ้ารู้สึกยินดี และขอยกย่อง ในคุณค่าที่ท่าน มอบให้กับตัวเอง”

ปิยะลักษณ์ ภมรสิงห์ ตุลาคม ๒๕๒๖

 

non10

 

ขอขอบคุณภาพจาก

http://mblog.manager.co.th/xanax71/th-53167/

สำหรับใครที่อยากค้นหาความหมายของชีวิต

http://wechange.seubsan.net/Joomla/index.php/we-article/hope-from-flower?start=10

 และขอขอบคุณเจ้าของบ้านคนเก่า ครูใจ อินยา ที่เหลือหนังสือดีๆ ไว้ให้เด็กคนหนึ่งได้อ่าน

 

มะเมียะ กุมภาพันธ์ 15, 2009

วันอาทิตย์ วันหยุด หลังจากนั่งทำงานเสร็จ

ก็เข้า internet อ่านข่าวคลายเครียดซะหน่อย พอดีไปเจอข่าวที่ว่า ” ตอกย้ำ “ตำนานรักอมตะ” ที่หลายคนมิอาจลืมเลือน

เป็นเรื่องราวความรักของคู่รักในอดีต

ซึ่งมีเรื่องราวของ มะเมี๊ยะ ด้วย

เรื่องเล่าของมะเมียะ เป็นเรื่องที่ชอบมากเรื่องหนึ่ง เวลาเจอหนังสือที่เกี่ยวกับมะเมี๊ยะมักจะ  ไม่อ่านไม่ได้เลย

จะเป็นเรื่องจริง หรือเป็นแค่เรื่องที่เอามาโยงกันให้เป็นเรื่องจริง จะยังไงก็ยังชอบ

เป็นเรื่องที่ขลังดี และคนในเรื่องก็มีชีวิตจริงๆ ไม่ได้แต่งขึ้นมา เช่นเจ้าชายน้อยศุขเกษม , เจ้าหญิงบัวชุม ณ เชียงใหม่

ซึ่งได้ไปเจอรูปมา


รูปแรก เจ้าชายน้อยศุขเกษม คนรักของมะเมี๊ยะ (เพิ่งเห็นครั้งแรก หล่อไม่เบา)

k4992226-2

รูปที่สอง เจ้าชายน้อยศุขเกษมกับเจ้าหญิงบัวชุม ณ เชียงใหม่

k4992226-41

ถึงแม้ไม่มีรูปของมะเมี๊ยะ แต่ก็พร้อมเชื่อว่ามะเมี๊ยะมีชีวิตในช่วงนั้นจริงๆ

เพราะเป็นคนชอบเรื่องราวชีวิต และความเป็นอยู่ของคนสมัยก่อน

(อิทธิพลมาจากแม่ ชอบเล่าเรื่องเก่าๆ ให้ฟัง)

ชอบดูคุ้มเจ้าพระราชชายาเจ้าดารารัศมี ที่แม่ริม

ถ้าใครชอบแนวนี้ละก็ ขอแนะนำให้ไปเที่ยวที่คุ้ม เพราะที่นั่นเป็นที่อยู่จริงๆ ของท่าน

มีรูป มีของใช้ประจำวัน จัดวางไว้ในคุ้มนั้นเยอะไปหมด

เข้าไปแล้วขนลุกเลยค่ะ ไม่ได้เป็นเพราะเจอผีนะ

เป็นเพราะอะไร?อธิบายไม่ถูกเหมือนกัน  คนชอบเหมือนกันคงรู้ดีเนอะ..

tam

 

ดูหนังเรื่อง คนไฟลุก กุมภาพันธ์ 1, 2009

Filed under: คนไฟลุก movie — fayjaa @ 12:24 pm

เมื่อวานดูหนัง “คนไฟลุก” หนังไทยที่ตั๊ก บงกช เป็นคนแสดงนำ

ตอนเริ่มดู ไม่ได้หวังว่าเรื่องนี้จะสนุก จะดี เพราะเป็นหนังของคนไทย (อคติส่วนตัว ที่ไม่ค่อยชอบดูหนังจีน กับหนังไทย)

ซึ่งก็ไม่ได้ดูว่าใครเป็นคนกำกับ ใครเป็นผู้สร้างหนัง

แต่ดูเสร็จ ก็รู้สึกว่าหนังเรื่องนี้ทำดีนะ  ก็โอเคค่ะ(ดูตอนอารมณ์เฉยๆ เซ็งๆ)

ที่ชอบอีกอย่างก็คือ หนังทำให้ ปรากฏการณ์ไฟลุก เป็นเหตุการณ์ที่เกิดมาจากวิทยาศาสตร์

ถึงแม้บางตอนจะทำให้คนดูคิดว่า ตั๊กบงกช เป็นคนทำไฟลุกรึเปล่า แต่สุดท้ายก็เฉลยว่าเป็นเพราะวิทยาศาสต์(ตัวยาที่ทำให้ไฟลุก)

เหมือนกับบอกเราว่า เวลาอะไรเกิดขึ้น ให้นึกถึงหลักวิทยาศาสตร์ก่อน

อย่าเพิ่งไปกระโตกกระตากว่าเป็นเพราะ ผี หรือพระเจ้า หรืออะไรอีกมากมาย

ข้อคิดอีกอย่างก็คือ ตัวเอก คือตั๊กบงกช เป็นผู้หญิงทำงานเก่ง แต่ไม่ดูแลแม่

ทำให้แม่ไม่สบาย หายากินเอง จนต้องไปกินยาที่ทำให้เกิดไฟลุกตายในที่สุด

 

หนัง คนไฟลุก

หนัง คนไฟลุก

 

อันนี้โดนเต็มๆ ที่ไม่อยู่ดูแลแม่ที่บ้าน เลยรู้สึกสะอึก จนทำให้เอาไปฝัน ว่าพาพ่อกับแม่ไปเที่ยวดูยานอวกาศ

แล้วยานนั้นเกิดมีมนุษย์อวกาศบุกเข้ามาในโลก ตัวเราเลยต้องปกป้องพ่อกับแม่

ด้วยการใช้ไม้แหลมๆ ทิ่มหน้าอกเวลาที่มนุษย์อวกาศพุ่งมาจะทำร้ายพ่อกับแม่ (- – ” ) 

แล้วตอนสุดท้ายก็พูดกับพ่อแม่ว่า กลับบ้านเรานะ อยู่ที่นู่นปลอดภัยกว่า ….

ตื่นขึ้นมา เศร้าใจ อยากกลับบ้าน …

 

แม่เป็ดตัวน้��ยๆ พาลูกขี่หลังว่ายน้ำ

แม่เป็ดตัวน้อยๆ พาลูกขี่หลังว่ายน้ำ

… รูปนี้น่ารัก ได้ใจ …
ปล. ใหนว่าตั๊ก บงกชแสดงหนังไม่ดี ก็แสดงดีอยู่นี่คะ แต่เสียงง๊องแง๊งไปหน่อยเท่านั้นเอง
 

หยุดบ้า asp.net ซักพัก ใกล้กลับบ้านแล้วสิเรา ธันวาคม 18, 2008

ใกล้สิ้นปี ก็จะถึงเวลาที่กลับไปเยี่ยมบ้าน

บ้านอยู่ใหนหรอ ?? … อยู่ปายค่ะ

ปาย ที่ตอนนี้ คนเค้ากำลังฮิตไปเที่ยวกัน

ซักสามสี่ปีที่แล้วคนไทยยังไม่ค่อยจะรู้จักกันซักเท่าไหร่

..พลังของหนัง(..รักจัง..) มันช่างยิ่งใหญ่จริงๆ ทำให้คนรู้จักกันมากขนาดนี้

(ฉะนั้นคนทำหนัง ก็นึกถึงเยาวชนมั่งนะคะ อย่าสร้างแต่พวกที่มี  “แม่ง ไอ้เหี้ย สัตว์”

ดูแล้วเซ็ง)

มันก็อาจจะดี ที่คนไปเที่ยวกัน

แต่ .. พอนึกถึงตอนกลับบ้านปีที่แล้ว (- -’) มันช่างวุ่นวายอะไรปานนั้น ไม่ชอบเลย

ปีใหม่ ปีที่แล้ว ก็เข้าใจว่ามันเป็นวันปีใหม่ วันเฉลิมฉลองอะไรซักอย่าง

แต่ว่า  ฉลองกันจนตีสามตีสี่ เปิดเพลงดังทั่วอำเภอ เสียงดังมาก คนที่เปิดน่าจะเป็นพวกรีสอร์ทที่เอาใจนักท่องเที่ยว เพราะเพลงที่เปิดค่อนข้างจะแนวๆ หน่อย

จนแม่พูดออกมาว่า

…”บ้านป้อมันก้าา เปิดเพลงหาต๋ายหยังเสียงดัง …( บ้านพ่อมันรึไง เปิดเพลงเสียงดัง) ” …

แม่ค่อนข้างโหดๆ หน่อย

ถ้าเที่ยว ก็นึกถึงชาวบ้านเค้าบ้าง

รณรงค์.. เที่ยวปาย อย่างสงบ ค่ะ

mypai2

 

เมื่อต้องดึงข้อมูลสมาชิก มาแก้ไข (รวมทิปการใช้ control ต่างๆ) พฤศจิกายน 30, 2008

ส่วนใหญ่ทำในโค๊ด behind..

1. ดึงข้อมูลแต่ละคอลัมน์ได้ด้วยคำสั่ง (code behind)

text1.text = CStr(dt.Rows(0).Item(“name_eng”).ToString)


2. ดึงข้อมูลมาแสดงใน dropdownlist

ในหน้า html

<asp:DropDownList ID=”ddlTitleNameTH” runat=”server” AutoPostBack=”True”>
</asp:DropDownList>

ใน code behind

‘ สร้างตัวแปร nTH รับค่าจากฐานข้อมูล

‘แล้วเพิ่มตัวเลือกใน dropdownlist ให้ครบ ด้วยคำสั่ง .Items.Add(New ListItem(“นาง”, “นาง”).ToString)

‘ ให้ dropdownlist เลือกค่าที่เท่ากับที่ดึงมาจากฐานข้อมูล ออกมาแสดง

Dim nTh As String = Trim(CStr(dt.Rows(0).Item(“title_name_thai”).ToString))
ddlTitleNameTH.Items.Add(New ListItem(“นาย”, “นาย”).ToString)
ddlTitleNameTH.Items.Add(New ListItem(“นาง”, “นาง”).ToString)
ddlTitleNameTH.Items.Add(New ListItem(“นางสาว”, “นางสาว”).ToString)
ddlTitleNameTH.SelectedIndex = ddlTitleNameTH.Items.IndexOf(ddlTitleNameTH.Items.FindByValue(nTh))

thank
http://www.velocityreviews.com/forums/t89868-dropdownlist-default-selected.html

3. ดึงข้อมูลจากฐานข้อมูลมาแสดงใน radiobutton

If Trim(CStr(dt.Rows(0).Item(“sex”).ToString)) = “ชาย” Then
radiMale.Checked = True
radiFemale.Checked = False
ElseIf Trim(CStr(dt.Rows(0).Item(“sex”).ToString)) = “หญิง” Then
radiMale.Checked = False
radiFemale.Checked = True
End If

 

ดึงข้อมูลด้วย gridview แล้วคลิกลิงค์ เปิด popup พร้อมแสดงข้อมูล (popup ไม่ใช้ window.open แต่ใช้ CSS) พฤศจิกายน 27, 2008

css popup แสดงข้�มูลที่ดึงมา

css popup แสดงข้อมูลที่ดึงมา

1. สไตล์ pop up เอาไปใส่ในไฟล์ .css

.white_content {
display: none;
position: absolute;
top: 25%;
left: 25%;
width: 300px;
height: 50%;
padding: 16px;
z-index:1002;
overflow: auto;
background-color:#FFBFBF;
border-bottom: 2px solid #F9F9F9;
border-right: 2px solid #F9F9F9;
border-left:1px solid #EFE4E4;
border-top:1px solid #EFE4E4;
}

2. ลิงค์ไฟล์ .css เข้ามาใช้ในไฟล์ xxx.aspx

<link href=”../App_Themes/themeForm/themeForm.css” rel=”stylesheet” type=”text/css” />

3. ในไฟล์ xxx.aspx ให้ดึงข้อมูลมาไว้ใน gridview(อย่าลืมใส่ DataKeyNames) โค๊ดดังนี้

<asp:GridView ID=”GridView1″ runat=”server” DataKeyNames=”member_id”
AutoGenerateColumns=”False”>
<Columns>


<asp:BoundField DataField=”member_id” HeaderText=”รหัส”>
<ItemStyle Width=”100px” />
</asp:BoundField>


<asp:BoundField DataField=”first_name” HeaderText=”ชื่อ”>
<ItemStyle Width=”100px” />
</asp:BoundField>

<asp:TemplateField>
<ItemTemplate>

<a href=”javascript:void(0);” onclick=”showpop( ‘<%# DataBinder.Eval(Container.DataItem,”last_name”).tostring%>’);”>click</a>
</ItemTemplate>
</asp:TemplateField>
</Columns>
</asp:GridView>

4. สร้าง div ไว้ระหว่าง <form></form> เอาไว้นอก GridView โค๊ดดังนี้

<div id=”light” class=”white_content”>
<span id=”showw”></span>
<br />
<a href = “javascript:void(0)” onclick = “hidepop()”>Close</a>
</div>

5. สร้าง javascript ไว้ระหว่าง <head></head> โค๊ดดังนี้

<script language=”javascript” type=”text/javascript”>
function showpop(showw){
document.getElementById(’showw’).innerHTML=showw;
document.getElementById(‘light’).style.display=’block’;

}

function hidepop(){
document.getElementById(‘light’).style.display=’none’;

}
</script>

ส่งค่าที่ต้องการแสดง ผ่าน javascript โดยให้แสดงผ่าน <span id=”showw”></span>

จบ…

ขอขอบคุณ
http://www.emanueleferonato.com/2007/08/22/create-a-lightbox-effect-only-with-css-no-javascript-needed/

 

tips เกี่ยวกับการใช้ DataList พฤศจิกายน 25, 2008

1. แสดงค่าในแต่ละ field แบบเจาะจง

ในหน้า xxx.aspx สามารถใส่แบบนี้ได้

<asp:DataList ID=”DataList1″ runat=”server” GridLines=”horizontal” BorderWidth=”0px”>
<ItemTemplate>
<div style=”border:0px;”>
ตำแหน่ง :<%#DataBinder.Eval(Container.DataItem, “positions”)%>
<br />
สาขา : <%#DataBinder.Eval(Container.DataItem, “branch”)%>
<br />
เขต : <%#DataBinder.Eval(Container.DataItem, “zone”)%>
</div>
</ItemTemplate>
<SelectedItemStyle BorderWidth=”0px” />
<ItemStyle BorderWidth=”0px” />
</asp:DataList>

 

ใส่ detail view ใน gridview พฤศจิกายน 25, 2008

DetailsView �ยู่ใน Gridview

DetailsView อยู่ใน Gridview

ลองทดสอบเอา detail view มาใส่ใน gridview ทำตาม cd สอน

บางคำสั่งก็ใช้ได้บางอันก็ใช้ไม่ได้เหมือนใน cd (อาจจะเกิดจากการมั่วไปมั่วมา)

แล้วในที่สุดก็ได้… แต่พี่ที่ทำงานเค้าต้องการอีกแบบ

คือที่ gridview ปกติจะแสดง รายละเอียดออกมานิดหน่อย

แต่เมื่อเรา้คลิกที่รายละเอียดของแถวนั้น ให้แสดงรายละเอียดทั้งหมดทุกตัวอักษร

ให้แสดงออกมาในแถวนั้นๆ อืมม งงแฮะ

แต่ที่ลองทำนี้ต้อง select ตั้งสองครั้ง

แต่ก็พอใช้ได้ ถูๆ ไถๆ ตามอัถภาพ – -”


บันทึกวิธีทำ

1. ทำหน้า xxx.aspx มา

2. ลาก gridview มา

3. ให้ AutoGenerateColumns=”False”

4. กำหนด DataKeyNames=”member_id”

5. ใน <column></column> ให้ใส่คอลัมน์ของเราเข้าไป เช่น

<asp:BoundField DataField=”member_id” SortExpression=”member_id” headertext=”id” >
</asp:BoundField>

โค๊ดหน้า xxx.aspx ทั้งหมดก็มีโค๊ดดังนี้

<form id=”form1″ runat=”server”>
<asp:Label ID=”lbl1″ runat=”server”></asp:Label>
<asp:GridView ID=”GridView1″ runat=”server” BackColor=”White”
BorderColor=”#CCCCCC” BorderStyle=”None” BorderWidth=”1px” CellPadding=”3″
AutoGenerateColumns=”False” Width=”195px” DataKeyNames=”member_id”>
<RowStyle ForeColor=”#000066″ />
<FooterStyle BackColor=”White” ForeColor=”#000066″ />
<PagerStyle BackColor=”White” ForeColor=”#000066″ HorizontalAlign=”Left” />
<SelectedRowStyle BackColor=”#669999″ Font-Bold=”True” ForeColor=”White” />
<HeaderStyle BackColor=”#006699″ Font-Bold=”True” ForeColor=”White” />
<Columns>
<asp:BoundField DataField=”member_id” SortExpression=”member_id” headertext=”id” >
<HeaderStyle HorizontalAlign=”Left” />
</asp:BoundField>
<asp:BoundField DataField=”first_name” SortExpression=”first_name” headertext=”ชื่อ” >
<HeaderStyle HorizontalAlign=”Left” />
</asp:BoundField>
<asp:BoundField DataField=”last_name” SortExpression=”last_name” headertext=”รายละเอียด” >
<HeaderStyle HorizontalAlign=”Left” />
</asp:BoundField>
<asp:CommandField ShowEditButton=”True” />
<asp:CommandField ShowSelectButton=”True” />
<asp:CommandField ShowDeleteButton=”True” />

</Columns>
</asp:GridView>
<asp:DetailsView ID=”DetailsView1″ runat=”server” Height=”50px” Width=”125px”
AutoGenerateRows=”False”>
</asp:DetailsView>
</form>

6. ในหน้า xxx.aspx.vb มีโค๊ดทั้งหมดดังนี้

Option Explicit On
Option Strict On
Imports System.Data
Imports System.Data.SqlClient

Partial Class showEmp_showsub
Inherits System.Web.UI.Page

Public Enum XCol
detailcol = 2
productid
categoryid
unitprice
unitsinstock
amount
discontinued

End Enum

Private Sub ProductsData(Optional ByVal productname As String = “”)
Dim strsql As String = “select * from tblMembers”
Dim dt As New DataTable
Dim conn1 As New SqlConnection(ConfigurationManager.ConnectionStrings(“connintranet”).ConnectionString)
Dim da As New SqlDataAdapter(strsql, conn1)
da.Fill(dt)
dt.Columns.Add(“รหัส”, GetType(Integer), “member_id”)

GridView1.DataSource = dt.DefaultView

MyGridBind()
End Sub


Private Sub MyGridBind()
Dim X1() As String = {“member_id”}
GridView1.DataKeyNames = X1
GridView1.DataBind()
End Sub

Protected Sub GridView1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles GridView1.Load
If Not Page.IsPostBack Then
Me.ProductsData()
Me.MyGridBind()
Else
If Session(“data”) Is Nothing Then
Me.ProductsData()
Else
GridView1.DataSource = Session(“data”)
End If
End If

End Sub

Protected Sub GridView1_PageIndexChanging(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewPageEventArgs) Handles GridView1.PageIndexChanging
GridView1.PageIndex = e.NewPageIndex
Response.Write(“ddddddddd”)
Me.MyGridBind()

End Sub

Protected Sub GridView1_SelectedIndexChanging(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewSelectEventArgs) Handles GridView1.SelectedIndexChanging

Dim a1 As DataKey = GridView1.DataKeys(e.NewSelectedIndex)

‘lbl1.Text = CStr(a1(0))
Dim strsql2 As String = “select * from tblMembers where member_id=” & CInt(a1(0))
Dim dt2 As New DataTable
Dim conn2 As New SqlConnection(ConfigurationManager.ConnectionStrings(“connintranet”).ConnectionString)
Dim da2 As New SqlDataAdapter(strsql2, conn2)
da2.Fill(dt2)

DetailsView1.DataSource = dt2
DetailsView1.DataBind()
GridView1.Rows(e.NewSelectedIndex).Cells(XCol.detailcol).Controls.Add(DetailsView1)

End Sub
End Class


ปล.

- ในซัพโพซิเยอร์ Enum XCol นั้นยังงงอยู่ว่าใช้ทำอะไรกันแน่ ถ้าเอาไว้อ้างคอลัมน์ ทำไมต้องประกาศออกมาเยอะแยะ (เพราะไม่ได้ทำตามขั้นตอนตั้งแต่แผ่นแรก)

- ข้องใจกับการ connect database จากที่เคยเขียน php พี่ๆ เค้ามักบอกว่าถ้าเราเปิด connect ไว้โดยไม่ต้องปิด จะทำให้เว็บเร็วเพราะการที่เปิดประตูไว้ เมื่อคนจะเข้าจะออกก็ไม่ต้องเสียเวลาปิดประตู(ปิด connect) แต่เท่าที่เห็น asp.net เน้นการ ปิด connect แล้วตกลงอันใหนดีกว่ากันล่ะ ???

เครียด �ยากเปลี่ยนทรงผม

เครียด อยากเปลี่ยนทรงผม

ช่วงนี้เครียดๆ เลยอยากเปลี่ยนทรงผม เห็นในอินเตอร์เน็ตทรงเก๋กู๊ดกันทั้งนั้น

เลยตัดหน้าตัวเองใส่หัวคนอื่นซะเลย สวยเช้ง

แต่เพื่อนทักว่า แก่…

หมดอารมณ์ที่จะรีทัชต่อ

เซ็งเป็ด (- -”)( -*-) ไปไกลๆ เลยไป๊


 

tip การใช้ gridview ใน asp.net พฤศจิกายน 24, 2008

1. ถ้าจะให้ delete ได้จะต้องใส่ DeleteCommand (ใน control sqlDataSource มีทูลช่วย) และต้องใส่ DataKeyNames ตัวอย่างเช่น

<asp:GridView ID=”GridView1″ CssClass=”tblForm1″ runat=”server” AutoGenerateColumns=”False” DataSourceID=”SqlDataSource1″ AllowPaging=”True” BackColor=”LightGoldenrodYellow” BorderColor=”Tan” BorderWidth=”1px” CellPadding=”2″ ForeColor=”Black” GridLines=”None” BorderStyle=”Dotted” PageSize=”20″ Width=”699px” DataKeyNames=”empid”>

ใส่ในหน้า code behide ก็ได้(สำหรับหน้าที่รับค่ามา)

SqlDataSource1.DeleteCommand = “DELETE FROM tblEmployee WHERE [empid] = @empid”
SqlDataSource1.SelectCommand = “SELECT empid, name_thai, sname_thai, name_eng, sname_eng, positions, branch, zone, FileData1 FROM tblEmployee”
SqlDataSource1.UpdateCommand = “UPDATE tblEmployee SET name_thai = @name_thai, sname_thai = @sname_thai WHERE (empid = @empid)”


2. วิธีการทำปุ่ม ยืนยัน (Javascript confirm) เมื่อต้องการลบข้อมูลใน gridview

เิพิ่ม CommandField ชนิด delete มาก่อน แล้วดูใน source code จะเห็นเป็น

<asp:CommandField  ShowDeleteButton=”True” DeleteText=”ลบ” />

แต่รูปแบบนี้จะใส่ javascript ไม่ได้ จึงต้องไป edit ใช้คำสั่ง convert this field into a template

ซึ่งจะทำให้ source code เราเปลี่ยนไป แล้วจึงจะใส่โค๊ดที่ทำไฮไลไว้ ดังนี้

<ItemTemplate>
<asp:LinkButton ID=”LinkButton1″ runat=”server” CausesValidation=”False” CommandName=”Delete” Text=”ลบ” OnClientClick=”return confirm(‘Delete’);” ></asp:LinkButton>

</ItemTemplate>
</asp:TemplateField>

ต้�งทำแบบนี้ก่�น

ต้องทำแบบนี้ก่อน

เครดิต http://www.greatfriends.biz/webboards/msg.asp?b=SURREALIST&id=63505 ความคิดเห็นREPLY #12 (63634) คุณ jnithi


3. การทำลิงค์ แล้วส่งค่า id ไปกับลิงค์ ใน gridview

<asp:HyperLinkField DataNavigateUrlFields=”empid” DataNavigateUrlFormatString=”editEmpBasic.aspx?empid={0}” Text=”แก้ไข” />

4. การ หาผลรวม summary ในส่วน footer ของ gridview ต้องใส่โค๊ด หลังจาก gridview.databind() เส็รจแล้ว

โดยต้องเปิด showfooter = true  ก่อน

Private Sub summa()
Dim sum1 As Integer = CType(dt.Compute(“sum(empid)”, “”), Integer)
Dim sum2 As Integer = CType(dt.Compute(“sum(bdate)”, “”), Integer)
GridView1.FooterRow.Cells(0).Text = sum1.ToString(“#0.00″)
GridView1.FooterRow.Cells(1).Text = sum2.ToString(“#0.00″)
End Sub

 

บันทึก asp.net :: select ค่า max(id) และเช็ค IsDBNull พฤศจิกายน 22, 2008

asp.net มันไม่มี autonumber เหมือนกับใน php

ทำให้เวลาเพิ่มข้อมูลใหม่ ค่า id จะต้องเพิ่มขึ้นอีก 1

ก็นึกได้แต่วิธีบ้านๆ ด้วยการ select max ออกมา แล้วบวก 1

คิดว่ามันน่าจะมีคำสั่งอื่นที่สะดวกกว่านี้นะ

1. ประกาศตัวแปร

Public con As New SqlConnection(ConfigurationManager.ConnectionStrings(“intranetConnectionString2″).ConnectionString)
Public maxid As Integer
Public Shared msgerror As Boolean = False

2. เมื่อเพจโหลด

Dim cm_maxid As New SqlCommand(“SELECT MAX(empid)FROM tblEmployee”, con)
con.Open()


If IsDBNull(cm_maxid.ExecuteScalar()) Then
maxid = 1000
Else
maxid = CInt(cm_maxid.ExecuteScalar()) + 1
End If


con.Close()

ปล.ต้องใช้คำสั่ง IsDBNull เพื่อเช็คผลของการ select ไม่งั้น error

3. เมื่อคลิกปุ่ม submit เพื่อบันทึก

Dim ch_maxid As Integer = maxid
Dim name_th As String = txtNameTh.Text

Dim cm_addmember As New SqlCommand(“INSERT INTO tblEmployee(empid,name_thai,sname_thai,name_eng,sname_eng) VALUES(” & maxid & “,’” & txtNameTh.Text & “‘,’” & txtSnameTh.Text & “‘,’” & txtNameEng.Text & “‘,’” & txtSnameEng.Text & “‘)”, con)


con.Open()
Dim m_identity As Integer = 0
cm_addmember.ExecuteNonQuery()
con.Close()


If msgerror = False Then
Response.Write(“เพิ่มข้อมูลแล้วค่ะ”)
Response.AddHeader(“Refresh”, “5″)
End If