source code คะ
1. Sql = "SELECT a.fix_name FROM fixer a order by a.fix_id "
2. Set RS =Server.CreateObject("ADODB.Recordset")
3. RS.open Sql,oConnection,1,3
4. set Rs = oConnection.Execute(Sql)
ถ้าใช้คำสั่งในบรรทัดที่ 2-3 จะเกิด error แบบนี้ "Microsoft VBScript runtime (0x800A01A8)
Object required: ''
แต่ถ้าใช้คำสั่งในบรรทัดที่ 4 จะเกิด error แบบนี้ "ADODB.Recordset (0x800A0BB9)
Arguments are of the wrong type, are out of acceptable range, or are in conflict with one another."
ไม่ทราบว่าจริงๆ ควรจะใช้คำสั่งไหนดีคะ ระหว่างบรรทัดที่ 2-3 หรือ บรรทัดที่ 4 คะ ถ้าเพียงแต่ select ข้อมูลขึ้นมาแสดงใน table บนหน้าจอเท่านั้นคะ แล้วถ้าเกิด error ตามที่บอก จะต้องแก้ไขยังไงคะ
ขอบคุณคะ....
ส่วนนี้เป็นคำสั่งในการเปิดฐานข้อมูล
Set Conn=Server.CreateObject("ADODB.Connection")
Conn.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.mappath("xxx.mdb")
//access
หรือ
set conn=Server.CreateObject("ADODB.Connection")
conn.open "DSN=xxx;UID=yyy;PWD=zzz"
จากนั้นเราก็มาเรียกใช้ด้วยคำสั่ง
sql="select * from xx where ax="&bx&" and y='astring' " //แล้วแต่จะเลือกสั่งนะครับ
Set Rst=Server.CreateObject("ADODB.Recordset")
Rst.open sql,Conn,1,3
เวลาแสดงก็แค่
<%response.write Rst("myfeild")%>
ลองทำดูครับ
ปล.ส่วน ORDER by น่าจะมี ASC หรือ DESC กำกับนะครับ เช่น ORDER by mb_id DESC
แล้วก็...เราต้องใช้คำสั่งเปิดฐานข้อมูลก่อนจะ select นะครับ ไม่งั้นมันจะไม่รู้ว่าเลือกจากไหน
Date :
2009-10-31 12:53:37
By :
sniper_one
No. 2
Guest
ตัว server ใช้ SQL Server คะ ส่วนตัว connection ได้สร้างเป็นไฟล์อีกอันไฟล์นึงคะ มี source code ดังนี้นะคะ
Dim sConnection
Dim oConnection
Load balance : Server 01
