นี่เป็นโคดของการตั้งกระทู้ครับ มันทำงานได้ครับแต่ต้องการให้ใส่รูปได้ต้องเพิ่งคำสั่งอะไรตำแหน่งไหน ท่านผู้รู้ช่วยบอกด้วยนะครับ
<% ' ---- ÊèǹÃѺ¢éÍÁÙŨҡ form
gID=Request.QueryString("GID")
Set Conn=Server.CreateObject("ADODB.Connection")
conn.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.mappath("webboard.mdb")
Sql1="Select * from Question where QNumber ="&gID
Sql2="Select * from Answer where QNumber='"&gID&"' order by ADate desc"
Set RS =Server.CreateObject("ADODB.Recordset")
RS.open Sql1,Conn,1,3
%>
<!-- <title><%=RS("QTopic")%></title>
<body bgcolor="ccff99" text="#000000" link="990000" vlink="336633">
<div align="center">
<table width="600" border="0">
<tr align="center">
<td><b><font face="MS Sans Serif" size="3" color="#000000"><%=RS("QTopic")%></font></b></td>
</tr>
<tr align="right">
<td><a href="#newanswer"><font face="MS Sans Serif" size="2">µÍº¤Ó¶ÒÁà¾ÔèÁ
¤ÅÔ¡·Õè¹Õè</font><font face="MS Sans Serif" size="2" color="3399cc"></font></a></td>
</tr>
</table>
<br>
<table width="600" border="0" cellspacing="0" cellpadding="0" bgcolor="#FFFFFF">
<tr bgcolor="#000000">
<td>
<table border='0' width='600' cellpadding="1" cellspacing="1">
<tr bgcolor="99cc66" align="center">
<td>
<table width="550" border="0">
<tr>
<td><font face="MS Sans Serif" size="1"><%=RS("QNote")%></font></td>
</tr>
<tr align="right">
<td><font face="MS Sans Serif" size="2">¨Ò¡¤Ø³ <%=RS("QName")%></font><font face="MS Sans Serif" size="2">
àÁ×èÍÇѹ·Õè <%=day(rs("qdate")) & " " & thmonth(month(rs("qdate"))-1) & " " & right(year(rs("qdate"))+543,2)%> </font></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
<%
RS.Close
Set RS =Server.CreateObject("ADODB.Recordset")
RS.open Sql2,Conn,1,3
do while not rs.EOF
%> <br>
</div>
<div align="center">
<table width="600" border="0" cellspacing="0" cellpadding="0">
<tr bgcolor="#000000">
<td>
<table border='0' width='600' cellspacing="1" cellpadding="1">
<tr bgcolor="B2E57F" align="center">
<td height="54">
<table width="550" border="0">
<tr>
<td><font face="MS Sans Serif" size="1"><%=RS("ANote")%></font></td>
</tr>
<tr align="right">
<td><font size="2" face="MS Sans Serif" color="#000000">¨Ò¡¤Ø³
<%=RS("AName")%> àÁ×èÍÇѹ·Õè
<%=day(rs("adate")) & " " & thmonth(month(rs("adate"))-1) & " " & right(year(rs("adate"))+543,2)%> </font></td>
</tr>
</table>
</td>
</tr>
</table>
</td>
</tr>
</table>
<%
rs.movenext
loop
RS.Close
Conn.Close%> <!-- ÊÃéҧẺ form <div align="center"><br>
</div>
<div align="center">
<table width="650" border="0" cellspacing="0" cellpadding="0" bgcolor="000000" height="1">
<tr>
<td></td>
</tr>
</table>
<br>
</div>
<div align="center"><a name=#newanswer> <font face="MS Sans Serif" size="2">¢ÍàªÔ­ÃèÇÁµÍº¤Ó¶ÒÁ¤ÃѺ
</font></a> </div>
<form action="Answer.asp" method="Post">
<div align="center">
<table width="550" border="0" cellspacing="0" cellpadding="0">
<tr bgcolor="#000000">
<td>
<table border="0" width="550">
<tr>
<td bgcolor=#99cc66 width="50" align="center" height="35" ><font face="MS Sans Serif" size="2" color="#000000">¼ÙéµÍº
: </font></td>
<td bgcolor=B2E57F width="490" height="35">
<input type="text" name="name" size=25 maxlength="100">
</td>
</tr>
<tr>
<td bgcolor=#99cc66 width="50" valign="top" align="center" height="130" ><font face="MS Sans Serif" size="2" color="#000000"><br>
¤ÓµÍº : </font></td>
<td bgcolor=B2E57F width="490" height="130">
<textarea name="answer" rows=5 cols=50></textarea>
</td>
</tr>
</table>
</td>
</tr>
</table>
<br>
</div>
<div align="center">
<input type="hidden" name="QID" value="<%=gID%>">
<input type="Submit" value="Ê觤ӵͺ">
<input type="Reset" value="Clear ¢éͤÇÒÁ">
<input type="Button" value="¡ÅÑºä» Ë¹éÒáá" onclick="history.back()">
</div>
</form>
<div align="center">
<div align="center"> </div>
<div align="center">
<table width="650" border="0" cellspacing="0" cellpadding="0" bgcolor="000000" height="1">
<tr>
<td></td>
</tr>
</table>
</div>
</div>
[glow=red][shadow=red left][font=Verdana]
Quote:
[li][/li]
[/font] [/shadow][/glow]
Date :
2010-09-15 23:57:20
By :
bbb
มี Source code php โปรแกรม php ฐานข้อมูล Mysql ทั้งระบบ ราคาย่อมเยาว์ โปรแกรม อาทิเช่น
โปรแกรมหนังสือเวียน โปรแกรมบันทึกข้อมูลคอมพิวเตอร์ โปรแกรมบริหารความเสี่ยง โปรแกรมบันทึกการอบรม โปรแกรมร้านขายสินค้า โปรแกรมขายสินค้าออนไลน์ โปรแกรมจัดเก็บเอกสารดิจิตอล โปรแกรมจัดหางานออนไลน์ โปรแกรมจองตั๋วรถทัวร์ออนไลน์ โปรแกรมตวจสอบผลนักเรียน โปรแกรมเรียกคิว โปรแกรมบันทึกวันลาหยุด โปรแกรมห้องสมุด โปรแกรมเบิกพัสดุออนไลน์ โปรแกรมจองห้องประชุม โปรแกรมจองบ้านพัก จองรีสอร์ท โปรแกรมบันทึกข้อมูลลูกค้า ซ่อมคอมพิวเตอร์ออนไลน์ เป็นต้น
Date :
2011-04-21 21:17:13
By :
ba
ขอบคุณครับ
Date :
2011-06-16 16:43:30
By :
chawalit
Load balance : Server 03