<%
bbs_title=request.Form( "bbs_title ")
bbs_article=request.Form( "bbs_article ")
bbs_title=replace(bbs_title, " ' ", " ' ' ")
bbs_article=replace(bbs_article, " ' ", " ' ' ")
bbs_date=now()
bbstype=request.Form( "bbs_type ")
select case bbstype
case "vb "
bbs_type= "VB语言 "
case "c "
bbs_type= "C语言 "
case "java "
bbs_type= "JAVA语言 "
case "other "
bbs_type= "语言相关 "
case "asp "
bbs_type= "ASP "
case "dotnet "
bbs_type= ".NET "
case "js "
bbs_type= "JAVASCRIPT "
case "php "
bbs_type= "PHP "
case "focus "
bbs_type= "网络焦点 "
end select
sql= "insert into article (bbs_date,bbs_title,bbs_article,bbs_type) values ( ' "&bbs_date& " ', ' "&bbs_title& " ', ' "&bbs_article& " ', ' "&bbs_type& " ') "
conn1.execute sql
response.Write "添加成功, <a href= 'addarticle.html '> 返回上一页 </a> "
%>
我自己做了个记录文章的系统
我在别的论坛复制他们的东西
然后在我自己的添加文章页面添加进数据库之后
读取出来之后显示的文章内容连分段都没有
怎么能让显示出来的文章跟原来论坛的文章格式一样的
还有啊 我复制他们的东西写到记事本之后有很多乱码 像下面这样的
怎么能在写进数据库的时候把这些乱码过滤掉呢
CDSPMOD 即为缓冲器,其中有四个数据,分别为机器码的相异部份,如分号后所注。因为四组机器码皆有 05 ,不必再填。=右边部份,即为该机器语言相对应的指令。 " 0r{ <32
程式部份先设妥功能定义,利用一、所说的变数应用法,依序由0至3先载入暂存器BX中。根据 BX 值,将所需机器码载入程式中。 9o> Cpv[
10:CLOD: ezQ_b}L$@q
11: MOV AL,CDSPMOD[BX] ;用BX取预存码 gJ!?=1{d=
12: MOV CS:CDSP2[1],AL ;载入CDSP2+1 @ga19>
13:CDSP: v\r0G\@qx
14: SUB SI,SI ;资料由0起 (ZVy4L sY
15:CDSP1: !n&qLw
16: LODSB ;取资料 91u N
17:CDSP2 LABEL BYTE ;载入的位置 Ru %3R+b
------解决方案--------------------
mark
------解决方案--------------------
<%
strCont=Replace(rs( "字段 "),chr(10)&chr(13), " <BR> ")
Response.Write(strCont)
%>