很菜的问题，关于在text框里输入……

2003-03-29 09:39:36 80 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

taoguang2 墨衍会员 · AI 创作全网分发关注 + 加入社区

合宙Air780EP速连OneNET：AT+MQTT应用指南本文详细讲解了合宙Air780EP使用AT指令通过MQTT接入OneNET的过程。阅读详情

我在text框里输入一些文本，然后回车再输入一行，然后把这些文本写到数据库里，怎么写进数据库我会，可我想把在文本框里的回车也写到数据库里，比如“按时法 士大夫”
怎么办呢？？？

...全文

二阶系统的带宽（频域分析）下面以典型I型系统为例，计算系统的开环截止频率和闭环截止频率。设I型系统为： 1：系统的开环截止频率为 2：系统的闭环截止频率其实我们在工程整定时，把ζ = 0.707，也把系统的带宽近视看成自然震荡角频率即（wb≈wc≈wnw_{b}\approx w_{c}\approx w_{n}wb≈wc≈wn）对于二阶系统。 ... 阅读详情

taoguang2

ASP 28,401 成员 356,940 内容

+ 关注 + 加入社区

切换为时间正序

zhuyngjie 2003-03-29

打赏
举报

写在script的里面

bws 2003-03-29

打赏
举报

直接用textarea元素试试，不用写函数。

taoguang2 2003-03-29

打赏
举报

function写在哪里呢？？？？？？？？？？？？？？？

layewong 2003-03-29

打赏
举报

Function coder(str)
Dim result,L,i
If IsNull(str) Then : coder="" : Exit Function : End If
L=Len(str) : result=""
For i = 1 to L
select case mid(str,i,1)
case "<" : result=result+"<"
case ">" : result=result+">"
case chr(34) : result=result+"""
case "&" : result=result+"&"
case chr(13) : result=result+" "
case chr(9) : result=result+" "
case chr(32) : result=result+" "
case chr(7): result=result+""
case else : result=result+mid(str,i,1)
end select
Next
coder=result
End Function

taoguang2 2003-03-29

打赏
举报

到底怎么用呢？？？还是不明白，真笨啊

心云意水 2003-03-29

打赏
举报

一个是空格，一个是tab

taoguang2 2003-03-29

打赏
举报

fString = Replace(fString, CHR(32), " ")
fString = Replace(fString, CHR(9), " ")
上面的两个都是取代空格，为什么一个用chr(32)，一个用chr（9）呢

jackmtlee 2003-03-29

打赏
举报

我也不会

csdntoll 2003-03-29

打赏
举报

写数据库时，对TEXT的值用以上函数处理

csdntoll 2003-03-29

打赏
举报

function HTMLEncode(fString)
if not isnull(fString) then

fString = Replace(fString, CHR(32), " ")
fString = Replace(fString, CHR(9), " ")
fString = Replace(fString, CHR(34), """)
fString = Replace(fString, CHR(39), "'")
fString = Replace(fString, CHR(13), "")
fString = Replace(fString, CHR(10) & CHR(10), " ")
fString = Replace(fString, CHR(10), " ")

HTMLEncode = fString
end if
end function

newslxw 2003-03-29

打赏
举报

直接用textarea元素试试，不用写函数,只需把wrap属性改为hard即可

很菜的问题，关于在text框里输入……

相关推荐