http://www.dev2you.com Life is coding Mon, 26 Jul 2010 08:10:39 +0000 http://backend.userland.com/rss092 en ไม่ได้ update มาชาติกว่า งานยุ่งมาก ตอนนี้มี project ใหม่กำลังจะทำเว็บ seo หาเงินเหมือนชาวบ้านบ้าง ซึ่งก็คลอดเป็นเว็บออกมาแล้ว euro 2012 on sale แต่ยังติดปัญหาอยู่ที่ว่ายังดึงราคาสินค้ามา compare ไม่ได้ ตอนแรกใช้งานได้อยู่ แต่พอแก้ไปแก้มาก็ตารางหายเลย Toshiba 15LV505 free shipping http://www.dev2you.com/euro2012onsale-com-seo-project/ Good bye michael http://www.dev2you.com/spiritualized-lay-it-down-slow-prison-break-finale-song/ พอดีแบบว่ามีงานนอกต้องหาเลี้ยงปากท้อง และต้องทำด้วย php ผมเลยหัดใช้ AJAX และมาหัดใช้ prototype เพราะเห็นชื่อเสียงดี ตอนแรกลังเลใจระหว่าง jQuery กับ prototype แต่ว่าพอดีเห็นพี่สุดหล่อผม พี่นพ www.nop.in.th แกใช้ prototype ฉะนั้น เลยเป็นการดีสำหรับผมที่จะเลือก prototype เผื่อเวลาติดปัญหาอะไรก็จะได้ถามแกได้ ฮ่าๆๆ ไม่เสียเวลาดี หลังจากที่ผมเลือก prototype แล้วผมก็ดั้นด้นเองเพื่อหาตัว validate form ดีๆ มาใช้ ก็ปรากฏว่าไปเจอกับเจ้า really easy field validation (ใช่ชื่อมันมั้ยนะ ?) หน้าหลักเค้าอยู่ที่ http://tetlaw.id.au/view/javascript/really-easy-field-validation ส่วนหน้า demo online ลองทดสอบได้ที่ http://tetlaw.id.au/upload/pages/really-easy-field-validation/ โดยที่หน้า demo ลอง view source code ดูตัวอย่างการเขียนได้นะครับ เช่น textbox เราจะบังคับให้ User ... http://www.dev2you.com/validate-form-by-prototype/ เนื่องด้วยผมหา Code ให้ Grid ไป Focus Row ที่ผมต้องการเหมือนอย่าง Delphi ไม่ได้ (ภาษาถนัดนะนั่น) สงสัยเพราะผมยังใช้ Google ไม่เก่งพอ เลยหาวิธีการไม่เจอ ดังนั้นผมเลยใช้วิธีแบบบ้านๆ ที่ผมมั่วเอาเองแบบนี้ครับ Dim intDB_RowIndex As Integer intDB_RowIndex = CustomersBindingSource.Find("CUS_CODE", txtCustomerCode.Text) If intDB_RowIndex > -1 Then dgView.ClearSelection() dgView.Rows(intDB_RowIndex).Selected = True End If เพียงเท่านี้ Grid ของเราก็จะไป Focus ที่ Row นั้นแล้วครับ โดยที่ถ้ามันค้นหาไม่เจอ Function Find จะ ... http://www.dev2you.com/vbnet-set-focus-in-datagridview-for-a-specified-row/ ปัญหานี้จะเกิดกับ Application ที่ใช้วิธีการติดตั้งแบบ Click Once ครับ โดยถ้าพบ Error มีข้อความประมาณว่า Unable to install or run the application. The application requires that assembly stdole Version 7.0.3300.0 be installed in the Global Assembly Cache (GAC) first. Please contact your system administrator. ให้ลองไป Include พวก Reference File ตามรูปด้านล่างนี้นะดูนะครับ รูป Error ให้เข้าไปที่ Project Properties >> Tab ชื่อ Public >> ปุ่ม ... http://www.dev2you.com/clickonce-requires-that-assembly-xxx-be-installed-in-the-gac/ วันก่อนผมใช้ VB.Net เจอ Error ที่ว่า "The transaction has already been implicitly or explicitly committed or aborted" วิธีแก้ปัญหาของผมคือ ไปตรวจดูว่า MS DTC ถูกเปิดแล้วหรือยัง แล้วก็ไปดู Firewall ด้วย http://www.dev2you.com/68/ ถ้าเราต้องการ Run Transaction บน Linked Server นั้นจะต้องมีการ Setup กันตัว Server MSSql ที่เรา Remote เข้าไปเล็กน้อยครับ ไม่งั้นจะเกิด Error 1. ถ้า Error เกี่ยวข้องกับ XACT_ABORT เราก็แค่เปิดมันครับ ด้วยคำสั่ง SET XACT_ABORT ON 2. แต่ถ้าเป็น Error ด้านล่าง แสดงว่าเครื่องปลายทางยังไม่ได้เปิด MSDTC หรือปิดการ Run จากผ่าน Network The operation could not be performed because the OLE DB provider 'SQLOLEDB' was unable to begin a ... http://www.dev2you.com/distributed-transaction-against-a-linked-server/ หากเราต้องการทำงานบน MS SQL โดยข้าม Server กันนั้นจะต้องมีการ Add Linked Server กันก่อนโดยใช้วิธีตามด้านล่างนี้นะครับ use Master EXEC sp_addlinkedserver @server = servername , @provider = 'MSDASQL', @provstr = 'DRIVER={SQL Server};SERVER=servername;UID=user;PWD=password;' หลังจากนั้น ก็รัน SP เพื่อ ปรับ Config Data Access EXEC sp_serveroption 'SERVER_IP', 'data access', 'TRUE' ถ้าไม่รันคำสั่งนี้ จะขึ้น Error อันนี้ servername is not configured for DATA ACCESS. เท่านี้เราก็สามารถเรียก Table ของ MSSQL ข้าม Server ได้แล้ว เช่นถ้าต้องการเรียก Table ABC บน ... http://www.dev2you.com/mssql-add-linked-server/ [caption id="attachment_34" align="alignnone" width="155" caption="QR-Code"][/caption] ไม่มีอะไรครับ แค่อยากเอามาใส่เว็บเฉยๆ แต่ถ้าอยากรู้ว่ามันหมายถึงอะไรก็ไปตาม link ด้านล่างนี้ครับ [caption id="" align="alignnone" width="217" caption="QR Reader"][/caption] http://www.dev2you.com/qr-code/ คำสั่งด้านล่างนี้เอาไว้สำหรับ Clear ค่าใน Object Type ต่างๆ ที่วางอยู่ใน GroupBox ครับ เช่น TextBox, RadioButton, ComboBox, NumericUpDown ถ้าอยากเพิ่มอีก ก็เพิ่มได้เลยครับดูจากตัวอย่างน่าจะพอเข้าใจ แล้วก็ค่าที่ Sub Program นี้รับมาจะเป็น GroupBox ครับ ถ้าเราอยากรับเป็นอย่างอื่นอะไรก็เปลี่ยนตามใจครับ Private Sub ClearForm(ByRef oGroupBx As GroupBox) Dim i, intTemp As Integer intTemp = oGroupBx.Controls.Count For i = 0 To intTemp - 1 With oGroupBx.Controls 'TextBox If .Item(i).GetType() Is GetType(TextBox) Then With CType(.Item(i), TextBox) .Clear() End With End If 'RadioButton If .Item(i).GetType() ... http://www.dev2you.com/clear-%e0%b8%84%e0%b9%88%e0%b8%b2-object-%e0%b8%95%e0%b9%88%e0%b8%b2%e0%b8%87%e0%b9%86-%e0%b9%83%e0%b8%99-groupbox/