mailto: Hyperlink Field
กระทู้เก่าบอร์ด อ.สุภาพ ไชยา

 304   1
URL.หัวข้อ / URL mailto: Hyperlink Field

ถามไว้ที่ 
http://www.utteraccess.com/forums/showflat.php?Cat=&Board=access_97&Number=120579&page=0&view=&sb=&o=&fpart=1&vc=1&PHPSESSID= 
 
เขาต้องการแทนที่ http:// ด้วย mailto: จะทำอย่างไร 
 
ผมได้ให้โค้ดเขาไว้ด้วยครับ ดังนี้ 
 
Private Sub SiteLink_AfterUpdate() 
Dim strEmail As String 
 
If Len(Me.SiteLink) > 0 Then 
    strEmail = Left(Me.SiteLink, InStr(Me.SiteLink, "#") - 1) 
    strEmail = strEmail & "#mailto:" & strEmail & "#" 
    Me.SiteLink = strEmail 
End If 
 
End Sub 
*** Edited by Supap Chaiya *** 5/28/2003 10:31:19 AM
โดย: สุภาพ เมื่อ: 25 ก.ย. 2545 , 17:55

1 Reply in this Topic. Dispaly 1 pages and you are on page number 1

1 @R01063
ลองไปดูโค้ดของ MS เองบ้าง ว่าเหมือนหรือต่างจากที่ผมแนะนำอย่างไรบ้างครับ ที่ http://support.microsoft.com/default.aspx?scid=kb;en-us;Q323202
โดย: สุภาพ เมื่อ: 1 ต.ค. 2545 , 22:04
@ ประกาศใช้งานเว็บบอร์ดใหม่ => บอร์ดเรียนรู้ Access สำหรับคนไทย
แล้วจะใส่ลิ้งอ้างอิงมาที่โพสต์เก่านี้หรือไม่ก็ตามสะดวกครับ
Time: 0.3162s