文本与图像上传到数据库

简介: 1.upload.asp方法    function checkinfo()       if (document1.form1.picture.value"") then         if (Instr(1,document.form1.picture.value,".")
1.upload.asp方法
<head>
<script language=vbscript>
    function checkinfo()
       if (document1.form1.picture.value<>"") then
         if (Instr(1,document.form1.picture.value,".")<=0) or (Instr(1,document.form1.picture.value,"\")<=0)  or ((Instr(1,document.form1.picture.value,"bmp")<=0) and (Instr(1,document.form1.picture.value,"gif")<=0) and  (Instr(1,document.form1.picture.value,"jpg")<=0)) then
            msgbox('图片格式不正确,请重写!')
            document.form1.picture.focus()
            document.form1.picture.select(this)
            window.even.returnvalue=false
            exit function
          end if    
          form2.submit
          if document.form1.picture1.value<>" " then
            form1.submit
          end if
     end function   
</script>
</head>
<form name="form1" ENCTYPE="multiport/form-data" Action="upimage.asp" Method="POST" target="_blank">
  新闻图片:<input name="picture" TYPE="file" size=40>
</form>
<form method="POST" action="uptext.asp" name="form2" target="_blank">新闻内容:
<input name="text" type="text" size=40>
<p><input type="button" value="提交" name="B1" onclick="checkinfo()">
<input type="reset" value="清除" name="B2">

2.上传文本页面
<%
  text=request("text")
  set rs=Server.CreateObject("ADODB.Recordset")
  sql="select * from newtable2"
  rs.Open sql,conn,1,3
  rs.AddNew
  rs.("text")=text
  rs.Update
  rs.Close
  response.write text
%>
<p align="center"><a href="javascript.Close()">关闭窗口</a></p>

3.上传图像页面
注:用rs的appendchunk方法存储图像
<%
  FormSize=Request.TotalBytes
  FormData=Request.BinaryRead(FormSize)
  function ImageUp(formsize,formdata)
    bnctrf=chrb(13) & chrb(10)
    divider=leftb(formdata,instrb(formdata,bnctrf)-1)
    datastart=instrb(formdata,bnctrf & bnctrf)+4
    dataend=instrb(formdata,datastart,dataend)
  end function
  Image=ImageUp(FormSize,FormData)
  set rs=Server.Create("adodb.recordset")
%>
<#include file="data.inc"-->
<%
  sql="select top 1 * from newstable2 order by id desc"
  rs.open sql.conn,1,3
  rs("picture").appendchunk Image
  re.Update
%>
<img src=showimg.asp>id=<%=rs("id")%>>
<%
  rs.Close
%>
相关文章
|
2月前
|
自然语言处理 关系型数据库 MySQL
如何在mysql数据库里进行文本的相似度排序?
【8月更文挑战第28天】如何在mysql数据库里进行文本的相似度排序?
235 62
|
3天前
|
机器学习/深度学习 存储 自然语言处理
LangChain-22 Text Embedding 续接21节 文本切分后 对文本进行embedding向量化处理 后续可保存到向量数据库后进行检索 从而扩展大模型的能力
LangChain-22 Text Embedding 续接21节 文本切分后 对文本进行embedding向量化处理 后续可保存到向量数据库后进行检索 从而扩展大模型的能力
10 0
|
1月前
|
自然语言处理 关系型数据库 MySQL
match如何在mysql数据库里进行文本的相似度排序?
【9月更文挑战第1天】match如何在mysql数据库里进行文本的相似度排序?
62 1
|
3月前
|
前端开发 数据库
文本----富文本数据如何存入到数据库当中,解决方法,看其他大佬写的文章
文本----富文本数据如何存入到数据库当中,解决方法,看其他大佬写的文章
文本----富文本数据如何存入到数据库当中,解决方法,看其他大佬写的文章
|
3月前
|
存储 JavaScript 前端开发
文本,三步走构思,富文本点击提交能够存储到数据库当中(下),最快的方法,还是会看资料,因此会整合资料最好,直接看资料最快,因为是JWT的资料,我们要设置好登录的内容,看登录的地方怎样写的
文本,三步走构思,富文本点击提交能够存储到数据库当中(下),最快的方法,还是会看资料,因此会整合资料最好,直接看资料最快,因为是JWT的资料,我们要设置好登录的内容,看登录的地方怎样写的
|
5月前
|
存储 SQL 数据库
C# 将 Word 转文本存储到数据库并进行管理
C# 将 Word 转文本存储到数据库并进行管理
121 2
|
5月前
|
自然语言处理 关系型数据库 分布式数据库
配置 jieba结巴分词 for PolarDB 实现数据库高性能文本分词搜索
背景PolarDB 的云原生存算分离架构, 具备低廉的数据存储、高效扩展弹性、高速多机并行计算能力、高速数据搜索和处理; PolarDB与计算算法结合, 将实现双剑合璧, 推动业务数据的价值产出, 将数据变成生产力.本文将介绍PolarDB结合jieba分词, 实现高效率的中文分词以及中文分词搜索....
144 0
|
6天前
|
存储 关系型数据库 MySQL
一个项目用5款数据库?MySQL、PostgreSQL、ClickHouse、MongoDB区别,适用场景
一个项目用5款数据库?MySQL、PostgreSQL、ClickHouse、MongoDB——特点、性能、扩展性、安全性、适用场景比较
|
2天前
|
缓存 算法 关系型数据库
Mysql(3)—数据库相关概念及工作原理
数据库是一个以某种有组织的方式存储的数据集合。它通常包括一个或多个不同的主题领域或用途的数据表。
20 5
Mysql(3)—数据库相关概念及工作原理
|
6天前
|
SQL 关系型数据库 MySQL