sp; N_Body = Left(N_Body,InstrRev(N_Body,"；"))
else if Instrrev(N_Body,"，") > 0 and (Len(N_Body) - Instrrev(N_Body,"，"))< 400 then
N_Body = Left(N_Body,InstrRev(N_Body,"，"))
else if Instrrev(N_Body,".") > 0 and (Len(N_Body) - Instrrev(N_Body,"."))< 400 then
N_Body = Left(N_Body,InstrRev(N_Body,"."))
end if
end if
End If
End If
end if
End if
N_Len = Len(N_Body)
I_Body = Mid(I_Body,N_Len+1)
B_Len = Len(I_Body)
Else
N_Body = I_Body
T_Loop = false
End If
'Add to database
Exec_prc_Content_Ins I_Forder,I_Topic,I_Title,I_Source,N_Body,i_ispic,i_pic,i_ishot,I_Keyword,B_Pages
'这里一个function，你可以自己处理，反正结果有两个，一个是body，一个是b_pages，就是页码。
B_Pages = B_Pages + 1
Loop
%>
<html>
<head>
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>新建网页 1</title>
<link rel="stylesheet" type="text/css" href="../CSS/default.css">
</head>
<body>
<div align="center">
<center>
<table border=1 width="300" height="128" bordercolor="#000000" cellspacing=
else if Instrrev(N_Body,"，") > 0 and (Len(N_Body) - Instrrev(N_Body,"，"))< 400 then
N_Body = Left(N_Body,InstrRev(N_Body,"，"))
else if Instrrev(N_Body,".") > 0 and (Len(N_Body) - Instrrev(N_Body,"."))< 400 then
N_Body = Left(N_Body,InstrRev(N_Body,"."))
end if
end if
End If
End If
end if
End if
N_Len = Len(N_Body)
I_Body = Mid(I_Body,N_Len+1)
B_Len = Len(I_Body)
Else
N_Body = I_Body
T_Loop = false
End If
'Add to database
Exec_prc_Content_Ins I_Forder,I_Topic,I_Title,I_Source,N_Body,i_ispic,i_pic,i_ishot,I_Keyword,B_Pages
'这里一个function，你可以自己处理，反正结果有两个，一个是body，一个是b_pages，就是页码。
B_Pages = B_Pages + 1
Loop
%>
<html>
<head>
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>新建网页 1</title>
<link rel="stylesheet" type="text/css" href="../CSS/default.css">
</head>
<body>
<div align="center">
<center>
<table border=1 width="300" height="128" bordercolor="#000000" cellspacing=
相关文章
 我来说两句 |
对此文章发表了评论 |
评论列表 （最新 评论仅限网友观点！）
推荐文章
