Forgot Password ??

PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone

	Registered : 109,038

HOME > ASP > ASP Forum > เขียน asp ในเครื่องหนึ่ง ติดต่อกับฐานข้อมูล mysql ที่อยู่ในเครื่อง server อีกเครื่องหนึ่งได้อย่างไร?

เขียน asp ในเครื่องหนึ่ง ติดต่อกับฐานข้อมูล mysql ที่อยู่ในเครื่อง server อีกเครื่องหนึ่งได้อย่างไร?

เริ่มหัวข้อใหม่

Guest

ลองทั้งเชต DSN และ DNLess แล้วครับ
<%
Set Conn=Server.Createobject("ADODB.Connection")

'Conn.Open "sql_test","myused","1234" //กรณีใช้ DSN//

'strCon="Driver={MySQL ODBC 3.51 Driver};server=192.168.11.28;port=3306;uid=myused;pwd=1234;database=emplo"
'Conn.Open strCon // กรณีใช้ DNLess//

sql ="Select username,ublock From member"
Set Rs = Conn.Execute(sql)
If Rs.EOF Then
%>
ไม่มีข้อมูลในตาราง !
<%Else%>
<table width="139" border="1">
<tr bgcolor="Silver">
<td>id</td>
<td>barcode</td>
</tr>
<% While Not Rs.EOF%>
<tr>
<td><%= Rs("username")%></td>
<td><%= Rs("ublock")%></td>
</tr>
<% Rs.MoveNext
Wend
Rs.Close
Conn.Close
End If
%>
</table>

Tag : - - - -

Date : 13 ก.พ. 2549 18:06:15

By : สินโท

View : 2109

Reply : 2

No. 1

นายกระจอก007

โพสกระทู้ ( 422 )
บทความ ( 0 )

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

Date : 14 ก.พ. 2549 08:13:11

By : นายกระจอก

No. 2

TC Admin

โพสกระทู้ ( 74,058 )
บทความ ( 838 )

Code (ASP)

<% Option Explicit %>
<html>
<head>
<title>ThaiCreate.Com ASP & MySQL Tutorial</title>
</head>
<body>
<%

Dim Conn,strSQL,objRec
Set Conn = Server.Createobject("ADODB.Connection")
Conn.Open "DRIVER={MySQL ODBC 5.1 Driver}; SERVER=localhost;UID=root; " & _
"pwd=root;database=mydatabase;option=16384;"
strSQL = "SELECT * FROM customer "
Set objRec = Server.CreateObject("ADODB.Recordset")
objRec.Open strSQL, Conn, 1,3
%>
<table width="600" border="1">
  <tr>
    <th width="91"> <div align="center">CustomerID </div></th>
    <th width="98"> <div align="center">Name </div></th>
    <th width="198"> <div align="center">Email </div></th>
    <th width="97"> <div align="center">CountryCode </div></th>
    <th width="59"> <div align="center">Budget </div></th>
    <th width="71"> <div align="center">Used </div></th>
  </tr>
<%
	While Not objRec.EOF
%>
	  <tr>
		<td><div align="center"><%=objRec.Fields("CustomerID").Value%></div></td>
		<td><%=objRec.Fields("Name").Value%></td>
		<td><%=objRec.Fields("Email").Value%></td>
		<td><div align="center"><%=objRec.Fields("CountryCode").Value%></div></td>
		<td align="right"><%=objRec.Fields("Budget").Value%></td>
		<td align="right"><%=objRec.Fields("Used").Value%></td>
	  </tr>
<%
	objRec.MoveNext
	Wend
%>
</table>
<%
	objRec.Close()
	Conn.Close()
	Set objRec = Nothing
	Set Conn = Nothing		
%>
</body>
</html>

ASP & MySQL

Date : 2009-05-29 07:25:30