<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%> <% Dim guonei Dim guonei_numRows Set guonei = Server.CreateObject("ADODB.Recordset") guonei.ActiveConnection = MM_news_STRING guonei.Source = "SELECT ID, Title,classID FROM news WHERE classID = 'D' ORDER BY ID DESC" guonei.CursorType = 0 guonei.CursorLocation = 2 guonei.LockType = 1 guonei.Open() guonei_numRows = 0 %> <% Dim guowai Dim guowai_numRows Set guowai = Server.CreateObject("ADODB.Recordset") guowai.ActiveConnection = MM_news_STRING guowai.Source = "SELECT ID, Title, classID FROM news WHERE classID = 'A' ORDER BY ID DESC" guowai.CursorType = 0 guowai.CursorLocation = 2 guowai.LockType = 1 guowai.Open() guowai_numRows = 0 %> <% Dim Repeat1__numRows Dim Repeat1__index Repeat1__numRows = 5 Repeat1__index = 0 guonei_numRows = guonei_numRows + Repeat1__numRows %> <% Dim Repeat2__numRows Dim Repeat2__index Repeat2__numRows = 5 Repeat2__index = 0 guowai_numRows = guowai_numRows + Repeat2__numRows %> <% Dim MM_paramName %> <% ' *** Go To Record and Move To Record: create strings for maintaining URL and Form parameters Dim MM_keepNone Dim MM_keepURL Dim MM_keepForm Dim MM_keepBoth Dim MM_removeList Dim MM_item Dim MM_nextItem ' create the list of parameters which should not be maintained MM_removeList = "&index=" If (MM_paramName <> "") Then MM_removeList = MM_removeList & "&" & MM_paramName & "=" End If MM_keepURL="" MM_keepForm="" MM_keepBoth="" MM_keepNone="" ' add the URL parameters to the MM_keepURL string For Each MM_item In Request.QueryString MM_nextItem = "&" & MM_item & "=" If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then MM_keepURL = MM_keepURL & MM_nextItem & Server.URLencode(Request.QueryString(MM_item)) End If Next ' add the Form variables to the MM_keepForm string For Each MM_item In Request.Form MM_nextItem = "&" & MM_item & "=" If (InStr(1,MM_removeList,MM_nextItem,1) = 0) Then MM_keepForm = MM_keepForm & MM_nextItem & Server.URLencode(Request.Form(MM_item)) End If Next ' create the Form + URL string and remove the intial '&' from each of the strings MM_keepBoth = MM_keepURL & MM_keepForm If (MM_keepBoth <> "") Then MM_keepBoth = Right(MM_keepBoth, Len(MM_keepBoth) - 1) End If If (MM_keepURL <> "") Then MM_keepURL = Right(MM_keepURL, Len(MM_keepURL) - 1) End If If (MM_keepForm <> "") Then MM_keepForm = Right(MM_keepForm, Len(MM_keepForm) - 1) End If ' a utility function used for adding additional parameters to these strings Function MM_joinChar(firstItem) If (firstItem <> "") Then MM_joinChar = "&" Else MM_joinChar = "" End If End Function %> 投稿问答
 
杂志动向
 
 
 
 
 
 
 
 
文章搜索
 


可输入标题或摘要中的任意词进行检索,中英文均可

稿件查询
 


请输入任一作者名

 
您所在位置:杂志动向->投稿问答
 
《塑料工业》投稿问答(FAQ)
 

为什么我的稿件还没有回音?

由于我刊的来稿量非常大,因此客观上不可能给每一位作者回信告知稿件的录用情况。凡是我刊选用的稿件,编辑会马上用电话或者电子邮件的方式与作者联系,而未录用稿件则不予通知。目前我刊的录用周期是4个月。如果4个月还未见通知作者即可自行处理稿件。

为什么查询网站的稿件录用情况查不到我的稿件?

由于数据库更新有一个周期,因此可能有时无法及时更新数据库,因此就查不到录用情况。稿件的“接收通知”以我刊发送的邮件为准。同时我们将尽量及时地更新数据库,以方便读者的查询。

为什么我的稿件没被录用?

我们对稿件的录用遵循严格的标准,论文的内在质量是录用的最主要决定因素。另外,每期杂志刊登的文章数量有限,因此可能有一些符合标准的稿件暂时落选,因此我们强调我们有一个录用周期,如果在这个周期里该稿件还没被录用,那你就可以自行处理稿件了。

我可以提前撤稿吗?

凡是投稿到我编辑部的作者因各种原因都可以在4个月之内提前撤稿,但是撤稿时务必及时通知我编辑部。

投稿有什么注意事项吗?

为加速稿件的处理,我刊原则上只接受电子版本的稿件,投送打印稿的作者请同时投送一份电子版本。

投送稿件时请务必留下你的联系电话,电子邮件地址和详细通讯地址。稿件录用后我们会及时通知作者,因此留下详细的联系方式非常必要,同时刊登后我们寄送杂志和稿酬也需要详细的地址。

稿件切勿一稿多投!

编辑部接受稿件录用情况查询吗?

原则上我们不接受作者通过打电话或者直接到编辑部的方式来查询稿件的录用情况。作者可以在网上查询稿件的录用情况。

 

         
 
版权声明 | 联系我们 | 广告服务 | 我要投稿
 

E-mail:net@plast-ind.com.cn 电话:028-85570801,85558516 传真:028-85562962
Copyright©2001-2005 CHINA PLASTICS INDUSTRY Networks.All rights reserved.
(C)2001-2005 塑料工业网 版权所有.保留所有权利.
设计制作:官长志

<% guonei.Close() Set guonei = Nothing %> <% guowai.Close() Set guowai = Nothing %>