|  | 主题:  上传图片问题,麻烦朋友帮忙看一下 | 
            
                        
                
                    |  無㊣畏╃
 职务:普通成员
 等级:2
 金币:1.0
 发贴:371
 注册:2003/3/25 14:38:29
 
 | 
                            
                            #12004/12/3 0:24:05 
                                function ubb(str)if rs("picname")<>"" then
 Dim picarray,pic
 pic = rs("picname")
 picarray = Split(pic,"|",-1)
 str=replace(replace(str,"[img]","<div align='center'><img align='center'  vspace='5' hspace='10' border='0'  src=../soft/"),"[/img]","></div><br>")
 这个是上传多个图片的
 
 怎么样在这个语句里判断图片大小不得超出高600宽500的范围,只要不超出这个范围就成了.
 
 而且可以打开图片链接
 | 
                        
                
                    |  無㊣畏╃
 职务:普通成员
 等级:2
 金币:1.0
 发贴:371
 注册:2003/3/25 14:38:29
 
 | 
                            
                            #22004/12/3 14:49:24 
                                怎么没有朋友响应一下的呢
                                
                                
                                
                             | 
                        
                
                    |  無㊣畏╃
 职务:普通成员
 等级:2
 金币:1.0
 发贴:371
 注册:2003/3/25 14:38:29
 
 | 
                            
                            #32004/12/3 14:53:02 
                                这个问题困绕了偶好久就是一直没找到答案了
                                
                                
                                
                             | 
                        
                
                    |  缺缺
 职务:管理员
 等级:8
 金币:41.0
 发贴:9620
 注册:2004/1/14 19:14:47
 
 | 
                            
                            #42004/12/3 14:57:38 
                                str=replace(replace(str,"[img]","<div align='center'><img align='center' vspace='5' hspace='10' border='0' src=../soft/"),"[/img]","></div><br>")
 修改这些HTML代码
 
 
 
 | 
                        
                
                    |  無㊣畏╃
 职务:普通成员
 等级:2
 金币:1.0
 发贴:371
 注册:2003/3/25 14:38:29
 
 | 
                            
                            #52004/12/3 22:42:42 
                                偶改过那段代码,如果是一张图片可以打开链接,要是多张多图,就打不开了,. str=replace(replace(str,"[img]","<div align='center'><font color=ff66oo>"&rs("cpname"  &" 产品相关图片</font><br><a href="&rs("picname"  &" target=_blank><img align='center'  vspace='5' hspace='10' border='0'  src=soft/"  ,"[/img]","></a></div><br>"  打开后就会出现cycnnet:3/2004123224037.jpg|2004123224046.jpg 把多余的图片也打开了,怎么样才能打开相对应的图片链接了? 朋友帮忙看一下,我搞的头都大了.还有图片大小的问题
                                
                                
                                
                             | 
                        
                
                    |  無㊣畏╃
 职务:普通成员
 等级:2
 金币:1.0
 发贴:371
 注册:2003/3/25 14:38:29
 
 |  |