อยากทราบชื่อเครื่องในโปรแกรมที่เขียนด้วย Access 20
กระทู้เก่าบอร์ด อ.Yeadram

 3,274   11
URL.หัวข้อ / URL
อยากทราบชื่อเครื่องในโปรแกรมที่เขียนด้วย Access 20

ขอความช่วยทุกท่าน ผมต้องการ ดึงชื่อเครื่องให้มาแสดงในโปรแกรม Access ที่ผมเขียนขึ้นมา โดยจะเก็บชื่อเครื่องไว้ในฐานข้อมูล แต่ไม่ทราบคำสั่ง ในการดึงชื่อเครื่องมาใช้งานได้อย่างไร
เรียน ถามอาจารย์ทุกท่าน ใช้คำสั่งอะไร ต้องเขียนแบบไหนครับ

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

1 @R04602
ใช้ API Function   
สร้าง form และ สร้าง command button ขึ้นมา 1 อัน ( command0)
แล้ว เอา code ข้างล่าง นี้ไปแปะดู


Private Const MAX_COMPUTERNAME_LENGTH As Long = 31
Private Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As Long


Private Sub Command0_Click()

    Dim dwLen As Long
    Dim strString As String
    dwLen = MAX_COMPUTERNAME_LENGTH + 1
    strString = String(dwLen, "X")
    GetComputerName strString, dwLen
    strString = Left(strString, dwLen)
    Command0.Caption = strString

End Sub
2 @R04610
แปะไม่ได้ครับ เอามาใส่แล้วใช้ไม่ได้ครับ รบกวนอาจารย์ช่วยส่ง files ตัวอย่าง มาให้หน่อยได้ไหมครับ
(ผมทำใน Microsoft Access 2003 ครับ)

3 @R04612
ใช้คำสั่ง
Environ("ComputerName")
เช่น msgbox Environ("ComputerName")

นอกจาก คำว่า ComputerName แล้วยังมีอีกหลายคำที่คุณสามารถใช้ Environ() ค้นหาได้ เช่นคำว่า
UserName
SystemDrive
OS
Windir
ฯลฯ
4 @R04862
ขอบคุณ user : Yeadram     ที่ให้คำแนะนำครับ
คำสัี่งพวกนี้ จะหาอ่านได้ที่ไหนบ้างครับ มี Web หรือคู่มือ แนะนำหรือไม่ครับ
5 @R04868
ลองพิมพ์คำว่า
"Ms Access โปรแกรมสุดหวง"
ในGoogle ก็จะเจอลิงค์แรก ไปลองดาวน์โหลดใช้ดูครับ แต่มันมีวิธีแก้อะไรสักอย่างอยู่ดี ผมเองก็ไม่รู้เหมือนกัน :-P
6 @R04904
รบกวนถามอาจารย์ครับว่า
Environ ให้แสดง Mac Ip ได้มั๊ยครับ
7 @R04905
พอดีไปเห็นหน้านี้ครับ แต่ไม่ค่อยเข้าใจครับ รบกวนช่วยอธิบายครับ หากมันใช้ไม่ได้กับMs Access ก็ไม่เป็นไรครับ
ขอบพระคุณครับ
8 @R04906
ลืมใส่ Addressครับ
http://vbnet.mvps.org/index.html?code/network/macaddress.htm
9 @R04907
จากคำว่า
To a form add a command button (Command1), and a text box (Text1). Labels and frames are optional. Add the following:
ผมได้สร้าง ฟอร์มมาฟอร์มหนึ่ง และ a command button (Command1), and a text box (Text1).

แต่ตรงนี้
Labels and frames are optional. Add the following
ผมไม่เข้าใจครับอาจารย์ รบกวนอาจารย์ช่วยอธิบายด้วยนะครับ
ขอบพระคุณครับ
10 @R04909
ตอบคุณเกรียงไกร
ผมก็ค้นๆ มาเหมือนกันครับ
เลยใช้มาตลอด 2-3ปีมานี้แหละครับ ใช้อยู่ไม่กี่ตัว พอคุณเกรียงไกรถามมา ก็เลย ลองค้นอีกทีครับ

ลองดูลิงค์นี้นะครับ
http://www.utteraccess.com/forums/printthread.php?Board=53&main=693880&type=post

คุณ BenTen ครับ
คำถามแรก จะหาไอพีได้อย่างไร ผมค้นมาให้ครับ ดูตามลิงค์นี้นะครับ
http://www.utteraccess.com/forums/printthread.php?Board=53&main=693880&type=post

ส่วนคำถามที่สอง ผมคิดว่า คงต้องตามเข้าไปอ่านดีกว่า อาจจะตอบได้ตรงประเด็น ก็เลยลองเข้าไปตามลิงค์ที่คุณ BenTen ให้มา โอ้วววว ยาวจัง ไม่ค่อยจะคล่องภาษาอังกฤษเท่าไหร่ ขอยอมแพ้ไว้ก่อนครับ คิดว่า คำตอบของคำถามแรกน่าจะช่วยได้แล้วล่ะครับ หรือไม่ ยังไงก็ลองแจ้งอีกทีครับ
11 @R04917
ขอบคุณครับ อาจารย์
ช่วงนี้ผมคงใช้แบบเช็คCPUไปก่อนครับ

ขอบพระคุณครับ
@ ประกาศใช้งานเว็บบอร์ดใหม่ => บอร์ดเรียนรู้ Access สำหรับคนไทย
แล้วจะใส่ลิ้งอ้างอิงมาที่โพสต์เก่านี้หรือไม่ก็ตามสะดวกครับ
Time: 0.3993s