ʵÀý£ºaspÉú³ÉWORDÎĵµ
<Html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>Éú³ÉWordÎĵµ</title>
</head>
<script language="vbscript">
sub builddoc()
On Error Resume Next
Dim wApp
Set wApp = CreateObject("Word.Application")
If Err.number > 0 Then
Alert "û·¨±£´æÎªWordÎļþ,ÇëÕýÈ·°²×°Word97"
else
wApp.visible = True
wApp.Documents.add
wApp.Selection.TypeParagraph
wApp.Selection.Font.Bold = True
wApp.Selection.TypeText "¾Å°ËJoy ASPά»¤¹¤×÷Òâ¼û"
wApp.Selection.ParagraphFormat.Alignment = 1
rem ¾Ó ÖÐ
wApp.Selection.TypeParagraph
wApp.Selection.Font.Bold = false
&
Ïà¹ØÎĵµ£º
·½·¨Ò»¡¢¾¡Á¿Ê¹Óø´ÔÓµÄSQLÀ´´úÌæ¼òµ¥µÄÒ»¶Ñ SQL.
ͬÑùµÄÊÂÎñ£¬Ò»¸ö¸´ÔÓµÄSQLÍê³ÉµÄЧÂʸßÓÚÒ»¶Ñ¼òµ¥SQLÍê³ÉµÄЧÂÊ¡£Óжà¸ö²éѯʱ£¬ÒªÉÆÓÚʹÓÃJOIN¡£
oRs=oConn.Execute("SELECT * from Books")
while not oRs.Eof
strSQL = "SELECT * from Authors WHERE AuthorID="&oRs("AuthorID") oRs2=oConn.Execute(strSQ ......
<%
Dim Fy_Url,Fy_a,Fy_x,Fy_Cs(),Fy_Cl,Fy_Ts,Fy_Zx
'---¶¨Ò岿·Ý Í·------
Fy_Cl = 1 '´¦Àí·½Ê½£º1=ÌáʾÐÅÏ¢,2=תÏòÒ³Ãæ,3=ÏÈÌáʾÔÙתÏò
Fy_Zx = "Error.Asp" '³ö´íʱתÏòµÄÒ³Ãæ
'---¶¨Ò岿·Ý β------
On Error Resume Next
Fy_Url=Request.ServerVariables("QUER ......
protected void Button1_Click(object sender, EventArgs e)
{
GridViewRow gvr = (sender as Button).NamingContainer as GridViewRow; //»ñµÃÈÝÆ÷
if(gvr != null)
{
int index = gvr.RowIndex;//index¾ ......
1¡¢ÔËÐл·¾³ÓëÈí¼þÒªÇó
Windows 2000 ÒÔÉÏ £¨²»°üÀ¨Windows XP Home°æ£©
IIS 4.0 ÒÔÉÏ
Microsoft Access 2000
Dreamweaver MX
2¡¢IISµÄ°²×°ÓëÅäÖÃ
a.°²×°IIS
Èô²Ù×÷ϵͳÖл¹Î´°²×°IIS·þÎñÆ÷£¬¿É´ò¿ª“¿ØÖÆÃæ°å”£¬È»ºóµ¥»÷Æô¶¯ “Ìí¼Ó/ɾ³ý³ÌÐò”£¬ ÔÚµ¯³öµÄ¶Ô»°¿òÖÐÑ¡Ôñ “Ìí¼Ó/ɾ³ýWi ......
Ò»´óÔçÆðÀ´×°IIS¡£ÏÖÔÚÖÕÓÚ×°ºÃÁË¡£Ê®·Ö¸ÐлÒÔϵIJ©ÎÄ£¬ÌØ×ª¹ýÀ´·ÖÏí :)
תÖÁ£ºhttp://blog.sina.com.cn/s/blog_50070c4c0100bkq6.html
ÿÿװIIS£¬×Ü»áÅöµ½ÕâÑùÄÇÑùµÄÎÊÌ⣬´ÓĿǰ·´Ó¦Çé¿öÀ´¿´£¬IIS°²×°ºó¿Éä¯ÀÀHTML¾²Ì¬Îļþ£¬È´ÎÞ·¨ä¯ÀÀaspΪºó׺µÄ¶¯Ì¬Ò³Ãæ¡£
ͨ¹ý¼¸´Îµ÷ÊÔºó£¬ÕÒµ½ÒÔϼ¸ÖÖ·½·¨£ ......