The easiest way to post-copying the database into the database Download Database Date: 2001-7-17 Word Count: 4798 1: Foreword First, No Improving the picture and the text of the text will cause so much attention. The last post (ID = 435906) After posted, many people believe that they don't understand. Or still don't be implemented. I will use a completely simple technique. Complete component-free text and upload all procedures for the database. I hope to help all netizens who have questions about this. Second: Preparing work According to the practice, I will tell you about my test environment. System: WIN98SE PWS ASP programming environment: Visual InterDev 6.0 Database: Access2000 (because netizens ask the most of the Access2000 problem.) Built a library: Access2000, first build a Test.mdb database. There are four fields. ID | text1 | text2 | img Auto Number text text OLE object 'If it is SQL Server selection (image) 3: Are you ready, go !!! 3-1. Construction of procedures: We know, image and text is Two different types of files (binary, streaming text) and if we are submitted by the same form, (submitted in the File format) If we get the original method request.form, you must use Equest.TotalBytes to get all the submission. data. But at this time, the two formats of formats are mixed together. My last post has told everyone to separate these materials with a binary approach. But very troublesome, you have to use many binary functions, so many netizens will ask me if there is a simpler method, good. I can tell everyone, there is! And to ensure that the following methods ensure that you will learn. (This method is very alternative, but the great man said the white cat, black cat. It is a good cat to go online!) Upload.asp (specific code is as follows) <% @ language = vbscript%>
File Upload </ title> <script ID = "clientEventHandlersVBS" LANGUAGE = "vbscript"> <-! Sub form2_onsubmit // ** here is the key, when submitted in form2 In the process, that is, the submission of Form1 is submitted for form1.submit // **, so we used two forms here, but only one submission can be used.</p>
<p>End Sub -> </ script> </ head> <body> <form name = "form1" enctype = "multipart / form-data" action = "upimage.asp" method = "post" target = "_ blank"> Please choose a picture to upload: <br> <input name = "picture" type = "file"> <br> </ form> <form name = "form2" action = "uptext.asp" method = "post"> <input type = "text" name = "text1"> <br> <input type = "text" name = "text2"> <br> <input type = "submit" value = "submit"> </ form> <@ / body> </ html> 3-2 soldiers divided into two ways to process data. First, the text is simple. Uptext.asp (code as follows) <% @ language = vbscript%> <% strconn = "driver = {Microsoft Access Driver (* .mdb)}; dbq =" & Server.mappath ("test.mdb") text1 = request. form ( "text1") text2 = request.form ( "text2") response.write text1response.write text2set rs = Server.CreateObject ( "adodb.recordset") sql = "SELECT top 1 * FROM imgtable ORDER BY id DESC" ' Here is the last ID that is just changed to rsopen sql, strconn, 1, 3 'is the two text fields of your uploaded images. RS ("Text1") = text1 'Note, here is the change is not added, so don't use AddNew. RS ("Text2") = text2rs.Updaters.close%> Next, the image is processed. Upimage.asp (specific code as follows) <% Formsize = Request.TotalBytes 'Get Data Formdata = Request.binaryRead (Formsize) Function ImageUp (Formsize, FormData)' This function is to intercept the image portion. Bncrlf = chrb (13) & chrb (10) 'is made after making functions. In the future, you can use it at it.</p>
<p>divider = leftb (formdata, instrb (formdata, bncrlf) -1) datastart = instrb (formdata, bncrlf & bncrlf) 4dataend = instrb (datastart 1, formdata, divider) -datastartimageup = midb (formdata, datastart, dataend) end functionImage = Imageup (Formsize, Formdata) 'This is the image section. SET RS = Server.createObject ("AdoDb.Recordset") StrConn = "Driver = {Microsoft Access Driver (* .mdb)}; dbq =" & Server.MAppath ("test.mdb") SQL = "Select * from imgtable" Rs.open SQL, STRCONN, 1, 3RS.Addnew 'Submitted by the form two in the form of a single submission. RS ("img"). Appendchunk image 'So this is added. Rs.Updaters.closeSponse.contentType = "image / gif" response.binaryWrite Imageup (Formsize, FormData) 'Here is a display image. Successful! %>? ! ? ! It turns out so simple! Four: "Show, I want to display the same page" finally completed the graphic synchronization submission. (Really synchronized? Isn't it? Yes? Hey, we are just in order to solve the problem. Why bother is true? Isn't it?) Now we have to display the same page. In fact, this is the same idea. We also use two pages to complete. Main page: show.asp <% @ language = vbscript%> <% strconn = "driver = {Microsoft Access Driver (* .mdb)}; dbq =" & Server.mappath ("test.mdb") SET RS = Server. CreateObject ("AdoDb.Recordset") SQL = "SELECT TOP 1 * from imgtable order by id desc" RS.Open SQL, STRCONN, 1, 3%> <HTML> <body> The following is your upload information. <br> Text 1: <% Response.Write RS ("Text1")%> <br> Text 2: <% Response.write RS ("Text2")%> <br> Your Images: <img src = showimg .asp? id = <% = rs ("ID")% >> 'Note that this is the key. He can achieve web image and text </ body> 'coexist. </ html> The behind-the-scenes page: showimg.asp (said he is a post behind the post, because he lurks in the main page.</p></div><div class="text-center mt-3 text-grey">
转载请注明原文地址:https://www.9cbs.com/read-51744.html</div><div class="plugin d-flex justify-content-center mt-3"></div><hr><div class="row"><div class="col-lg-12 text-muted mt-2"><i class="icon-tags mr-2"></i><span class="badge border border-secondary mr-2"><h2 class="h6 mb-0 small"><a class="text-secondary" href="tag-2.html">9cbs</a></h2></span></div></div></div></div><div class="card card-postlist border-white shadow"><div class="card-body"><div class="card-title"><div class="d-flex justify-content-between"><div><b>New Post</b>(<span class="posts">0</span>)
</div><div></div></div></div><ul class="postlist list-unstyled">
</ul></div></div><div class="d-none threadlist"><input type="checkbox" name="modtid" value="51744" checked /></div></div></div></div></div><footer class="text-muted small bg-dark py-4 mt-3" id="footer"><div class="container"><div class="row"><div class="col">CopyRight © 2020 All Rights Reserved
</div><div class="col text-right">Processed:
<b>0.036</b>, SQL:
<b>9</b></div></div></div></footer><script src="./lang/en-us/lang.js?2.2.0"></script><script src="view/js/jquery.min.js?2.2.0"></script><script src="view/js/popper.min.js?2.2.0"></script><script src="view/js/bootstrap.min.js?2.2.0"></script><script src="view/js/xiuno.js?2.2.0"></script><script src="view/js/bootstrap-plugin.js?2.2.0"></script><script src="view/js/async.min.js?2.2.0"></script><script src="view/js/form.js?2.2.0"></script><script>
var debug = DEBUG = 0;
var url_rewrite_on = 1;
var url_path = './';
var forumarr = {"1":"Tech"};
var fid = 1;
var uid = 0;
var gid = 0;
xn.options.water_image_url = 'view/img/water-small.png';
</script><script src="view/js/wellcms.js?2.2.0"></script><a class="scroll-to-top rounded" href="javascript:void(0);"><i class="icon-angle-up"></i></a><a class="scroll-to-bottom rounded" href="javascript:void(0);" style="display: inline;"><i class="icon-angle-down"></i></a></body></html><script>
var forum_url = 'list-1.html';
var safe_token = 'X4EInS60t7uChxMslNrOCh_2F163ZAo031_2BHFHuvySIQd_2FRVfbfMC2eanG7ObQuZtuhFWjN_2FKoPNWPvgy3';
var body = $('body');
body.on('submit', '#form', function() {
var jthis = $(this);
var jsubmit = jthis.find('#submit');
jthis.reset();
jsubmit.button('loading');
var postdata = jthis.serializeObject();
$.xpost(jthis.attr('action'), postdata, function(code, message) {
if(code == 0) {
location.reload();
} else {
$.alert(message);
jsubmit.button('reset');
}
});
return false;
});
function resize_image() {
var jmessagelist = $('div.message');
var first_width = jmessagelist.width();
jmessagelist.each(function() {
var jdiv = $(this);
var maxwidth = jdiv.attr('isfirst') ? first_width : jdiv.width();
var jmessage_width = Math.min(jdiv.width(), maxwidth);
jdiv.find('img, embed, iframe, video').each(function() {
var jimg = $(this);
var img_width = this.org_width;
var img_height = this.org_height;
if(!img_width) {
var img_width = jimg.attr('width');
var img_height = jimg.attr('height');
this.org_width = img_width;
this.org_height = img_height;
}
if(img_width > jmessage_width) {
if(this.tagName == 'IMG') {
jimg.width(jmessage_width);
jimg.css('height', 'auto');
jimg.css('cursor', 'pointer');
jimg.on('click', function() {
});
} else {
jimg.width(jmessage_width);
var height = (img_height / img_width) * jimg.width();
jimg.height(height);
}
}
});
});
}
function resize_table() {
$('div.message').each(function() {
var jdiv = $(this);
jdiv.find('table').addClass('table').wrap('<div class="table-responsive"></div>');
});
}
$(function() {
resize_image();
resize_table();
$(window).on('resize', resize_image);
});
var jmessage = $('#message');
jmessage.on('focus', function() {if(jmessage.t) { clearTimeout(jmessage.t); jmessage.t = null; } jmessage.css('height', '6rem'); });
jmessage.on('blur', function() {jmessage.t = setTimeout(function() { jmessage.css('height', '2.5rem');}, 1000); });
$('#nav li[data-active="fid-1"]').addClass('active');
</script>
